SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Visual Basic para principiantes => Mensaje iniciado por: alo26 en Miércoles 26 de Julio de 2006, 00:48

Título: Conectar Datagrid Mediante Código
Publicado por: alo26 en Miércoles 26 de Julio de 2006, 00:48
Hola..
Soy Novata y quisera conectar un datagrid a mi bd(Access). mediante código sin necesidad de depender de un Adodc.
Me podrían ayudar.
Gracias :huh:
Título: Re: Conectar Datagrid Mediante Código
Publicado por: luciano2 en Martes 1 de Agosto de 2006, 05:41
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]
Título: Re: Conectar Datagrid Mediante Código
Publicado por: alo26 en Domingo 6 de Agosto de 2006, 06:34
Muchas Gracias..
Fue de gran utilidad
Título: Re: Conectar Datagrid Mediante Código
Publicado por: alo26 en Martes 8 de Agosto de 2006, 01:32
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..