Esta publicación recopilará y solicitará las funciones funcionales generales más completas en las aplicaciones de programación ASP, todos son para mí, soy para todos :)
Mientras cada uno de ustedes entregue una o dos funciones generales clásicas que haya recopilado durante mucho tiempo, creo que esta publicación será de gran ayuda para muchos entusiastas y trabajadores de la programación ASP, y también se convertirá en un conjunto necesario de funciones para la programación ASP de todos.
Consulte su propia biblioteca de funciones rápidamente y vea si tiene alguno de nosotros aquí.
Si encuentra que hay una o dos funciones poco conocidas en su biblioteca de funciones, responda en el siguiente formato.
Publicar un formato de publicación de función general:
La copia del código es la siguiente:
<%
'**********************************
'Función: functionRndip (s)
'Parámetro: S, cuatro encabezados IP generados al azar, como "218 $ 211 $ 61 $ 221"
'Autor: Alixi
'Fecha: 2007/7/12
'Descripción: generación de direcciones IP aleatorias, devuelve un valor de dirección IP aleatoria
'Ejemplo: <%= rndip ("218 $ 211 $ 61 $ 221")%>
'**********************************
FunctionRndip (s)
onerrorResumEnext
Dimip, IP1, IP2, IP3, A, B, C
ifs = "" orubund (dividido (s, "$")) <> 3
Response.write "La configuración de parámetros de prefijo IP es incorrecta, vuelva para reiniciar el programa después de restablecer".
respuesta.
endif
Aleatorizar
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)
Función final
%>
Filtrar caracteres ilegales de uso común
La copia del código es la siguiente:
<%
'**********************************
'Función: ReemplazarBADChar (strchar)
'Argumentos: strchar, caracteres que se filtrarán
'Autor: Alixi
'Fecha: 2007/7/12
'Descripción: Filtrado de caracteres ilegales de uso común
'Ejemplo: <%= reemplazarbadchar ("contiene'*ejemplo ')%>
'**********************************
functionReplaceBadchar (strchar)
ifstrchar = "" entonces
Reemplazarbadchar = ""
demás
Reemplazarbadchar = reemplazar (reemplazar (reemplazar (reemplazar (reemplazar (reemplazar (reemplazar (reemplazar (reemplazar (reemplazar (strchar, "" "," "),"*"," "),"? "),"? ")," <"," ")," <"," ",", ","), ".", ""), ")," "") ")") ")") ")") ")") ")") ")") ")") ")") ")
endif
Función final
%>
Formato de visualización de caracteres HTML
La copia del código es la siguiente:
<%
'**********************************
'Función: htmlencode (FString)
'Argumentos: FString, cadena para formatearse
'Autor: Alixi
'Fecha: 2007/7/12
'Descripción: Formato de visualización de caracteres HTML
'Ejemplo: <%= htmlencode (fString)%>
'**********************************
functionHtmlencode (FString)
ifnotisnull (fString) entonces
fString = reemplazar (fString, ">", ">")
fString = reemplazar (fString, "<", "<")