將 DAO 代碼轉(zhuǎn)換為 ADO
內(nèi)容
Microsoft Access 中包括有 ActiveX 數(shù)據(jù)對象 (ADO) 2.5，用作默認(rèn)的數(shù)據(jù)訪問庫。盡管包括有數(shù)據(jù)訪問對象 (DAO) 3.6，但默認(rèn)情況下是不引用的。為了有助于將代碼轉(zhuǎn)換到新的 ADO 標(biāo)準(zhǔn)，特提供以下信息。
注釋 Microsoft Access 2002 和更高版本中不提供也不支持版本號低于 3.6 的 DAO 庫。
DAO 到 ADO 的對象映射表
ADO(ADODB) |
將 DAO 代碼轉(zhuǎn)換為 ADO |
|
DBEngine |
無 |
|
工作區(qū) |
無 |
|
數(shù)據(jù)庫 |
連接 |
|
記錄集 |
記錄集 |
|
動態(tài)集類型 |
鍵集 |
在記錄集中檢索指向記錄的指針集合 |
快照類型 |
靜態(tài) |
兩者都檢索全部記錄，但是“靜態(tài)”型記錄集可以更新。 |
表類型 |
帶 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 將焦點從當(dāng)前記錄移開時，將隱含執(zhí)行 Update 方法。 |