Mots de passe

Fermé
vinvinsylvain Messages postés 36 Date d'inscription dimanche 8 octobre 2006 Statut Membre Dernière intervention 12 mars 2010 - 3 août 2008 à 11:32
lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 - 3 août 2008 à 18:25
Bonjour,

Voici mon code (pour openoffice)

if inputbox("Veuillez saisir votre Mot de passe administration?", 0, "***********************")<> "050505" then 'then end
MsgBox ("Mode Admin Activer")
else
MsgBox ("Qui que tu sois , tu n'es pas autorisé : ")
end if


quelqu'un peut m'aider sur ce code? j'aimerai que si on ne tape pas le bon mots passe apparaise un MsgBox avec comme message "Qui que tu sois , tu n'es pas autorisé " et si on tape le bon code apparaise un MsgBox avec comme message "Mode admin activé"

Merci d'avance

1 réponse

lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 193
3 août 2008 à 18:25
Bonjour,
Tu fais l'inverse...

    if inputbox("Veuillez saisir votre Mot de passe administration?", 0, "***********************")= "050505"  then 
        MsgBox ("Mode Admin Activer") 
    else 
        MsgBox ("Qui que tu sois , tu n'es pas autorisé : ") 
        application.Close 'le End n'est jamais conseillé.
   end if

A+
1