[Resolvido]Abrir Banco de dados com senha

Bom dia pessoal.

Preciso acessar um Banco de Dados Access 2007 criptografado com senha (accde)

Estou utilizando o script abaixo para conexão e gostaria de saber onde encaixo a senha para abrir?

Código:

Set DB_Imp = DBEngine.Workspaces(0).OpenDatabase(Caminho/Banco.accde) 'Conecta com o BD

Set db = ws.OpenDatabase(Caminho/Banco.accde), False, False, "MS Access;PWD=senha")

Resolvido