Nach dem Zufallsprinzip generieren Sie das Benutzerkennwort (gut), Anweisungen: Durch zufälliges Passwort und dann das Passwort per E -Mail an den registrierten Benutzer senden, können Sie bestätigen, ob die E -Mail des Benutzers korrekt ausgefüllt ist.
Hinweis: Wenn Sie zufällig ein Kennwort generieren und das Passwort per E -Mail an den registrierten Benutzer senden, können Sie bestätigen, ob die E -Mail des Benutzers korrekt ausgefüllt ist. Automatisch generierte Passwörter sind in der Regel sicherer und gleichzeitig können Sie ungültige Benutzer herausfiltern.
Speichern Sie den folgenden Code als random.asp -Datei:
Die Codekopie lautet wie folgt:
<%
Substrrandomisieren (Strenge)
Dimi, NSEED
NSEED = CLNG (0)
FORI = 1TOLEN (STREED)
NSEED = NSEEDXOR ((256*((i-1) mod4)*ASCB (MID (STREED, I, 1))))
Nächste
Randomizseed
Ende
FunctionGeneratePassword (NLength)
Dimi, BMADECONANT, C, NRND
ConststrdoubleConantants = "Bdfglmnpst"
Conststrconsonants = "bcdfghklmnpqrstv"
Conststrvocal = "aeiou"
GeneratePassword = ""
BMADECONANT = FALSE
Fei = 0TonLength
nrnd = rnd
IfgeneratePassword <> "" und (bmadeconant <> true) und (nrnd <0,15) dann
C = MID (strdoubleconantants, int (len (strdoubleconantant)*rnd+1), 1)
C = C & c
i = i+1
BMADECONANT = TRUE
Anders
If (bmadeconant <> true) und (nrnd <0,95) dann
C = Mid (Strconsonants, int (Len (Strconsonants)*Rnd+1), 1), 1)
BMADECONANT = TRUE
Anders
C = MID (Strvocal, int (Len (Strvocal)*Rnd+1), 1)
BMADECONANT = FALSE
Endif
Endif
GeneratePassword = generatePassword & c
Nächste
Iflen (generatePassword)> nLengththen
GeneratePassword = links (generatePassword, nLength)