Como conecto un Grid con ADO (Sin usar el control)
Rafael Rubio Ceja
13 de Agosto del 2004
Quisiera saber como conectar un Grid con ADO
Se que, se declara asi al principio
Dim MiConexion As ADODB.Connection
Dim MisRegistros As ADODB.Recordset
Pero de ahi no se que mas se haga espero su ayuda gracias ¡¡
Se que, se declara asi al principio
Dim MiConexion As ADODB.Connection
Dim MisRegistros As ADODB.Recordset
Pero de ahi no se que mas se haga espero su ayuda gracias ¡¡
Fel
13 de Agosto del 2004
Public rs As ADODB.Recordset
Public conex As ADODB.Connection
Function conexion()
Set conex = New ADODB.Connection
conex.ConnectionString = "Driver=Microsoft Access Driver (*.mdb);DBQ=C:Fabibdempresa.mdb"
conex.Open
Set rs = New ADODB.Recordset
rs.CursorLocation = adUseClient
rs.CursorType = adOpenKeyset
rs.LockType = adLockOptimistic
rs.Source = "datospersonal"
Set rs.ActiveConnection = conex
rs.Open
End Function
Public conex As ADODB.Connection
Function conexion()
Set conex = New ADODB.Connection
conex.ConnectionString = "Driver=Microsoft Access Driver (*.mdb);DBQ=C:Fabibdempresa.mdb"
conex.Open
Set rs = New ADODB.Recordset
rs.CursorLocation = adUseClient
rs.CursorType = adOpenKeyset
rs.LockType = adLockOptimistic
rs.Source = "datospersonal"
Set rs.ActiveConnection = conex
rs.Open
End Function
fel
13 de Agosto del 2004
te repondo otra vez porque se me olvidó decirte que hay que activar una referencia y que el codigo anterior tiene que estar en un modulo para que funcione bien, la referencia es:
Microsoft OLE DB service component 1.0 type librery
Un saludo
Microsoft OLE DB service component 1.0 type librery
Un saludo