以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 使用外部数据库SQL2005;总是提示密码错误,无法登录 (http://foxtable.com/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").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 以上代码,一直提示密码错误,请高手帮忙看一下代码.
|