DAO コードを ADO に変換する
適用先: Access 2013、Office 2013
注:
3.6より前のバージョンの DAO ライブラリは、Access では提供もサポートもされていません。
DAO から ADO へのオブジェクト マップ
DAO |
ADO (ADODB) |
注 |
---|---|---|
DBEngine |
なし |
|
Workspace |
なし |
|
Database |
Connection |
|
Recordset |
Recordset |
|
Dynaset-Type |
Keyset |
レコードセットのレコードへのポインターを取得します。 |
Snapshot-Type |
Static |
共にフル レコードを取得しますが、Static レコードセットは更新可能です。 |
Table-Type |
adCmdTableDirect オプションを持つ Keyset。 |
|
フィールド |
フィールド |
レコードセットを参照するとき。 |
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 およびヘルプ フォーラムです。