|
|
|
|
|
Dicas
|
|
Visual Basic (Banco de Dados)
|
|
|
Título da Dica: Alterando a senha no Microsoft Access
|
|
|
|
Postada em 9/8/2004 por Rochª
No exemplo é considerado a senha (atual) como 123 e a nova 321. Note que voce deve ter a senha atual para que a alteracao possa ser feita. O arquivo tambem deve ser aberto em modo exclusivo.
Private Sub Command1_Click() Dim db As Database
Set db = OpenDatabase("Banco.MDB", True, False, ";pwd=123") 'note que a base deve ser aberta como exclusiva 'alterando a senha atual (123) para "NewPass" db.NewPassword "123", "321" End Sub
Rochª
|
|
|
|
|