[求破解]:VBA工程不可查看

守柔

liucqa 发表于 2015-7-12 21:47
代码还是能dump出来的

Module:       ----------------------------------- mdlVBA ------------------- ...

liucqa兄：
真高人也！
起早学习了liucqa兄的两个关于DUMP的贴子，使用DNATools1.131中的“VBA DUMP DEMO”测试了一下。可见通过这种方式进行模块（代码）隐藏，也非无懈可击，在DUMP下一览而无余，正所谓“魔高一尺，道高一丈”，加密与解密，亦是如此，关键看谁能理解得更深。
至于窗体或者类模块，应该没有必要再测试了，我想结果是肯定的。
“实际代码在vba流里面，所以还是能取出来的”----这是根本。
也如ili兄所说，VBA代码，最终还是要让EXCEL能正确读取的，否则，加密就失去了意义了。

coby001

守柔 发表于 2015-7-13 06:22
liucqa兄：
真高人也！
起早学习了liucqa兄的两个关于DUMP的贴子，使用DNATools1.131中的“VBA DUMP DE ...

access 里的vba 可编译成 mde格式，vba代码编译成了p-code，再删除源码，这样能把源码保护加强些。

不知道excel里能不能编译~~？

amesman

守柔 发表于 2015-7-13 06:22
liucqa兄：
真高人也！
起早学习了liucqa兄的两个关于DUMP的贴子，使用DNATools1.131中的“VBA DUMP DE ...

还是用vb封装吧，相对而言这样更安全点。。。。。。

守柔

coby001 发表于 2015-7-13 07:47
access 里的vba 可编译成 mde格式，vba代码编译成了p-code，再删除源码，这样能把源码保护加强些。

不 ...

是啊!
如果微软能够提供这样一个封装功能,那该多好啊!
也许不久的将来,达人们能研究出更好的VBA代码封装技术,期待...

守柔

amesman 发表于 2015-7-13 08:05
还是用vb封装吧，相对而言这样更安全点。。。。。。

所为有利必有弊.
VB封装固然比较好,其中的转换也是很辛苦的,何况,在WIN 的UAC控制,在企业级应用上,还是比较麻烦的.
不去想太多了.

coby001

守柔 发表于 2015-7-13 08:50
是啊!
如果微软能够提供这样一个封装功能,那该多好啊!
也许不久的将来,达人们能研究出更好的VBA代码封 ...

可以变通一下，在access里写vba，引用 excel.app

liucqa

守柔 发表于 2015-7-13 08:50
是啊!
如果微软能够提供这样一个封装功能,那该多好啊!
也许不久的将来,达人们能研究出更好的VBA代码封 ...

国外有加密excel的软件，还是挺管用的。
另外，vba dumper也不是全能，还是有无法导出的办法的，只是这些办法如果想作为普适方法都不合适。
其实作为vba开发的本意，是为了开发方便，任何人都可以调整代码适合自己需求，所以才开放源码。如果脱离了这个本意，通常都是要换个开发环境的。

liucqa

守柔 发表于 2015-7-13 06:22
liucqa兄：
真高人也！
起早学习了liucqa兄的两个关于DUMP的贴子，使用DNATools1.131中的“VBA DUMP DE ...

我只是想知道你的加密工具对窗体和类模块是否也有效，方便的话告诉我测试加密结果，谢谢

守柔

liucqa 发表于 2015-7-13 09:57
我只是想知道你的加密工具对窗体和类模块是否也有效，方便的话告诉我测试加密结果，谢谢

liucqa兄:
没有任何问题的,一览无余!

{:soso_e179:}

coby001

模块1

1. Public xls As XlsApp
   
2. 
   
3. Sub Exx()
   
4.     Set xls = New XlsApp
   
5.     With xls.xlApp
   
6.     .Workbooks.Add
   
7.     .Visible = True        
   
8.     End With
   
9.     'Debug.Print "excel open"
   
10. End Sub
    
11. 
    
12. Sub AppExit()
    
13.     Form_窗体1.Visible = False
    
14.     Set xls = Nothing
    
15.     'Debug.Print "excel close"
    
16.     Application.CloseCurrentDatabase
    
17. End Sub
    

复制代码

Form1

1. Private Sub Command0_Click()
   
2.     Exx
   
3. End Sub
   
4. 
   
5. Private Sub Form_Load()
   
6.     Exx
   
7. End Sub
   

复制代码

类模块

1. Public WithEvents xlApp As Excel.Application
   
2. 
   
3. Private Sub Class_Initialize()
   
4.     Set xlApp = New Excel.Application
   
5. End Sub
   
6. 
   
7. Private Sub xlApp_SheetBeforeDoubleClick(ByVal Sh As Object, ByVal Target As Excel.Range, Cancel As Boolean)
   
8.     Target = "msg from Acc!"
   
9.     Cancel = True
   
10. End Sub
    
11. 
    
12. Private Sub xlApp_WorkbookBeforeClose(ByVal Wb As Excel.Workbook, Cancel As Boolean)
    
13.     AppExit
    
14. End Sub
    

复制代码

Acc2003Vba_mde.rar (30.65 KB, 下载次数: 280)

2015-7-13 10:53 上传

点击文件名下载附件

用 access2003 做了个MDE，打开会自动新建 Excel 。
双击 excel 的单元格，会显示一条消息。

rar 里有2个文件， mde 是代码保护的， mdb 是原文件。