Visual Basic - Vincular a base de datos protegida por contraseña

Hola de nuevo !
alguien me puede decir como puedo vincular el control Data a una base de datos que esta protegida por contraseña ?
les agradeceria mucho su ayuda

Public Sub Abrir_Base()
Dim sPWD, nombre As String
sPWD = "paso" 'contraseña base de datos fichas
nombrebase = "c:\base.mdb"
Set basedato = OpenDatabase(nombrebase, False, False, ";PWD=" & sPWD)
End Sub

espero que sea lo que buscas.
bye