[VB Net] saisir mot de passe
halima15
Messages postés
199
Statut
Membre
-
foxtrot01 Messages postés 30 Statut Membre -
foxtrot01 Messages postés 30 Statut Membre -
Bonsoir,
j'ai crée un textbox en vb.net pour que l'utilisateur saist son mot de passe
mais je veux lui donner juste 3 tenatives de le saisir erroné
mais le probleme c'est lorsque j'ai fait le traitement dans while ça marche pas il me donne pas le droit de resaisir le mot de passe encors une fois
voilà mon code
Dim n As String
cmd = oconn.CreateCommand
cmd.CommandText = "select MotDePasse from Formateur where numFormateur=" & num
n = cmd.ExecuteScalar()
Dim i As Integer
i = 3
While i <= 3 And i > 0
If n = MotPasse Then
ok = True
MsgBox("authentification avec succés")
Exit While
Else
ok = False
i -= 1
MsgBox("il vous reste " & i & " tentatives")
'MotPasse = txtMotPasse.Text
End If
End While
j'éspere que vous comprenez mon probleme et je vous souhaite bonne soirée
j'ai crée un textbox en vb.net pour que l'utilisateur saist son mot de passe
mais je veux lui donner juste 3 tenatives de le saisir erroné
mais le probleme c'est lorsque j'ai fait le traitement dans while ça marche pas il me donne pas le droit de resaisir le mot de passe encors une fois
voilà mon code
Dim n As String
cmd = oconn.CreateCommand
cmd.CommandText = "select MotDePasse from Formateur where numFormateur=" & num
n = cmd.ExecuteScalar()
Dim i As Integer
i = 3
While i <= 3 And i > 0
If n = MotPasse Then
ok = True
MsgBox("authentification avec succés")
Exit While
Else
ok = False
i -= 1
MsgBox("il vous reste " & i & " tentatives")
'MotPasse = txtMotPasse.Text
End If
End While
j'éspere que vous comprenez mon probleme et je vous souhaite bonne soirée
A voir également:
- [VB Net] saisir mot de passe
- Mot de passe - Guide
- Trousseau mot de passe iphone - Guide
- Mot de passe administrateur - Guide
- Mot de passe bios perdu - Guide
- Voir mot de passe wifi android - Guide
1 réponse
eh bon g une autre méthode pr ton bléme !
tu px ajouté un controle errorprovider
ds le boutoon valider tu tappe
dim rep as dialog result
if textbox1.text="user" and textbox2.text="password" then
dim f as new form
f.show()
else
errorprovider.seterror(testbox1."erreur")
errorprovider.seterror(testbox2."erreur")
end if
puis doubl click sur t1 é t2 tu tape
errorprovider.seterror(sender,"")
tu px ajouté un controle errorprovider
ds le boutoon valider tu tappe
dim rep as dialog result
if textbox1.text="user" and textbox2.text="password" then
dim f as new form
f.show()
else
errorprovider.seterror(testbox1."erreur")
errorprovider.seterror(testbox2."erreur")
end if
puis doubl click sur t1 é t2 tu tape
errorprovider.seterror(sender,"")
