bierataise
Messages postés55Date d'inscriptionmardi 28 juin 2005StatutMembreDernière intervention 4 mai 2006
-
13 juil. 2005 à 17:26
Microsux
Messages postés19Date d'inscriptionmercredi 14 mai 2003StatutMembreDernière intervention 1 septembre 2009
-
14 juil. 2005 à 14:46
J'ai un soucis, mon mot de passe ne fonctionne pas c'est à dire que quelque soit le mot de passe que je rentre il me renvoit le message d'erreur.
Si quelqu'un peut m'aider je ne vois pas comment faire.Merci
Option Explicit
Dim txtPassword as string
Dim compilation as string
Public LoginSucceeded as boolean
Private Sub Confirmer_Click()
' Vérifie si le mot de passe est correct
If txtPassword="chien" then
'placer le code ici pour signaler à la procédure appelante la réussite de la fonction
LoginSucceeded =True
Me.Hide
Else
MsgBox"Mot de passe non valide,réessayer!",,"Connexion"
SendKeys"{Home}+{End}"
End if
End sub
Private Sub Quitter_Click()
'Affecte la valeur faux à la variable globale pour indiquer l'echec de la connection
LoginSucceeded =false
Me.Hide
End Sub
cs_simon22
Messages postés161Date d'inscriptionvendredi 8 octobre 2004StatutMembreDernière intervention20 août 2015 13 juil. 2005 à 18:04
salut
alors sa me semble normal tu vois tu a déclarée une variable que tu
ne touche jamais dans ton code txtPassword = 0 car tu ne lui
donne jamais de valeur tu devrai enlever la déclaration apeller ta text
boxe txtPassword sa devrai marcher aprés tu poura modifier mais le
principe est la
Microsux
Messages postés19Date d'inscriptionmercredi 14 mai 2003StatutMembreDernière intervention 1 septembre 2009 14 juil. 2005 à 14:46
ou affecte la valeur saisie par ton user dans la textbox a ta variable avant de la tester!!
tatextebox.text = txtpassword
Meme si c ridicule et qu'il est logique de directement tester la valeur de la textbox