<%
'*******************************
«Fonction: générateur (longueur)
'Paramètres: longueur, valeur de longueur arbitraire, nombre de chiffres de code aléatoires
'Auteur: Alixi
'Date: 2007/7/15
'Description: générer des fonctions de code aléatoire de toute longueur d'anglais + chiffre
'Exemple: générateur (80)
'*******************************
FonctionNenerator (longueur)
Dimi, Temps
Temps = "ABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890"
Générateur = ""
Ifisnumeric (longueur) = falsethhen
Sortie
Endire
Fori = 1tolegle
Randomiser
Générateur = générateur et mid (Temps, int ((len (temps) * rnd) +1), 1)
Suivant
Finition de fin
%>