Inicio > Desarrollo Escritorio > Cargar Data Grid en VB6

Cargar Data Grid en VB6

Private Sub Command1_Click()

Set rs = New ADODB.Recordset    cn.ConnectionString = Glo_ConCadena    cn.Open    cn.CursorLocation = adUseClientsql = “select id,producto from productoCategoria”Set rs = cn.Execute(sql)If rs.EOF And rs.BOF ThenElseSet DataGrid1.DataSource = rsEnd Ifn = rs.RecordCountMsgBox (rs.RecordCount)

End Sub

 

Categorías:Desarrollo Escritorio
  1. Aún no hay comentarios.
  1. No trackbacks yet.

Responder

Introduce tus datos o haz clic en un icono para iniciar sesión:

Logo de WordPress.com

Estás comentando usando tu cuenta de WordPress.com. Cerrar sesión / Cambiar )

Imagen de Twitter

Estás comentando usando tu cuenta de Twitter. Cerrar sesión / Cambiar )

Foto de Facebook

Estás comentando usando tu cuenta de Facebook. Cerrar sesión / Cambiar )

Google+ photo

Estás comentando usando tu cuenta de Google+. Cerrar sesión / Cambiar )

Conectando a %s

A %d blogueros les gusta esto: