Pensando em aumentar a segurança do meu BD em Access, resolvi colocar senha no banco através do menu "Ferramentas, Segurança, Senha", porém hoje em dia, muitos programas quebram a senha rapidíssimo.
Então resolvi criar uma macro no Bd que será ativada logo que o mdb for aberto. Neste caso, a macro deveria ser "autoexec".
Até aí, tudo bem!
Agora, preciso de uma rotina que peça uma nova senha para abrir o banco, caso senha inválida fechar o Microsoft Access.
Tipo:
----------------------------------------------------------
Dim senha as String
senha = inputbox("Digite a senha do BD")
If senha = "maisquesenha" Then
CONDIÇÃO_1:Abre o BD com visualização das tabelas
Else
CONDIÇÃO_2:Nem pode abrir a janela de visualização das tabelas e também deve fechar o Access
End If
----------------------------------------------------------
Alguém sabe fazer isso???
Muito Obrigado,
