Convertir código DAO en ADO

Se aplica a: Access 2013, Office 2013

Nota:

Las versiones de la biblioteca DAO anteriores a 3.6 no se proporcionan ni son compatibles con Access.

Equivalencias entre objeto DAO y objeto ADO

DAO	ADO (ADODB)	Nota
DBEngine	Ninguna
Workspace	Ninguna
Database	Connection
Recordset	Recordset
Dynaset-Type	Keyset	Recupera un conjunto de punteros en los registros del conjunto de registros.
Snapshot-Type	Static	Ambos recuperan registros completos, pero un conjunto de registros Static puede actualizarse.
Table-Type	Keyset con la opción adCmdTableDirect
Field	Field	Cuando se hace referencia a él en un conjunto de registros.

DAO

Abrir un Recordset

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

Editar un Recordset

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

ADO

Abrir un Recordset

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

Editar un Recordset

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

Nota:

Si se mueve el enfoque desde el registro actual por medio de MoveNext, MoveLast, MoveFirst, MovePrevious sin utilizar primero el método CancelUpdate, se ejecutará implícitamente el método Update.

Información sobre los colaboradores

Vínculo proporcionado por la comunidad de UtterAccess. UtterAccess es el principal foro de ayuda y wiki de Microsoft Access.

• Elegir entre DAO y ADO