SoloCodigo

Hola te pongo un ejemplo usando ado .. salu2

[code]


Dim Ado1 As Recordset


Private Sub Form_Load()
  'variable para la conexion
  Dim db As Connection
  'Seteamos la variable
  Set db = New Connection
 
  'Recordset
  Set Ado1 = New Recordset
 
  'Cursor
  db.CursorLocation = adUseClient
 
  'Abrimos la bd y la consulta (especificar el path de la base )
  db.Open "PROVIDER=Microsoft.Jet.OLEDB.3.51;Data Source=D:\Imprimir-flexgrid\base.MDB;"
 
  Set Ado1 = New Recordset
  Ado1.Open "select Au_ID,Author,[Year Born] from tabla", db, adOpenStatic, adLockOptimistic

  Set DataGrid.DataSource = Ado1


 
End Sub


[code]

Pregunta extra referente al Datagrid.

Tengo una tabla teléfonos la cual se visualiza con el datagrid. Directamente en el datagrid agrego los registros sin necesidad de hacerlo mediante Textbox.
Ahora bien, selecciono un cliente me muestra todos sus teléfonos y facilmente puede agregar mas teléfonos. Pero si selecciono un cliente que no tiene ningun teléfono dado de alta, me es imposible agregar un registro de teléfonos a este cliente.
El cursor ni siquiera se posesiona dentro del Datagrid.
En las propiedades del Datagrid tiene habilitado la opción de AllowAddNew

Me pueden auxiliar. Tienen idea que puede ser.
Gracias..