Paulo Gouvea
Membros-
Total de itens
5 -
Registro em
-
Última visita
Tudo que Paulo Gouvea postou
-
Bareta, tu acertou na mosca. Muito obrigado pela ajuda, espero que isso possa ajudar a muitos internaltas que como eu buscava essa solução.
-
Rafael, tem mais alguma dica que possa me dar. Estou num beco sem saída.... Amigos internaltas, alguém pode me ajudar?
-
Rafael estou usando IIS para testar o script e o banco está fechado. Testei também o script hospedado na NET. Em ambos os casos não funcionou! Agradeço seu interesse e ajuda.
-
Dim CNN Set CNN = Server.CreateObject("ADODB.Connection") senha = "123456" vPath = "..\restrito\xxxxx.mdb" pPath = Server.MapPath( vPath ) 'Abrindo em mode exclusivo CNN.Mode = adModeShareExclusive 'Abrindo um banco de dados cuja senha é 123456 CNN.Open = "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=" & pPath & ";" & "JET OLEDB:Database Password=" & senha & ";" 'Alterando a senha de 123456 para 12 CNN.Execute "ALTER Database Password 12 123456 O código correto é esse. O erro apontado é o seguinte: "Não é possível alterar a senha em um banco de dados aberto compartilhado."
-
Olá pessoal, estou com problemas para alterar a senha do banco de dados access utilizando um script em ASP. Achei na Net esse script e não funcionou! Agradeço qualquer ajuda dos amigos internaltas. Dim CNN Set CNN = Server.CreateObject("ADODB.Connection") senha = "123456" vPath = "..\restrito\xxxxx.mdb" 'Abrindo em mode exclusivo CNN.Mode = adModeShareExclusive 'Abrindo um banco de dados cuja senha é 123456 CNN.Open = "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=" & pPath & ";" & "JET OLEDB:Database User ID=" & "admin" & "; Password=" & senha & ";" 'Alterando a senha de 123456 para 12 CNN.Execute "ALTER Database Password 12 123456" Onde estou errando?...