我对以下代码行有疑问,我觉得它很简单,但我无法指出它。我收到运行时错误“91”对象变量或 block 变量未设置错误。错误发生在 rsc.OpenRecordSet...
行。 BadgeV 是一个数字,我安装了 DAO 引用,它是从链接的 SQL Server 表中提取的,我在该表中有主键和标识。我错过了什么?
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
最佳答案
应该是
set rsc = db.OpenRecordset(...)
而不是
rsc.OpenRecordset(...)
关于sql - .openrecordsource "run-time error ' 9 1'",我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/6204533/