ASP -Instanz -Tutorial In diesem Artikel wird Ihnen eine zufällige Zeichenfolge erstellt. In diesem Beispiel wird die 13 -zufällige Zeichenfolge erstellt.
<html>
<title>
Student Start String www.vevb.com </title>
<body>
<%
Funktion Gen_key (Ziffern)
'Definition und initialisieren Sie das Array
Dim char_array (80)
'Initialisierungsnummer
Für i = 0 bis 9
char_array (i) = cstr (i)
Nächste
'Initialisierung von Großbuchstaben
Für i = 10 bis 35
char_array (i) = chr (i + 55)
Nächste
'Initialisieren Sie einen Kleinbuchstabenbuchstaben
Für i = 36 bis 61
char_array (i) = chr (i + 61)
Nächste
Timer randomisieren 'Initialisieren Sie den Zufallszahlengenerator.
Tun, während Len (Ausgabe) <Ziffern
Num = char_aray (int ((62-0 + 1) * rnd + 0))
Ausgabe = Ausgabe + Num
Schleife
'Setzen Sie den Rückgabewert
Gen_key = output
Endfunktion
'Gibt das Ergebnis in den Browser zurück
Antwort. Schreiben Sie die dreizehn zufällige Zeichenfolge, die durch diese Instanz generiert wird::
response.write <center>
Antwort.Write Geen_key (13)
response.write </center>
%>
</body>
</html>