关于文件加密的一个很郁闷的问题...
加密的原理很简单:用二进制数据异或法加解密
现在发现一个问题,如果原文件是图片文件(JPG,BMP之类等),在经过加密之后,解密出来的图片无法在显示...更要命的是,以前程序是好使的...
然后上网去找各种例子源码,测试的结果也是同样,解密后的图片仍然无法显示...
我用的是VB6的企业版,我换到别的机器作测试,发现问题依然存在.
我是新手,希望各位大大能指导一二,谢谢了
[解决办法]
不会把,是不是原来的图片就打不开.
[解决办法]
加密和解密時都要使用相同的圖片格式
[解决办法]
vb6 ?!
连文字编码都处理不好，怎么加解密好？
还有，楼上的：
Dim SourceFileName As String
Dim DestinationFileName As String
Dim FileNumber As Long
Dim FileLen As Long
FileNumber = FreeFile
Open SourceFileName For Binary Access Read As FileNumber
FileLen = LOF(FileNumber)
If FileLen = 0 Then
MsgBox "无法读取文件或者文件为空 "
Exit Sub
End If
Dim indata(FileLen - 1) As Byte
Get FileNumber, , indata
Close FileNumber
