Visual Basic - Necesito abrir la base con contraseña desde visual

Tengo las conexiones con adodcs y la base de datos en acces con contraseña y necesito ingresarle la contraseña desde la conexion.
Si alguien me colabora, le estaré sumamente agradecido.
Chao...

sPathBase= "C:\Archivo de Programas\Microsoft Visual Studio\VB98\BIBLIO.MDB"

With Adodc1
.ConnectionString = _
"Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & sPathBase & ";" & _
"Jet OLEDB:Database Password=laclave"
& ";"
' IndicaTabla
.RecordSource = "Authors"
End With

Gracias Benjo, voy a probar y te cuento de nuevo

Un feliz fin de semana

Hola Benjo

Me podrias decir en que evento del adodc coloco este codigo.
No entiendo para que es la primera linea del codigo (sPathBase...)

Gracias por tu ayuda
Saludos