0

到目前为止,我的代码一直运行良好 - 但由于某种未知原因,它不再工作并抛出错误:

Run-time error '13':
Type mismatch

这是发生错误的地方:

Dim rst As Recordset
Set rst = CurrentDb.OpenRecordset("qryGetEventsByNonPharmacists")

该查询存在并且它是一个基本的 SELECT 查询。这以前从来都不是问题,为什么会抛出错误?

谢谢

4

1 回答 1

3

那应该是:

Dim rst As DAO.Recordset

虽然您可以长期使用 Recordset,并且您没有对 ADO 库的引用,或者当 ADO 库出现在 DAO 库之后,但在大多数情况下,始终使用对库的显式引用会更好记录集。

于 2013-03-14T16:22:02.167 回答