Dieser Beitrag wird die umfassendsten allgemeinen funktionalen Funktionen in ASP -Programmieranwendungen sammeln und anfordern. Jeder ist für mich, ich bin für alle :)
Solange jeder von Ihnen ein oder zwei klassische allgemeine Funktionen ausgibt, die Sie schon lange gesammelt haben, denke ich, dass dieser Beitrag vielen ASP -Programmierbegeisterten und Arbeitnehmern von großer Hilfe sein wird und auch eine notwendige Funktion für die ASP -Programmierung aller für alle ist.
Überprüfen Sie Ihre eigene Funktionsbibliothek schnell und sehen Sie, ob Sie hier einen von uns haben?
Wenn Sie feststellen, dass in Ihrer Funktionsbibliothek ein oder zwei wenig bekannte Funktionen enthalten, antworten Sie im folgenden Format.
Veröffentlichen Sie ein allgemeines Funktionspostformat:
Die Codekopie lautet wie folgt:
<%
'*********************************
'Funktion: funktionsrndip (s)
'Parameter: S, vier zufällig generierte IP -Headers wie "218 $ 211 $ 61 $ 221"
'Autor: Alixi
'Datum: 2007/7/12
'Beschreibung: Zufällige IP -Adressgenerierung, geben Sie einen zufälligen IP -Adresswert zurück
'Beispiel: <%= Rndip ("218 $ 211 $ 61 $ 221")%>
'*********************************
Funktionsrndip (s)
onErrorresumeNext
Dimip, IP1, IP2, IP3, A, B, c
ifs = "" orrubund (split (s, "$") <> 3Then
Antwort.Write "Die Einstellung des IP -Präfix -Parameters ist falsch, bitte kehren Sie das Programm nach dem Zurücksetzen neu zu starten."
Antwort.end
Endif
Randomisieren
IP1 = Cint (254*RND)
IP2 = Cint (254*RND)
IP3 = Cint (254*RND)
b = int ((3*rnd) +1)
A = Split (s, "$")
c = a (b)
Rndip = (c & "." & Ip1 & "." & Ip2 & "." & Ip3)
Endfunktion
%>
Filter üblicherweise illegale Zeichen verwendet
Die Codekopie lautet wie folgt:
<%
'*********************************
'Funktion: Ersatzbadchar (Strary)
'Argumente: Strchar, Zeichen, die gefiltert werden müssen
'Autor: Alixi
'Datum: 2007/7/12
'Beschreibung: Filterung üblicherweise verwendete illegale Zeichen
'Beispiel: <%= Ersatzbadchar ("enthält'*Beispiel ')%>
'*********************************
FunktionReplacebadChar (Strary)
ifstrchar = "" dann
ErsetzenBadchar = ""
anders
ErsetzenBadchar = ersetzen (ersetzen (ersetzen (ersetzen (ersetzen (ersetzen (ersetzen) (ersetzen (strary, ",", ""), "*", ""), "?"? "),"), "<", ")," <",", ",", "").
Endif
Endfunktion
%>
Format HTML -Zeichenanzeige
Die Codekopie lautet wie folgt:
<%
'*********************************
'Funktion: htmlencode (fstring)
'Argumente: Fstring, String, die formatiert werden sollen
'Autor: Alixi
'Datum: 2007/7/12
'Beschreibung: Format HTML -Zeichenanzeige
Beispiel: <%= htmlencode (fstring)%>
'*********************************
functionHtmlencode (fstring)
ifnotisnull (fstring) dann
fstring = ersetzen (fstring, ">", ">")
fstring = ersetzen (fstring, "<", "<")