Bienvenue! Identification Créer un nouveau profil

Recherche avancée

[AC07] comment mettre un password sur un formulaire

08/09/12 15:03
bonjour je suis débutant sur le forum, je ne sais pas si je suis au bon endroit pour poser une question.
J'ai créé une appli, avec 2 formulaires et une macro autoexec.
le but de ma question est :
Dans le formulaire 1 j'ai un bouton qui me donne acces au formulaire 2
j'aimerai protéger par un mot de passe le formulaire 2 par une boite de dialogue appellée frm Password
jusque là ca va mais quand je clic sur le bouton ok ou annuler de mon formulaire frm password, rien ne se passe. Meme pas la commande docmd.close
quelqu'un a t'il une réponse merci

Option Compare Database

Private Sub btnAnnuler_Click()
On Error GoTo Err_cmdCloseForm_Click

DoCmd.RunCommand acCmdSaveRecord
DoCmd.Close

Exit_cmdCloseForm_Click:

End Sub

Private Sub btnOK_Click()
If IsNull(Me.txtMotDePasse) Then
MsgBox "Tapez un mot de passe !", vbInformation
Me.txtMotDePasse.SetFocus
Exit Sub
End If

If Me.txtMotDePasse = "123" Then
' Fermer la boîte de dialogue "Identification"
DoCmd.Close
blnPasswordOK = True
Else
MsgBox "Mot de passe incorrect.", vbExclamation
Me.txtMotDePasse.SetFocus
End If
End Sub

Private Sub Form_Open(Cancel As Integer)
' Réinitialiser l'état du mot de passe
' (blnPasswordOK est une variable globale)
blnPasswordOK = False
End Sub
SujetAuteurEnvoyé le

[AC07] comment mettre un password sur un formulaire

djack791708/09/12 15:03

[AC07] Re: comment mettre un password sur un formulaire

Hervé Inisan08/09/12 16:12

Seuls les utilisateurs enregistrés peuvent poster des messages dans ce forum.

Cliquez ici pour vous connecter