У меня проблема со следующими строками кода, я чувствую, что это что-то простое, но я не могу это понять.Я получаю переменную объекта «Ошибка 91» во время выполнения или с переменной блока не установлена ошибка.Ошибка происходит в строке rsc.OpenRecordSet...
.BadgeV
- это число, у меня установлена ссылка на DAO. Оно извлекается из таблицы связанного сервера sql, где у меня есть первичный ключ и идентификатор.Чего мне не хватает?
Function FNC_Scan()
Dim db As DAO.Database
Dim rsc As DAO.Recordset
Set db = CurrentDb()
rsc.OpenRecordset ("SELECT dbo_ScanData.CardID, dbo_ScanData.Complete FROM dbo_ScanData WHERE (((dbo_ScanData.CardID)= Forms![Scan]!BadgeV))) AND ((dbo_ScanData.Complete)=0));")
If rsc.EOF Then
MsgBox "new item"
Else
MsgBox "Append Item"
End If
Set rsc = Nothing
Set db = Nothing
End Function