以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  使用外部数据库SQL2005;总是提示密码错误,无法登录  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=29893)

--  作者:kevin
--  发布时间:2013/3/15 18:02:00
--  使用外部数据库SQL2005;总是提示密码错误,无法登录
我使用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

以上代码,一直提示密码错误,请高手帮忙看一下代码.

 下载信息  [文件大小:   下载次数: ]
点击浏览该文件:请教.zip