Convertir le code DAO en code ADO

S’applique à : Access 2013, Office 2013

Remarque

Les versions de la bibliothèque DAO antérieures à 3.6 ne sont pas fournies ni prises en charge dans Access.

Mappage d'objet DAO en ADO

DAO	ADO (ADODB)	Remarque
DBEngine	Aucun
Workspace	Aucun
Database	Connection
Recordset	Recordset
Dynaset-Type	Keyset	Extrait une série de pointeurs vers les enregistrements du jeu d'enregistrements.
Snapshot-Type	Static	Tous deux extraient des enregistrements complets mais un jeu d'enregistrements Static est actualisable.
Table-Type	Keyset avec l'option adCmdTableDirect.
Field	Field	Quand référencée dans un jeu d'enregistrements.

DAO

Ouvre un Recordset

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

Modifie un Recordset

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

ADO

Ouvre un Recordset

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

Modifie un Recordset

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

Remarque

Le déplacement du curseur depuis l'enregistrement en cours via MoveNext, MoveLast, MoveFirst, MovePrevious sans utiliser préalablement la méthode CancelUpdate exécute implicitement la méthode Update.

À propos des collaborateurs

Lien fourni par la communauté UtterAccess. UtterAccess est un forum d’aide et wiki de Microsoft Access réputé.

• Choisir entre DAO et ADO