Rss & SiteMap
Foxtable(狐表) http://www.foxtable.com
有的话,早就告诉你了。
没必要就同一个问题反反复复的提问。
老大改改DecryptFile
|
那就用ZIpFile吧,更加方便,而且还可以压缩文件:
Dim zip As New zipFile
zip.Open("c:\data\backup.zip")
zip.Password = "密码"
Try
zip.Extract("foxtable.exe", "c:\data\foxtable.exe")
Catch ex As Exception
Messagebox.show("密码错误")
End Try
zip.Close()
要改很多地方呀
包括生成的文件
这个工程量就太大了
你让我有拿头撞墙的冲动,只需改动不到10行代码而已,这算哪门子工程量太大?
你甚至不需要自己写代码,用zipFile文件带密码压缩文件,代码实现成的,从帮助复制过来即可,6楼是带密码判断的解压代码,也是现成的。
你对foxtable要求太高了。