Visual Basic - abrir bses de datos con contraseña

Buenos días.
Estoy intentando abrir una base de datos de access 2000 con contraseña. Según las instrucciones o lo que yo entiendo, debería ser así:
dim base as database.
base.opendatabase (ruta, ., pwd = "xxx")
Acceder a la base de datos sin contraseña no me da problemas pero
con esta , me da un error de contraseña no válida aunque si que lo es.

Agradecezco cualquier sugerencia al respecto.
gracias

Esta es una de las maneras para abrir:
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