将 DAO 代码转换为 ADO

   

Microsoft Access 中包括有 ActiveX 数据对象 (ADO) 2.5,用作默认的数据访问库。尽管包括有数据访问对象 (DAO) 3.6,但默认情况下是不引用的。为了有助于将代码转换到新的 ADO 标准,特提供以下信息。

注意   Microsoft Access 2002 中不再提供或支持版本号低于 3.6 的 DAO 库。

DAO 到 ADO 的对象映射表

DAO ADO(ADODB) 注意
DBEngine  
工作区  
数据库 连接  
记录集 记录集  
动态集类型 键集 在记录集中检索指向记录的指针集合
快照类型 静态 两者都检索全部记录,但是“静态”型记录集可以更新。
表类型 带 adCmdTableDirect 选项的键集  
字段 字段 在记录集中引用时

DAO ADO
打开“记录集”
Dim db as Database
Dim rs as DAO.Recordset
Set db = CurrentDB()
Set rs = db.OpenRecordset(“Employees”)
Dim rs as New ADODB.Recordset
rs.Open “Employees”, CurrentProject.Connection, adOpenKeySet, adLockOptimistic
编辑“记录集”
rs.Edit
rs(“TextFieldName”) = “NewValue”
rs.Update
rs(“TextFieldName”) = “NewValue”
rs.Update 

注意   在没有先使用 CancelUpdate 方法而利用 MoveNext、MoveLast、MoveFirst、MovePrevious 将焦点从当前记录移开时,将隐含执行 Update 方法。