mgenay:technique:generateur_de_mots_de_passe_28vbscript_29
genpwd.vbs
lettres = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789=$#&-+!" nLettres = Len(lettres) pwd = "" randomize for i = 1 to 12 car = int(nLettres * rnd + 1) pwd = pwd + Mid(lettres,car,1) next 'On aurait pu mettre des controles comme "au moins 2 caractères spéciaux", mais 'mettre des contraintes sur le mot de passe ne le rend pas plus sûr, au contraire ! '(c'est un des enseignement de l'histoire en cryptographie) 'affiche le mot de passe Inputbox "","Generated Password",pwd
mgenay/technique/generateur_de_mots_de_passe_28vbscript_29.txt · Last modified: by 127.0.0.1