Proteger votre application par un mot de passe

Soyez le premier à donner votre avis sur cette source.

Snippet vu 4 170 fois - Téléchargée 38 fois

Contenu du snippet

Créez un nouveau Projet;

Mettez deux label, deux Zones de texte, et un Bouton pour annuler.

Mettez * dans Passewordchar du Propriété de la deuxième zone de texte pour crypter le mot de passe.

Mettez ce Code dans la première zone de texte :

Private Sub Text1_keyDown (KeyCode As Integer, Shift As Integer)

If KeyCode = 13 Then

'----------Teste pour éviter la Zone Vide ----

If Text1.Text = "" Then

Msgbox "Zone Obligatoire"

Else

If Text1.Text <> "Nom d'Utilisateur" Then

Msgbox "Nom Invalid"

Text1.Text = ""

Else

Text2.SetFocus

End If

End If

End If

End Sub

---------------------------------

Private Sub Text2_keyDown (KeyCode As Integer, Shift As Integer)

If KeyCode = 13 Then

'---------- Teste pour éviter la Zone Vide ----

If Text2.Text = "" Then

MsgBox "Zone Obligatoire"

Else

If Text2.Text <> "Mot de Passe" Then

MsgBox "Mot de Passe Invalide"

Text2.Text = ""

Else

Command1.SetFocus

End If

End If

End If

End Sub

Conclusion :


si vous avez un probleme vous pouvez contacter : jabraic@yahoo.fr
si vous voulez autres astucs consulter ma site web www.ifrance.com/visualbnet

A voir également

Ajouter un commentaire

Commentaires

Messages postés
3
Date d'inscription
vendredi 12 mars 2010
Statut
Membre
Dernière intervention
17 mai 2012

Bah moi ça m'affiche une erreur de syntaxe au niveau de If Text2.Text <> "Mot de Passe" Then
Comment doit je faire?
Messages postés
150
Date d'inscription
jeudi 24 janvier 2002
Statut
Membre
Dernière intervention
27 avril 2007

wai a la limite si tu crypte pas le pass, donne un nom du genre: form2, ou caption, ou text10.text, un truc pour masquer la total koi

rulzzzzz
Messages postés
6
Date d'inscription
jeudi 25 juillet 2002
Statut
Membre
Dernière intervention
19 août 2003

au passage un bon système de mot de passe ne précise pas en cas d'erreur d'où vien celle-ci (on met le message "login ou mot de passe invalide" dans tous les cas). Sinon ça donne des pistes et ça réduit les combinaisons ^^
Messages postés
150
Date d'inscription
jeudi 24 janvier 2002
Statut
Membre
Dernière intervention
27 avril 2007

ensuite tu déplace ton .exe vers le bloc note pour voir apparaitre en claire le loggin et le pass

good cracking :D

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.