Possibilité 2taper un pwd ne depasse pa 3fois

ena87 Messages postés 1 Statut Membre -  
 Utilisateur anonyme -
Bonjour,
je suis entrain de développer une petite application par vb.net et je veux que la possibilité d'entrer un mot de passe erroné dans un textbox ne sera pas répéter plus que 3 fois
et par suite l'application sera fermée automatiquement
et que à chaque mot de passe erroné un msgbox s'affiche indiquant que le pwd est erronée
j'ai réussi à faire ca mais quand je tape un pwd erroné 3 msgbox s'affiche en mm temps
j'ai pas eu le temps de retaper le pwd une 2éme et une 3éme fois
je veut un aide S.V.P pour ce pb
merci d'avance :))

3 réponses

  1. Utilisateur anonyme
     
    Salut crée une variable que tu incrémente de + 1 a chaque erreur ;

    tu test si la condition est égale a 3 alors tu quittes, sinon tu incrémente de + 1

    jusqu'a que ta variable soit égale a trois
    0
  2. Alkaaran Messages postés 291 Statut Membre 37
     
    Met en place un compteur, je ne connais pas plus que ca la syntaxe VB.Net (je suis encore au VB6 -_-) mais en algorithme tu peux faire ca :

    Dim compteur As integer
    compteur = 0

    Do
    \tIf compteur > 3 Then
    Application.Quit
    Else
    mdp = InputBox( "Entrez le mdp (" & (3 - compteur) & " essais restants)" )
    End If
    compteur = compteur + 1
    Loop Until mdp <> "mot_de_passe_bon"

    Un truc dans le genre... :)
    0
  3. Utilisateur anonyme
     
    j ai utiliser le code en vb6
    mais la méthode en dessous

    ****************************
    Static i As Integer
    rs.Open "select * from utilisateur where login='" & Trim(cbologin.Text) & "' and pw='" & Trim(txtpw.Text) & "'", cn
    If Not rs.EOF Then
    frmacceuil.Show
    Unload Me
    Else
    i = i + 1
    MsgBox "le login ou le mot de passe incorrecte"
    txtpw.Text = ""
    cbologin.SetFocus
    End If
    If i = 3 Then End
    rs.Close
    Set rs = Nothing
    **************************
    0