instacia a Access desde Visual

[Otaku237]

hola

me preguntaba si alguien sabe como abrir un base de datos desde visual pero que tiene contraseña, es una de Access la contraseña se coloca en la barra de herramienta en seguridad pero no se como abrirla cuando hago la instacia a la base de datos yo se cual es la contraseña pero no se como abrirla desde la insstacia porque me marca un error

[EL_MVM]

A ver si te sirve esto:

Dim Cn As New ADODB.Connection
Dim strCn As String
strCn = "Provider=Microsoft.Jet.OLEDB.3.51;" & _
"Data Source=nwind.MDB;" & _
"Jet OLEDB:System database=c:\winnt\system32\System.MDW"

Cn.Open ConnectionString:=strCn, _
UserID:="Admin", Password:="ambsoftware"