Abrir base de datos de acces con contraseña

[Kelpie]

Puedes emplear el siguiente código. Los valores que he puesto false son opciones para fijar el tipo de apertura (exclusiva o no, tipo de bloqueo...)

Set db = OpenDatabase("c:\nemesdb\nemesis.mdb", False, False, ";PWD=xxxxxxx")