Cadena de Conexión

Hola Expertos y Novatos:
Necesito el código (Cadena de conexión) para poder acceder a una base de datos de Access 2000, el motivo es que requiero crear un reporte
El código que tengo es el siguiente:
Public base As ADODB.Connection
Sub Main()
Set base = New ADODB.Connection
base.Provider= "Microsoft.Jet.OLEDB.4.0"
base.Open "Ruta\Nombre.mdb", "", ""
End Sub
En donde lo ejecuto pongo lo siguiente:
Dim RS As ADODB.Recordset
'______________
SQL = "Select IndUsuario From TblUser"
RS.Open SQL, base
Pero me indica que se requiere un objeto, me podrías ayudar por favor, agradezco de antemano el tiempo dedicado a leer mi pregunta asimismo a tu respuesta, gracias...

1 respuesta

Respuesta
1
Los recordset también son objetos igual que los connection, por eso debes de crear una instancia antes de utilizarlo.
Dim RS As ADODB.Recordset
SQL = "Select IndUsuario From TblUser"
Set RS = New ADODB.Recordset
RS. Open SQL, base
Cualquier inquietud no dudes en preguntar

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas