以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助] 关于密码加密解密的问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=135173)

--  作者:liujie6215
--  发布时间:2019/5/20 8:36:00
--  [求助] 关于密码加密解密的问题

 

我想判断密码是否被加密,如果没有加密,我就用EncryptText将密码加密,如何写代码?

 

 


--  作者:y2287958
--  发布时间:2019/5/20 9:45:00
--  
这个判断不了,除非事先已明确知道哪些是未加密的
--  作者:有点甜
--  发布时间:2019/5/20 10:45:00
--  

 

无法直接判断,请具体说明,怎样的数据算是没加密的。

 

 


--  作者:有点甜
--  发布时间:2019/5/20 10:46:00
--  

 

不然你就尝试解密,看能否解密成功。解密不成功的,就是没加密的。

 

 


--  作者:liujie6215
--  发布时间:2019/5/20 11:30:00
--  

谢谢各位老师!图片点击可在新窗口打开查看


--  作者:shenyl0211
--  发布时间:2019/5/20 14:25:00
--  
建议全部用MD5加密,可以避免任何嫌疑。
登录时,先把窗口中输入的密码用MD5加密,再与人员表中已经用MD5加密的密码比较即可。

MD5Encrypt

用MD5算法加密字符串,加密后的字符串不能被解密。

语法:

MD5Encrypt(Value)

Value:要加密的字符串。

例如:

Dim Val As String
Val = MD5Encrypt("I Like Foxtable")
Output.Show(Val)