以文本方式查看主题 - 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=29855) |
||||
-- 作者:kevin -- 发布时间:2013/3/15 2:06:00 -- 请教:自定义用户管理,一直提示密码错误,无法登录 我使用SQL2005为数据库.数据源名称"sys",用户用名称:"Users" 增加用户,删除用户,更改用户均正常 以下代码是用户登录窗口的"确定"按钮中的代码.我是按照例子中照样做的,不知道会不会是SQL数据库有其它什么需要注意的没有. Dim
UserName As
String = e.Form.Controls("UserName").ValueDim cmd As New SQLCommand Dim dt As DataTable Dim dr As DataRow cmd.ConnectionName = "sys" \'数据源名称 If UserName = "" Then Messagebox.show("请选择用户!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information) Return End If cmd.CommandText = "Select * From {Users} Where [Name] = \'" & UserName & "\'" dt = cmd.ExecuteReader If dt.DataRows.Count = 0 Then Messagebox.show("此用户不存在!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information) Return End If dr = dt.DataRows(0) If e.Form.Controls("PassWord").Value = dr("Password") Then _UserName = UserName _UserGroup = dr("Group") e.Form.Close Else Messagebox.show("密码错误!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information) End If 以上代码,一直提示密码错误,请高手帮忙看一下代码.
|
||||
-- 作者:lsy -- 发布时间:2013/3/15 7:26:00 -- 在dr = dt.DataRows(0)下方加一句测一下: MessageBox.Show(dr("Password") ) 看看表里面的密码对不对。 或者你把项目发上来看看。 |
||||
-- 作者:kevin -- 发布时间:2013/3/15 10:33:00 -- 我验证了密码,是 对的,但就是一直提示错误,麻烦你了,帮我看看,
[此贴子已经被作者于2013-3-15 10:36:15编辑过]
|
||||
-- 作者:495830120 -- 发布时间:2013/6/20 8:19:00 -- 我也出现这样的情况,怎么弄啥 |
||||
-- 作者:495830120 -- 发布时间:2013/6/20 8:20:00 -- 我使用为数据库access据源名称"sys",用户用名称:"Users" |
||||
-- 作者:Bin -- 发布时间:2013/6/20 9:00:00 -- 根本不一样,不要以为眼看着一样就一样了.实际上多了N多空格 不要使用NCHAR |