FelipeSagres 19/8/2011, 04:04
Naldo boa noite
Tenho um BD em 2003 que fiz da seguinte maneira:
Criei um formulário com uma caixa de texto simples, não acoplada, e com um botão confirmar.
Dentro deste botão confirmar, coloquei o código abaixo e funcionou:
____________________________________________________________________
Private Sub cmdConfirmaSenha_Click()
If txtSenha.Value = "(Colocar a senha que quiser)" Then
DoCmd.OpenForm "(Abrir o formulário principal)"
DoCmd.Close acForm, Me.Name
Else
MsgBox "Senha incorreta!", vbInformation, TIT
DoCmd.Close acForm, Me.Name
End If
End Sub
___________________________________________________________________
Antes apenas coloque o Formulário de senha em uma macro autoexec, por exemplo.
Espero que ajude.