Como alterar uma senha de banco de dados do Access

Traduções deste artigo Traduções deste artigo
ID do artigo: 170961 - Exibir os produtos aos quais esse artigo se aplica.
Expandir tudo | Recolher tudo

Sumário

Microsoft Access 7.0 e 97 arquivos MDB podem ser protegida por senha. Este artigo demonstra como alterar a senha associada com um Microsoft Access 7.0 ou 97 arquivo MDB.

Mais Informações

Microsoft Access 7.0 e 97 usam Jet 3.0 e arquivos MDB do Jet 3.5, respectivamente. Para o código a seguir para funcionar corretamente, você deve ter uma referência a uma biblioteca de objetos DAO de Microsoft apropriada.

A senha de banco de dados pode ser alterada usando o método NewPassword. O exemplo a seguir altera a senha de banco de dados o MyDB.mdb de "MyPassword1" para "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
				

O código acima não manipula a possibilidade de tentar abrir o banco de dados com a senha incorreta, geraria um erro. Cada aplicativo que tenta abrir bancos de dados protegido por senha deve ser capaz de lidar com esse cenário.

Para remover a proteção por senha de um banco de dados, use uma seqüência de caracteres vazia para o segundo parâmetro do método NewPassword. Por exemplo:
   Db.NewPassword "MyPassword2", ""
				

Para atribuir uma senha de banco de dados para um MDB que está sem uma senha, use uma seqüência de caracteres vazia para o primeiro parâmetro do método NewPassword. Por exemplo:
   Db.NewPassword "", "MyPassword1"
				



Você também pode alterar, atribuir ou remover uma senha de banco de dados usando o método CompactDatabase. Ao usar esse método em um banco de dados com uma senha, os argumentos opcionais devem ser fornecidos:
   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
				

O novo banco de dados possui a mesma senha como o antigo. Aqui você compacta um MDB com a senha "MyPassword1" e forneça uma senha de "MyNewPWD" novo banco de dados:
   DBEngine.CompactDatabase "C:\My Documents\Test.mdb", _
      "C:\My Documents\TestII.MDB", dbLangGeneral & ";pwd=MyNewPWD", _
      dbVersion30, ";pwd=MyPassword1"
				

Com esta linha, você pode remover a senha de banco de dados:
   DBEngine.CompactDatabase "C:\My Documents\TestII.mdb", _
      "C:\My Documents\TestIII.MDB", dbLangGeneral & ";pwd=", _
      dbVersion30, ";pwd=MyNewPWD"
				

Essa linha compacta um banco de dados sem uma senha e atribui uma senha de "NewPassword" para o novo banco de dados:
   DBEngine.CompactDatabase "C:\My Documents\TestIII.mdb", _
     "C:\My Documents\TestIV.mdb", dbLangGeneral & _
     ";pwd=NewPassword", dbVersion30
				

Propriedades

ID do artigo: 170961 - Última revisão: sábado, 20 de janeiro de 2007 - Revisão: 4.4
A informação contida neste artigo aplica-se 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 de 32 Bits Enterprise Edition
  • Microsoft Access 95 Standard Edition
  • Microsoft Access 97 Standard Edition
Palavras-chave: 
kbmt kb32bitonly kbhowto KB170961 KbMtpt
Tradução automática
IMPORTANTE: Este artigo foi traduzido por um sistema de tradução automática (também designado por Machine Translation ou MT), não tendo sido portanto traduzido ou revisto por pessoas. A Microsoft possui artigos traduzidos por aplicações (MT) e artigos traduzidos por tradutores profissionais, com o objetivo de oferecer em português a totalidade dos artigos existentes na base de dados de suporte. No entanto, a tradução automática não é sempre perfeita, podendo conter erros de vocabulário, sintaxe ou gramática. A Microsoft não é responsável por incoerências, erros ou prejuízos ocorridos em decorrência da utilização dos artigos MT por parte dos nossos clientes. A Microsoft realiza atualizações freqüentes ao software de tradução automática (MT). Obrigado.
Clique aqui para ver a versão em Inglês deste artigo: 170961

Submeter comentários

 

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