Pregunta: | 5425 - ABRIR INSTANCIA DE ACCESS CON PASSWORD |
Autor: | Urbandisa Urbandisa |
Como puedo al abrir la instancia de Access pasarle la password a la vez?
Ya que puedo abrirla asi: Dim acApp As Access.Application Set acApp = New Access.Application acApp.ProductCode acApp.OpenCurrentDatabase "C:\bd1.mdb" acApp.Visible = False pero no puedo si tiene password porque no se donde pasarle el parametro de la password, ya he estado probando al azar y nada... Gracias por adelantado. Pedro. |
Respuesta: | Gerardo Dávila |
Que ondas Pedro!
Bueno, el siguiente código quizás te pueda ayudar a lo que necesitas, ponlo en un botón de apertura de la base de datos: Private Sub Command1_Click() Dim db as Database Set db = OpenDatabase("C:\my documents\basedatos.mdb",false,false,"pwd=MiClave") msgbox("Base de datos abierta") db.close End Sub Por supuesto la instrucción más importante es la tercera, podrás observar que existe un cuarto parámetro con respecto a la instrucción Opendatabase, la cual no es muy documentada y tiene que ver con la clave de acceso, debes escribirla con las comillas tal y como se muestra en el ejemplo, al igual que la palabra reservada pwd. Espero que te sea de utilidad, cualquier cosa, ya tienes mi correo. |