Foxtable(狐表)用户栏目专家坐堂 → 数据库读取用户名和密码进行比较


  共有2909人关注过本帖树形打印复制链接

主题:数据库读取用户名和密码进行比较

帅哥哟,离线,有人找我吗?
yifan3429
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2483 积分:22965 威望:0 精华:0 注册:2011/3/29 17:14:00
数据库读取用户名和密码进行比较  发帖心情 Post By:2018/2/8 17:27:00 [只看该作者]

用户已被锁定

 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2018/2/8 17:31:00 [只看该作者]

比如

 

Dim dr As DataRow
dr = DataTables("表A").Find("第一列 = '" & UserName & "'")  
If dr isnot Nothing AndAlso Password = dr("password") Then
    Verified  = True
End If

 回到顶部
帅哥哟,离线,有人找我吗?
yifan3429
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2483 积分:22965 威望:0 精华:0 注册:2011/3/29 17:14:00
  发帖心情 Post By:2018/2/8 17:54:00 [只看该作者]

用户已被锁定

 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2018/2/8 17:55:00 [只看该作者]

如何格式的表格,都是可以的,改成你的表名,改成你的列名即可。

 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2018/2/8 17:59:00 [只看该作者]

如果你用config的,参考这里

 

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


 回到顶部
帅哥哟,离线,有人找我吗?
yifan3429
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2483 积分:22965 威望:0 精华:0 注册:2011/3/29 17:14:00
  发帖心情 Post By:2018/2/8 18:03:00 [只看该作者]

用户已被锁定

 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2018/2/8 18:09:00 [只看该作者]

看5楼代码

 回到顶部