- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 关于加密解密 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=72608)
-- 发布时间：2015/8/2 22:13:00
-- 关于加密解密
关于加密解密，如图。如果修改了解密密码，但长度保持一样，就会出现错误。有解决办法吗？
此主题相关图片如下：qq截图20150802221146.png
-- 发布时间：2015/8/2 22:45:00
--
字符串应该是
"228HqJrxgDHJQFHwqhK3Mg=="
=1在这里当做无效字符了
-- 发布时间：2015/8/2 23:04:00
--
故意改错的。我要问的问题是：错误解密密码跟正确的密码长度一样时，能否做判断提示密码不正确？而不是出现错误。
[此贴子已经被作者于2015/8/2 23:06:42编辑过]
-- 发布时间：2015/8/2 23:17:00
--
要弄清为什么，就要弄清算法是怎么写的。用外部程序的加密方式，在这里是解密不了的，只能用foxtable提供的加密方式
-- 发布时间：2015/8/3 10:03:00
--
Dim Val1 As String = "龙的传人"
Dim Val2 As String = EncryptText(Val1,"a23","op#") \'加密
try
Dim Val3 As String = DecryptText("228HqJrxgDHJQFHwqhK3Mg=1","a23","op#") \'解密,两个密钥必须和加密的时候相同
Output.Show("加密后:" & val2)
Output.Show("解密后:" & val3)
catch ex As exception
msgbox("解密出错")
End try