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 為您完成工作。 我還建議您不要將密碼存儲為純文本（就像您正在做的那樣）。 此信息是一般信息，可以通過搜索找到，但如果您遇到特定問題，請回復。