USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  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
 


CyberWEB Network Ltda.    © Copyright 2000-2021   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página