Cómo cambiar una contraseña de base de datos de Access

Seleccione idioma Seleccione idioma
Id. de artículo: 170961 - Ver los productos a los que se aplica este artículo
Expandir todo | Contraer todo

Resumen

Microsoft Access 7.0 y 97 de los archivos MDB pueden ser protegido por contraseña. En este artículo muestra cómo cambiar la contraseña asociada con un Microsoft Access 7.0 o archivo de Microsoft Access 97.

Más información

Microsoft Access 7.0 y 97 utilice Jet 3.0 y los archivos MDB de Jet 3.5, respectivamente. Para el código siguiente funcione correctamente, debe tener una referencia a una biblioteca apropiado de objetos de DAO de Microsoft.

Puede cambiar la contraseña de la base de datos mediante el método nuevaContraseña. En el ejemplo siguiente se cambia la contraseña de la base de datos de MyDB.mdb de "MyPassword1" a "MyPassword2":
   Sub ChangeDBPassword ()
      Dim Db As Database

      Set Db = OpenDatabase("C:\My Documents\MyDB.mdb",True, _
         False,";pwd=MyPassword1")
      Db.NewPassword "MyPassword1","MyPassword2"
      Db.Close
   End Sub
				

El código anterior no controla la posibilidad de intentar abrir la base de datos con la contraseña incorrecta, que se generaría un error. Cada aplicación que intenta abrir bases de datos protegida mediante contraseña debería poder controlar este escenario.

Para quitar la protección de contraseña de una base de datos, utilice una cadena vacía para el segundo parámetro del método nuevaContraseña. Por ejemplo:
   Db.NewPassword "MyPassword2", ""
				

Para asignar una contraseña de base de datos a una MDB que está actualmente sin una contraseña, utilice una cadena vacía para el primer parámetro del método nuevaContraseña. Por ejemplo:
   Db.NewPassword "", "MyPassword1"
				



Puede también cambiar, asignar o quitar una contraseña de base de datos utilizando el método CompactDatabase. Cuando se utiliza este método en una base de datos con una contraseña, se deben proporcionar los argumentos opcionales:
   Sub CompactDB ()
      ' Compact the database, supplying the password
      DBEngine.CompactDatabase "C:\My Documents\MyDB.mdb", _
         "C:\My Documents\Test.MDB", dbLangGeneral, dbVersion30, _
         ";pwd=MyPassword1"
   End Sub
				

La nueva base de datos tiene la misma contraseña como el antiguo. Aquí compactar una MDB con una contraseña de "MyPassword1" y asigne una contraseña de "MyNewPWD" a la nueva base de datos:
   DBEngine.CompactDatabase "C:\My Documents\Test.mdb", _
      "C:\My Documents\TestII.MDB", dbLangGeneral & ";pwd=MyNewPWD", _
      dbVersion30, ";pwd=MyPassword1"
				

Con esta línea, puede quitar la contraseña de la base de datos:
   DBEngine.CompactDatabase "C:\My Documents\TestII.mdb", _
      "C:\My Documents\TestIII.MDB", dbLangGeneral & ";pwd=", _
      dbVersion30, ";pwd=MyNewPWD"
				

Esta línea compacta una base de datos sin una contraseña y asigna una contraseña de "NuevaContraseña" a la nueva base de datos:
   DBEngine.CompactDatabase "C:\My Documents\TestIII.mdb", _
     "C:\My Documents\TestIV.mdb", dbLangGeneral & _
     ";pwd=NewPassword", dbVersion30
				

Propiedades

Id. de artículo: 170961 - Última revisión: sábado, 20 de enero de 2007 - Versión: 4.4
La información de este artículo se refiere a:
  • Microsoft Visual Basic 5.0 Learning Edition
  • Microsoft Visual Basic 5.0 Professional Edition
  • Microsoft Visual Basic 5.0 Enterprise Edition
  • Microsoft Visual Basic 4.0 Standard Edition
  • Microsoft Visual Basic 4.0 Professional Edition
  • Microsoft Visual Basic 4.0 32-Bit Enterprise Edition
  • Microsoft Access 95 Standard Edition
  • Microsoft Access 97 Standard Edition
Palabras clave: 
kbmt kb32bitonly kbhowto KB170961 KbMtes
Traducción automática
IMPORTANTE: Este artículo ha sido traducido por un software de traducción automática de Microsoft (http://support.microsoft.com/gp/mtdetails) en lugar de un traductor humano. Microsoft le ofrece artículos traducidos por un traductor humano y artículos traducidos automáticamente para que tenga acceso en su propio idioma a todos los artículos de nuestra base de conocimientos (Knowledge Base). Sin embargo, los artículos traducidos automáticamente pueden contener errores en el vocabulario, la sintaxis o la gramática, como los que un extranjero podría cometer al hablar el idioma. Microsoft no se hace responsable de cualquier imprecisión, error o daño ocasionado por una mala traducción del contenido o como consecuencia de su utilización por nuestros clientes. Microsoft suele actualizar el software de traducción frecuentemente.
Haga clic aquí para ver el artículo original (en inglés): 170961

Enviar comentarios

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com