Visual Basic - abrir base de datos con contraseña

Hola que tal
me gustaria saber como puedo abrir una base de datos hecha en access, desde un datacontrol, que esta protegida por contraseña
gracias

Si utilizas el ControlData tienes que poner lo siguiente

EN EL CONTROL DATA OPCION Connect
;pwd=123456
123456 seria la contraseña de access

saludos

Esta es una de las maneras para abrir si utilizas Dao:
Colocando un data en el formulario

Esto lo colocas en el formulario o donde te interese abrir la base
Private Sub Form_Load()
Data1.DatabaseName = "\nombre.mdb"
End Sub

Esto lo colocas el el control data en la propiedad Connect
;pwd=tu contraseña

XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

Esta seria otra manera de abrir con Ado
Set baseBD = OpenDatabase(ruta, False, False, ";PWD=xxx")

donde ruta es el path y nombre de la base de datos a abrir y xxx pa contraseña de la base de datos

XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

Otra Forma
objConexion.Provider = "Microsoft Jet 4.0 OLE DB Provider"
objConexion.Properties("Jet OLEDB:Database Password") = "miclavesecreta"
objConexion.ConnectionString = "Data Source=c:\datos.mdb"

Lo del proveedor es opcional, pero fíjate como envío la palabra de entrada de la B

XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX