03/02/2010, 18:33
|
| | Fecha de Ingreso: mayo-2009
Mensajes: 238
Antigüedad: 15 años, 6 meses Puntos: 7 | |
Respuesta: datagrid visual basic 6 Prueba con este codigo
Código:
Dim cn As Connection
Dim rs As Recordset
Private Sub Form_Load()
Set cn = New Connection
cn.ConnectionString = "DRIVER={MySQL ODBC 5.1 Driver}; SERVER=localhost;DATABASE=sistemag;USER=seg;PASSWORD=123;OPTION=3"
cn.CursorLocation = adUseClient
cn.Open
Set rs = New Recordset
rs.Open "select * from cliente", cn, adOpenStatic
Set DataGrid1.DataSource = rs
End Sub
|