Visites

   visiteurs

   visiteurs en ligne

Sujet n°161 MotDepasse
    par Skipyjp le 24/07/2008 : 21:02

Salut pierretongue, la c'est pour une question,lol j'ai un formulaire MotDePasse donc voici le code!!!

Private Sub OK_Click()
Dim stDocName As String
If Me.Secret <> "margarine" Or IsNull(Me.Secret) Then
MsgBox "Mot de Passe non valide", vbCritical, "Erreur de saisie !"
DoCmd.Close
Exit Sub
Else
DoCmd.Openform "Menusag"
End If
End Sub

 

Est t'il possible d'utiliser le même formulaire, avec d'autre mot de passe et ouvrant d'autre formulaire?

La j'ai juste un mot de passe pour ouvrir un formulaire, et je voudrait éviter de crée trop de formulaire mot de passe!!!

Dans l'attente bien cordialement!SKIP

 

 


Réponse n° 1 par 3stone le 25/07/2008 : 02:45
Bonjour,

En laissant de coté le niveau de sécurité apporté par un tel système de mot de passe, la méthode souhaitée est assez simple.

Regarde bien les paramètres de la commande "OpenForm", cela ressemble à :

  • DoCmd.OpenForm "NomForm", acNormal, , , , , "ce que tu veux"

que tu peux aussi écrire ainsi :

  • DoCmd.OpenForm "NomForm", acNormal, OpenArgs:="ce que tu veux"
pour éviter toutes ces virgules...

Comme argument "OpenArgs" tu peux soit transmettre le mot de passe que l'utilisateur devra saisir dans le formulaire "MotDePasse", soit transmettre le nom du formulaire à ouvrir.

Disons que tu choisis de transmettre le mot de passe, tu feras alors:

DoCmd.Openform "frmPASSE", OpenArgs:="margarine"

Dans le formulaire "frmPASSE", tu récupère l'argument...

Dim strMdP As String
strMdP = Me.OpenArgs

Maintenant, strMdP contient la chaîne "margarine" et il suffit de comparer à ce que saisi l'utilisateur.

Si tu choisi de transmettre le nom du formulaire comme argument, tu récupères encore cet argument comme indiqué, sauf que tu dois maintenant faire le test selon le nom du formulaire transmis.


Amicalement,
Pierre(3stone)



Réponse n° 2 par skipyjp le 25/07/2008 : 19:20

Salut,tongue merci pour la réponse, je vais pouvoir en tiré un profit, et encore super pour ton forum!!!

Amicalement,Skipwink

[ Retour à la liste des sujets ]

Recherche



Préférences

Se reconnecter
---

Votre nom (ou pseudo) :

Votre code secret


 Nombre de membres 1 membre


Connectés :

( personne )

Haut