Find centralized, trusted content and collaborate around the technologies you use most.
Teams
Q&A for work
Connect and share knowledge within a single location that is structured and easy to search.
到目前为止,我的代码一直运行良好 - 但由于某种未知原因,它不再工作并抛出错误:
Run-time error '13': Type mismatch
这是发生错误的地方:
Dim rst As Recordset Set rst = CurrentDb.OpenRecordset("qryGetEventsByNonPharmacists")
该查询存在并且它是一个基本的 SELECT 查询。这以前从来都不是问题,为什么会抛出错误?
谢谢
那应该是:
Dim rst As DAO.Recordset
虽然您可以长期使用 Recordset,并且您没有对 ADO 库的引用,或者当 ADO 库出现在 DAO 库之后,但在大多数情况下,始终使用对库的显式引用会更好记录集。