Ошибка run-time error 3021
|
|
Понедельник, 14 Марта 2016 г. 20:20
+ в цитатник
Здравствуйте.
Пытаюсь сделать проверку логина и пароля в Access через VBA с использованием запросов.
Нужно чтобы выводило по логину и паролю получало id.
По нажатию на кнопку авторизации должна происходить проверка. Если логин и пароль есть в таблице Пользователи, то авторизация проходит успешно, но если логин или пароль с ошибкой, то при выполнении SQL запроса через VBA выскакивает ошибка "Run-time error 3021, Текущая запись отсутствует".
Пытался бороться с ней проверяя значение rst!result_2, но возникает тогда другая ошибка - Run-time error '424', Object required
Помогите пожалуйста разобраться.
Dim rst As DAO.Recordset
Dim log As String
Dim pass As String
log = Me.username
pass = Me.password
Set rst = CurrentDb.OpenRecordset("SELECT Пользователи.id AS result_2 FROM Пользователи WHERE Пользователи.Логин = '" & log & "' AND Пользователи.Пароль='" & pass & "';")
'выше возникает ошибка 3021, а ниже проверка и если она присутствует, то выдает ошибку
If (rst!result_2 Is EOL) Then
t_ans = 0
MsgBox "Ошибка авторизации"
Else
t_ans = rst!result_2
End If
rst.Close
Set rst = Nothing
http://www.sql.ru/forum/1205202/oshibka-run-time-error-3021
-
Запись понравилась
-
0
Процитировали
-
0
Сохранили
-