vb登陆界面总是提示密码错误

来源：百度知道编辑：UC知道时间：2024/06/01 12:59:28

Private Sub Command1_Click()
Dim miCount As Integer
Dim sqlstr As String

sqlstr = "select*from 密码表 where 用户名='" & Text1.Text & "'"
Adodc1.RecordSource = sqlstr
Adodc1.Refresh
Debug.Print sqlstr
Debug.Print Text2.Text

If Adodc1.Recordset.BOF Then
MsgBox "用户名错误,请重新输入", vbExclamation, "警告"
Text1.Text = ""
Text1.SetFocus

Else
If Text2.Text = Adodc1.Recordset.Fields("密码") Then

MDIForm1.Visible = True
MDIForm1.mDManagement.Enabled = True
MDIForm1.mControl.Enabled = True
MDIForm1.mMenu.Enabled = True
frmMenu.Visible = True
frmChange.Show

Else

MsgBox "密码错误,重新输入", vbExclamation, "警告"
Text2.Text = ""
Text2.SetFocus

End If
End If

miCount =

先看看 sqlstr 出来是什么啊：）可能没去空格吧？：）
sqlstr = "select*from 密码表 where 用户名='" & trim(Text1.Text) & "'"

sqlstr = "select*from 密码表 where 用户名='" & Text1.Text & "'"
中的select*from掉空格了,应该为select * from .

QQ无法登陆，总是提示密码错误 QQ登陆总是提示我密码错误玩街头篮球登陆时系统总是提示密码错误 QQ登陆的时候总是提示密码错误为什么登陆QQ时总是提示密码错误为什么使用Pidgin登陆QQ时总是提示密码错误？登陆qq提示密码错误 wow登陆提示密码错误激活QQ后，再次登陆时为什么总是提示密码错误，不能登陆 pubwin 使用XP时无法自动登陆,总是提示密码错误无法登陆