Visual Basic - ¿Como abrir base con pass?

Como puedo abrir una base de datos (access) que tiene password
yo lo hago con:
Set BD=OpenDatabase(base,,,"Access; pwd=xxx")
y me la abre pero despues no me deja abrir un recordset.
¿que puedo hacer?

Yo lo tengo hecho y me funciona. El código que utilizo para abrir la bd es el siguiente:

Set BD = OpenDatabase("", True, True, "MS Access;PWD=contraseña;DATABASE=RutaNombreBd")

Prueba así. De todas maneras si la base de datos te la abre no creo que sea de la contraseña. Comprueba el código que utilizas al abrir el recordset, quizás haya algo que esté mal. Espero que te ayude.