以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]如何根据config列内容取密码  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=115188)

--  作者:liuyixin662
--  发布时间:2018/3/2 14:02:00
--  [求助]如何根据config列内容取密码
老师你好,如何根据用户表users的config列内容,取加密文字的密码,并填充到pass列,谢谢
图片点击可在新窗口打开查看此主题相关图片如下:pass列如何根据用户表备注列提取密码.bmp
图片点击可在新窗口打开查看

--  作者:有点甜
--  发布时间:2018/3/2 14:44:00
--  

1、没必要提取填充吧?判断密码直接用 like、contains 查询即可,如

 

Dim dr As DataRow
dr = DataTables("表A").Find("第一列 = \'" & UserName & "\'") 
If dr IsNot Nothing AndAlso dr("config").contains(MD5Encrypt(password)) Then
    Verified  = True
End If

 

2、如果确实要提取,参考

 

dim group = "123"
Dim password = "123"
Dim role = "123"
Dim str = "Group" & chr(11) & group & chr(11) & "PassWord" & chr(11) & MD5Encrypt(password) & chr(11) & "Type" & chr(11) & "2" & chr(11) & "Role" & chr(11) & role
msgbox(str)
Dim ary() As String = str.split(chr(11))
msgbox(ary(3))


--  作者:liuyixin662
--  发布时间:2018/3/2 14:49:00
--  

谢谢老师