Generateur de mot de passe

Soyez le premier à donner votre avis sur cette source.

Snippet vu 10 507 fois - Téléchargée 30 fois

Commenter

Contenu du snippet

un petit vbscript qui crée un mot de passe de 8 car (ou plus) avec des Majuscules des minuscules et des chiffres. Histoire de comprendre les fonctions RND et CHR.
pô super compliqué mais utile pour ceux qui veulent pas se prendre le crâne :D

Source / Exemple : 


'Initialise les variables
dim maj
dim min
dim chi

'boucle pour le nombre de caracteres
for i = 1 to 8 

	'remet les variables à zero
	maj = ""
	min = ""
	chi = ""

	'initialise le nombre aleatoire
	randomize

	'définit le type 1/maj 2/min 3/chiffre
	type_car = int((3 - 1 + 1) * rnd + 1)

	'msgbox type_car

	'selectionne le type
	select case type_car

		'les limites sont fixés par la table de caracteres ANSI
		case 1 'Majuscule
			randomize
			maj = int((90 - 65 + 1) * rnd + 65)
			'msgbox "maj : " & chr(maj) & "/" & maj

			code = code & chr(maj)' & "/"

		case 2 'Minuscule
			randomize
			min = int((122 - 97 + 1) * rnd + 97)
			'msgbox "min : " & chr(min) & "/" & min
			code = code & chr(min)' & "/"

		case 3 'Chiffre
			randomize
			chi = int((57 - 48 + 1) * rnd + 48)
			'Msgbox "Chi : " & chr(chi) & "/" & chi
			code = code & chr(chi)' & "/"
	
		case else 'au cas ou

	end select

next

'affiche le code
msgbox code

Conclusion :


:D

A voir également

Ajouter un commentaire Commentaires
jnicofo Messages postés 2 Date d'inscription dimanche 25 janvier 2009 Statut Membre Dernière intervention 25 janvier 2009
25 janv. 2009 à 18:19
si non comment puije faire pour trouver un passwoord msn g besoin de vos lumiere un grand merci davance
jnicofo Messages postés 2 Date d'inscription dimanche 25 janvier 2009 Statut Membre Dernière intervention 25 janvier 2009
25 janv. 2009 à 18:17
salut a tous marche til pour msn aussi
Thalyee Messages postés 26 Date d'inscription mardi 22 octobre 2002 Statut Membre Dernière intervention 14 mai 2006
25 oct. 2005 à 19:25
Impec en adaptant à ce que je voulais Maj et Chiff et hop l'affaire
est réglée
Merci 9/10
tekila_bandita Messages postés 248 Date d'inscription mercredi 15 juin 2005 Statut Membre Dernière intervention 15 mars 2007 33
18 août 2005 à 10:59
Je trouve bien pour débuter...
9/10
cs_spawn Messages postés 8 Date d'inscription mercredi 26 décembre 2001 Statut Membre Dernière intervention 28 mai 2005
28 mai 2005 à 08:23
tu ne peux pas faire ça car le random renvoie un chiffre et non une chaine de caractères ce qui renvoie le lettre est la fonction chr() qui convertit le chiffre de random en lettre (grâce à sa valeur ASCII)
de plus si tu le fais en VBScript de mémoire il s'en fout que tu mettes du string ou de l'interger ou ce que tu veux il change de type à chaque variable que tu passes.
En revanche si tu le fais en VB tentes plutôt de l'integer.

voilà :D
S'inscrire maintenant

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.

Du même auteur (cs_spawn)