Кода -копия выглядит следующим образом:
<%
'-------------------------------------
'Tianfeng ASPCLASSV1.0, интегрирует обычно используемые функции ASP
'Tianfeng Copyright http://www.52515.net
QQ: 76994859Email: [email protected]
'Все имена функций следующие:
'Strlength (str) получает длину строки
'Cutstr (str, strlen) длина струны разреза
'CheckIsempty (TSTR) проверяет, пусто ли он
'Isinteger (PARA) Целый тест
'CheckName (Str) Имя проверки символов
'CheckPassword (Str) Проверка пароля
'Проверка формата почтового ящика CheckEmail (электронная почта)
'Alert (MSG, GOURL) Диалоговое окно всплывающее окно
'Goback (str1, str2, isback) сообщение об ошибке
'SUC (Str1, STR2, URL)
'Chkpost () обнаруживает, следует ли отправить форму за пределами сайта
'Psql () предотвращает инъекцию SQL
'Filtratehtmlcode (str) предотвращает генерацию HTML
'Htmlcode (str) фильтр html
'Replyhtml (tstr) Clear Html
'Getip () получает IP клиента
'GetBrowrowser получает сообщение о браузере клиента
'GetSystem получает операционную систему клиента
'Geturl () Получает текущий URL -адрес страницы содержит параметры
'Curl () получает текущий URL -адрес страницы
'Getextend Получает расширение файла
'Ceckexist (Table, FieldName, FieldContent, ISBLUR) обнаруживает, существует ли содержание поля в определенной таблице
'Getnum (таблица, FieldName, ResultType, Args) обнаруживает, сколько полей есть в определенной таблице, максимальное значение, минимальное значение и т. Д.
'GetFolderSize (FOLDERPATH) вычисляет размер определенной папки
'GetFilesize (имя файла) вычисляет размер файла
'Isobjinstalled (strclassstring) проверяет, установлен ли компонент
'Sendmailjmail Отправить почту
«Ответкуки пишут куки
'Cleancookies Clear Cookies
'GetTimeOver получает время выполнения страницы программы
'Форматизация форматирования размера
'Formattime Format
«Зодиак получает зодиак»
«Созвездие для получения созвездия
'-------------------------------------
Classcls_fun
'----------------------------------------- �
'*******************************************************
'Имя функции: strlength
'Функция: Получите длину строки (китайские символы 2)
'Аргументы: Str ----- Строковой содержимое
'Возвращаемое значение: длина строки
'*******************************************************
Publicfunctionstrlength (str)
Dimrep, объектив, я