|
|
|
|
|
|
|
|
Dicas
|
|
|
Visual Basic (Banco de Dados)
|
|
 |
Título da Dica: Alterando a senha do Access em ADO
|
 |
|
|
|
Postada em 26/12/2006 por ghost_jlp
Dim CNN As ADODB.Connection
Set CNN = New ADODB.Connection
'Abrindo em mode exclusivo
CNN.Mode = adModeShareExclusive
'Abrindo um banco de dados cuja senha é 123
CNN.Open "Provider=Microsoft.JET.OLEDB.4.0;Data Source=c:db1.mdb;Jet OLEDB:Database Password=123;"
'Alterando a senha de 123 para 12
CNN.Execute "ALTER Database Password 12 123"
A sintaxe é: ALTER DATABASE PASSWORD senhanova senhaAntiga
Para tirar a senha é só usar null, lembrando que sempre tem que abrir em modo exclusivo.
'Tirando a senha
CNN.Execute "ALTER Database Password NULL 123"
até a próxima :D
|
|
|
|
|
