Abrir base de datos de acces con contraseña

[chino10030]

Hola a todos una ves mas pidiendo su ayuda....

Pues actualmente eh desarrollado un sistema con visual basic 6 y Acces
y para acceder a la base de datos lo eh hecho de esta forma.

dim db as database
dim rs as recordset

Set db = OpenDatabase("c:\nemesdb\nemesis.mdb")
set rs=db.openrecordset("select * from clientes")
' (de esta manera adquiero los datos de mi tabla clientes)
text1.text= rs!id

En todo mi sistema eh manipulado mi db por recordsets
y la pregunta es:

Si protejo mi db con contraseña de que manera declaro la base de datos para seguir manipulando los datos desde recordset como hasta ahora lo eh hecho?

Ayudenme por favor

[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")