Visual Basic登录表单查询

Question

Private Sub cmdOK_Click()
 Adodc1.Recordset.MoveFirst
 Do While Not Adodc1.Recordset.EOF
        If Adodc1.Recordset.Fields(0) <> txtuser.Text Or Adodc1.Recordset.Fields(1) <>   txtPassword.Text Then

            MsgBox "Please verify login details", vbInformation + vbOKOnly, "Login Denied"
            txtuser.SetFocus
            txtuser.Text = ""
            txtPassword.Text = ""
        Else
            Unload Me
            Load Main
            Main.Show
        End If
        Adodc1.Recordset.MoveNext
        Loop
End Sub

如果有人查看上面的代码片段并告诉我是否需要进行任何更改，我将不胜感激！这是我用于连接到SQL SERVER 2005 DB的登录表单的代码！现在为什么这不起作用？它似乎只从两列的第一行获取数据，而不是后面的行？

Answer 1

我会退后一步并重写所有这些。您应该向数据库发送用户名和密码，而不是将每个用户名和密码发送到您的应用程序并循环访问它。让DBMS为您完成工作。我还建议您不要将密码存储为纯文本（因为它看起来像你在做）。此信息是一般性的，可以通过搜索找到，但如果您遇到特定问题，请回复。