通过

将 DAO 代码转换为 ADO

  • 项目

适用于：Access 2013、Office 2013

注意

Access 中不提供或支持版本号低于 3.6 的 DAO 库。

DAO 到 ADO 的对象映射表

DAO

ADO (ADODB)

备注

DBEngine

无

Workspace

无

Database

Connection

Recordset

Recordset

Dynaset-Type

Keyset

在记录集中检索指向记录的指针集合。

Snapshot-Type

Static

两者都检索全部记录，但是 Static 记录集可以更新。

Table-Type

带 adCmdTableDirect 选项的 Keyset。

Field

Field

在记录集中引用时。

DAO

打开 Recordset

 Dim db as Database
 Dim rs as DAO.Recordset
 Set db = CurrentDB()
 Set rs = db.OpenRecordset("Employees")

编辑 Recordset

 rs.Edit 
 rs("TextFieldName") = "NewValue"
 rs.Update

ADO

打开 Recordset

 Dim rs as New ADODB.Recordset
 rs.Open "Employees", CurrentProject.Connection, _
         adOpenKeySet, adLockOptimistic

编辑 Recordset

 rs("TextFieldName") = "NewValue" 
 rs.Update

注意

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

关于参与者

链接提供者：UtterAccess 社区。 UtterAccess 是主要的 Microsoft Access Wiki 和帮助论坛。