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! Теперь, почему это не работает? Кажется, он ТОЛЬКО выбирает данные из первой строки двух столбцов, а не из следующих строк?