Enlazar un formulario al objeto Recordset de ADO

Para enlazar un formulario de Access a un conjunto de registros, debe establecer la propiedad Recordset del formulario en un objeto Recordset de ADO abierto. El formulario debe satisfacer dos requisitos generales para que sea actualizable cuando se enlace al conjunto de registros de ADO. Los requisitos generales son:

  • El conjunto de registros de ADO subyacente debe ser actualizable a través de ADO.
  • El conjunto de registros debe contener uno o varios campos indizados de forma exclusiva, como la clave principal de una tabla.
 Private Sub Form_Open(Cancel As Integer) 
 Dim cn As ADODB.Connection 
 Dim rs As ADODB.Recordset 
 
 'Use the ADO connection that Access uses 
 Set cn = CurrentProject.AccessConnection 
 'Create an instance of the ADO Recordset class, 
 'and set its properties 
 Set rs = New ADODB.Recordset 
 With rs 
 Set .ActiveConnection = cn 
 .Source = "SELECT * FROM Customers" 
 .LockType = adLockOptimistic 
 .CursorType = adOpenKeyset 
 .Open 
 End With 
 'Set the form's Recordset property to the ADO recordset 
 Set Me.Recordset = rs 
 Set rs = Nothing 
 Set cn = Nothing 
End Sub

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.