数据类型代码不匹配 - 为什么现在?

时间:2013-03-14 16:11:28

标签: vba ms-access

到目前为止,我的代码一直运行正常 - 但由于某些未知原因,它不再起作用并且正在抛出错误:

Run-time error '13':
Type mismatch

以下是发生错误的地方:

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

查询存在,它是一个基本的SELECT查询。这之前从未出现过问题,为什么会抛出错误?

由于

1 个答案:

答案 0 :(得分:3)

应该是:

Dim rst As DAO.Recordset

虽然您可以使用Recordset,但是您没有对ADO库的引用,或者当ADO库位于DAO库之后时,在大多数情况下,您最好总是使用显式引用Recordset的库。