Visual Basic - Abrir BD de Acces desde VB

Hola: Escribo desde Argentina y quiero preguntar cómo se abre una BD de Acces (97, 2000, etc.) desde VB si ésta tiene un password, ya que colocando el password en la conexión que hago desde visual no me responde.
Esto es lo que utilizo:
Set wks = CreateWorkspace("" , "admin", "", dbUseJet)
Set bd1 = wks.OpenDatabase(App.Path & "\wagner.mdb")

Cuando coloco la contraseña (luego de la 2º coma -,-) me devuelve un cartel que dice que está abierta (la BD) en modo exclusivo por otro usuario, o también que no existe la contraseña o que es errónea.
Desde ya muchas gracias y quiero agradecerles por la página que tienen, ya que me ha sacado de varios problemas.

Ayer mismo respondí a esta misma pregunta en el foro de VB avanzado. Copio la respuesta:

Para abrir una base de datos Access que tiene contraseña se debe especificar el parámetro "connect" de la función OpenDatabase con el valor "MS Access;pwd=xxxxxx", donde "xxxxxx" es la contraseña. Por ejemplo, podríamos hacer una llamada así:

Set bd = OpenDatabase("c:\ruta\basedatos.mdb", , , "MS Access;pwd=micontraseña")