La copia del código es la siguiente:
<%
'－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
'Tianfeng ASPClassv1.0, integra funciones ASP de uso común
'Tianfeng Copyright http://www.52515.net
'QQ: 76994859Mail: [email protected]
'Todos los nombres de funciones son los siguientes:
'Strlength (str) obtiene la longitud de la cadena
'Cutstr (Str, Strlen) Corte de longitud de cadena
'CheckIsEmpty (TSTR) verifica si está vacío
'ISINTEGER (PAR) TEST INTEGER
'Nombre de checkname (STR) Verificación del personaje
'Verificación de contraseña de checkpassword (str)
'VERIFICACIÓN DEL FORMATO DEL TUJE DE CHECKEMAIL (CORREO ELECTRÓNICO) VERIFICACIÓN
'ALERT (MSG, GOURL) CUADRO DE CAPILLO DE POMENTES
'Mensaje de error de Goback (STR1, STR2, Isback)
'SUC (STR1, STR2, URL) Operación Información de éxito de éxito
'Chkpost () detecta si enviar un formulario fuera del sitio
'Psql () previene la inyección de SQL
'Filtratehtmlcode (str) previene la generación HTML
'Htmlcode (str) filtro html
'Reemplazarhtml (tstr) transparente html
'Getip () obtiene la IP del cliente
'GetBrowser recibe el mensaje del navegador del cliente
'GetSystem obtiene el sistema operativo del cliente
'GetUrl () obtiene la URL de la página actual contiene parámetros
'Curl () obtiene la URL de la página actual
'GetExtend obtiene la extensión del archivo
'Checkexist (Table, FieldName, FieldContent, Isblur) detecta si existe el contenido de un campo en una determinada tabla
'GetNum (Tabla, FieldName, Resulttype, Args) detecta cuántos campos hay en una determinada tabla, valor máximo, valor mínimo, etc.
'GetFoldersize (FolderPath) calcula el tamaño de una carpeta determinada
'GetFilesize (nombre de archivo) calcula el tamaño de un archivo
'Isobjinstalled (strclassString) verifica si el componente está instalado
'Sendmailjmail envía correo
'Responsecookies escribe cookies
'Cleancookies transparentes cookies
'GetTimeOver obtiene la hora de ejecución de la página del programa
'Formatizar el formato de tamaño
'Formato de tiempo de formato
'El zodiaco obtiene el zodiaco
'Constelación para obtener constelación
'－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
ClassCLS_FUN
'－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－ �
'************************************************************
'Nombre de la función: strlength
'Función: obtenga la longitud de la cadena (los caracteres chinos son 2)
'Argumentos: Str ----- Contenido de cadena
'Valor de retorno: longitud de cadena
'************************************************************
PublicFunctionsTrlength (STR)
Dimrep, lente, yo