Tengo un problema
Hola:
Mira que coloque las siguientes instrucciones y me dice que no es una contraseña correcta:
Dim mBase1 As Database
Set mBase1 = OpenDatabase("C:/BASE.MDB",,,"PWD= 2001")
La contraseña la coloco desde
Access por el menu de herramientas, segruidad y establecer contraseña. Si yo trato de abrir la base de datos desde access con esta contraseña funciona.
Mira que coloque las siguientes instrucciones y me dice que no es una contraseña correcta:
Dim mBase1 As Database
Set mBase1 = OpenDatabase("C:/BASE.MDB",,,"PWD= 2001")
La contraseña la coloco desde
Access por el menu de herramientas, segruidad y establecer contraseña. Si yo trato de abrir la base de datos desde access con esta contraseña funciona.
1 Respuesta
Respuesta de ifuvaldes
1
Hola:
La observación que me hiciste de colocar PWD een minúsculas ya lo hice pero me sigue saliendo el error.
La observación que me hiciste de colocar PWD een minúsculas ya lo hice pero me sigue saliendo el error.
Te pego a continuación el código de una aplicación real que está funcionando con password:
FileBase = App.Path & "\MediosDePago.Par"
Set BaseDeDatos = OpenDatabase(FileBase, True, False, ";pwd=AURRERA")
Parece que necesita un ";" delante de pwd. Prueba con eso
FileBase = App.Path & "\MediosDePago.Par"
Set BaseDeDatos = OpenDatabase(FileBase, True, False, ";pwd=AURRERA")
Parece que necesita un ";" delante de pwd. Prueba con eso
