Access - Abrir BD de Access con contraseña desde VB 6.0

Hola, tengo un programa en VB 6.0 que utiliza una BD en Access, me funciona perfectamente, pero quiero ponerlerle una contraseña a la BD, el problema esta en como le indico el parametro de la contraseña a la hora de establecer la conexion...

Actualmente me conecto a la BD con el siguiente Codigo:

Set WDB = Workspaces(0).OpenDatabase(App.Path & "\BD HTSystem\HTSystem.mdb")

Que tengo que agregarle para que me acepte el password de la BD?

Saludos.

Ya supe como!!

Gracias de todas formas... Y aqui lo pongo por si alguien lo llega a necesitar despues, uno nunca sabe...

Set WDB = Workspaces(0).OpenDatabase(App.Path & "\BD HTSystem\HTSystem.mdb", False, False, _
";pwd=" & Pass)

Donde

WDB es la variable de tipo Database y
Pass es una variable de tipo string con el valor de la contraseña

Saludos!!!