以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]设置密码  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=105918)

--  作者:积水成渊
--  发布时间:2017/8/29 10:41:00
--  [求助]设置密码
表中有一个字段为密码,我现在需要进行密码更改,但是密码不能明文显示,怎么当我输入密码的时候自动进行加密处理,并保存到数据库中
--  作者:有点甜
--  发布时间:2017/8/29 10:43:00
--  

加密一下

 

http://www.foxtable.com/webhelp/scr/0352.htm

 


--  作者:积水成渊
--  发布时间:2017/8/29 11:57:00
--  
感谢,已经解决,加密的方式不一样,花了很多时间
If e.Col.Name = "PassWord" Then \'如果编辑的是某列 
 
Dim psd As String
InputValue(psd,"验证","请输入密码") \'输入密码
 \'e.Table.StartEditing \'强行进入编辑状态
  Dim jmPassWord As String
        If String.IsNullOrEmpty(psd) Then
            jmPassWord = ""
        Else
            jmPassWord = Foxtable.EncryptText(psd, "a23", "op#") \'加密
        End If

\'msgbox(jmPassWord)

e.Row("PassWord") = jmPassWord
End If
e.Table.Save()

--  作者:有点甜
--  发布时间:2017/8/29 12:18:00
--  

 不建议用这种方式加密密码,尽量用md5。

 

 md5是不可逆的,也就是无法回推密码,这样比较好。不然,如果别人知道你的密钥,你整个数据库的密码就都知道了。


--  作者:积水成渊
--  发布时间:2017/8/30 15:25:00
--  
好的,感谢您的建议