2011-01-30 151 views
0

我在Access VBA中編寫代碼。使用記錄集時遇到問題。這裏是我的代碼的第一行:記錄集在Access 2007 VBA中失敗

Dim rst As Recordset 
Dim sql as String 

sql = "Select ........" 
Set rst = CurrentDb.OpenRecordset(sql, dbReadOnly) 

程序在第二行「set rst = .....」失敗。我加了以下參考: Visual Basic應用程序, 的Microsoft Access 12.0對象庫, OLE自動化, Microsoft ActiveX數據對象2.8庫

但該計劃仍然未能在第二行。還有什麼我該做的? 謝謝,

+0

我也試過昏暗rst作爲DAO.Recordset。但沒有運氣 – guest1 2011-01-30 22:36:04

回答

1

Currentdb是DAO代碼,但你聲明你有一個ADO引用。刪除ADO引用並添加Microsoft Office 12.0 Access數據庫引擎對象庫。

如果這是Access 2000,2002或2003我建議添加Microsoft DAO 3.6對象庫。

+0

我刪除了ADO參考。現在我有以下參考:Visual Basic for Applications,Microsoft Access 12.0對象庫,OLE自動化和Microsoft Office 12.0 Access數據庫引擎對象庫。但問題依然存在。任何想法?? – guest1 2011-01-30 23:02:31