La Web del Programador: Comunidad de Programadores
 
    Pregunta:  1725 - ADO Y SYSTEMDB
Autor:  Marger Arteaga
Necesito saber cual es la sintaxis que debería utilizar en ADO para Definir una Base de Sistemas (SystemDB) diferente.

Con DAO (DBEngine) se Utiliza.

DBEngine.SystemDB="pathtoSystemDB"

Pero esto no Existe en ADO.

Puede alguien ayudarme..

  Respuesta:  Javier Droguett
yo logre ocupar ese archivo con ado

Escribeme y te lo respondo....

el string de conexion lo saque del dataenvironment que tiene visual en las propiedades le das la ruta del archivo
pero es un poquito mas complejo que eso asi que me escribes t mando la cadena de conexion completa con usuarios para loguearse y todo...

  Respuesta:  ANA CARDENAS
No se a que te refieres con una base de sistema pero si lo que necesitas es solo establecer una conexión a la base de datos mediante el método ADO, te puede servir el siguiente codigo que puedes probarlo dentro de un boton de command:

Private Sub Command1_Click()

Dim adoCN As New ADODB.Connection
Dim driver As String
Dim BaseDatos As String

On Error GoTo Err_Conect

driver = "DRIVER={Microsoft Access Driver (*.mdb)};"
BaseDatos = "DBQ=c:\ana\proyecto\estadistica.mdb;"
adoCN.ConnectionString = driver + BaseDatos
adoCN.Open

MsgBox "Conección Exitosa", vbInformation, "Mensaje"
adoCN.Close

Me.Command1.Enabled = False

Exit_Conect:
Exit Sub

Err_Conect:
MsgBox "Error en la conección", 64, "Error de Conección"
Resume Exit_Conect

End Sub