我遇到了以下代码行的问题,我觉得它很简单,但我不能把它放在手指上。我得到一个运行时错误'91'对象变量或块变量未设置错误。该错误发生在rsc.OpenRecordSet...
行。 BadgeV
是一个数字,我已经安装了DAO引用,它从一个链接的sql服务器表中拉出,我有一个主键和标识。我错过了什么?.openrecordsource“run-time error'91'”
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
集RSC = db.OpenRecordset( “选择dbo_ScanData.CardID,dbo_ScanData.Complete FROM dbo_ScanData WHERE dbo_ScanData.CardID =” &形式![Scan]!BadgeV&“AND dbo_ScanData.Complete = 0”) – 2011-06-01 17:17:50