继续获取运行时错误3061,其中以下脚本位于Acces中。调试器报告最后一行的问题,但对于我的生活,我看不出问题是什么。非常感谢任何帮助。
Dim db As Database
Dim salers As DAO.Recordset 'Sale
Set db = CurrentDb
Dim saleQuery As String
saleQuery = "SELECT * FROM Sales WHERE salesID = " & Me.saleID.Value & ";"
Set salers = db.OpenRecordset(saleQuery)
答案 0 :(得分:0)
这个错误几乎总是意味着某些东西拼写错误,或者不存在。因此,请确保Sales
和salesID
存在且在查询中拼写正确。
如果可以,请查看Me.saleID.Value
。如果这是一个字符串,则查询将用引号括起来:
saleQuery = "SELECT * FROM Sales WHERE salesID = '" & Me.saleID.Value & "';"
注意'围绕saleID值。