txetxo
30 de Diciembre del 2003

Hola amigos

quisiera conectar una BD ACCESS mediando ADODC, por codigo, el problema es que nunca lo he hecho, siempre he trabajado con control data y access 97, pero esta vez se trata de access 2000.

¿Alguien me puede ayudar?

Muchas gracias y felices fiestas

Marag
30 de Diciembre del 2003

No entiendo bien tu pregunta, ¿como quieres conectar? mediante ADODC o mediante objetos ADO

rafa
30 de Diciembre del 2003

Hola txetxo.
Primero tienes que crearte la conexion:
1.en un modulo te creas la variable:
Global ConSadyr As ADODB.Connection

2. en un procedimiento abres la conexion:
dim sConecionAdo
sConexionAdo = CADENA DE CONEXION
para crearte la cadena de conexion una ayuda es insertar un control ado y generar ahi la cadena, luego borras el control y listo.
Set Conection = New ADODB.Connection
With Conection
.IsolationLevel = adXactReadUncommitted
.Mode = adModeReadWrite
.CommandTimeout = 300
.ConnectionString = sConexionAdo
.CursorLocation = adUseClient
While .State <> 1 And ContConex < 5
.Open
ContConex = ContConex + 1
Wend
end with

3.creas el recordset:
Dim rst As New ADODB.Recordset
With rst
.ActiveConnection = conection
.CursorLocation = adUseClient
.CursorType = adOpenStatic
.LockType = adLockOptimistic
.Open CADENA SQL
End With

en la msdn tienes mas ayuda.
ESPERO TE SEA UTIL.