Diese Methode ist gut. Sie kann eine zufällige Folge von Kleinbuchstaben und Zahlen erzeugen. Sie können einige Sonderzeichen und einige Großbuchstaben usw. hinzufügen. '***********************************
'asp berechnet Zufallszahlen
'***********************************
Funktion randomStr(intLength)
Dim strSeed, seedsLength, pos, Str, i
strSeed = abcdefghijklmnopqrstuvwxyz1234567890
SeedLength = Len(strSeed)
Str =
Randomisieren
Für i = 1 bis intLength
Str = Str + Mid(strSeed, Int(seedLength * Rnd) + 1, 1)
Nächste
randomStr = Str
Funktion beenden