到目前为止,我的代码一直运行正常 - 但由于某些未知原因,它不再起作用并且正在抛出错误:
Run-time error '13':
Type mismatch
以下是发生错误的地方:
Dim rst As Recordset
Set rst = CurrentDb.OpenRecordset("qryGetEventsByNonPharmacists")
查询存在,它是一个基本的SELECT查询。这之前从未出现过问题,为什么会抛出错误?
由于
答案 0 :(得分:3)
应该是:
Dim rst As DAO.Recordset
虽然您可以使用Recordset,但是您没有对ADO库的引用,或者当ADO库位于DAO库之后时,在大多数情况下,您最好总是使用显式引用Recordset的库。