以文本方式查看主题

-  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").Value
Dim
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
--  
我验证了密码,是 对的,但就是一直提示错误,麻烦你了,帮我看看, 
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:请教.zip


[此贴子已经被作者于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


图片点击可在新窗口打开查看此主题相关图片如下:外部数据源.png
图片点击可在新窗口打开查看