Salinan kode adalah sebagai berikut:
<%
'-------------------------------------
'Tianfeng aspclassv1.0, mengintegrasikan fungsi ASP yang umum digunakan
'Tianfeng Hak Cipta http://www.52515.net
'QQ: 76994859EMail: [email protected]
'Semua nama fungsi adalah sebagai berikut:
'Strlength (str) mendapatkan panjang string
'Cutstr (strlen, strlen) Panjang string
'Checkisempty (tstr) memeriksa apakah itu kosong
Tes Integer 'ISinteger (PARA)
Verifikasi karakter 'checkname (str)
Verifikasi kata sandi 'checkpassword (str)
'Checkemail (email) Verifikasi Format Kotak Surat
'Peringatan (msg, gourl) Prompt kotak dialog pop-up
Pesan kesalahan 'GOBLE (STR1, STR2, ISBACK)
'SUC (STR1, STR2, URL) Informasi Informasi Keberhasilan Operasi
'Chkpost () mendeteksi apakah akan mengirimkan formulir di luar situs
'PSQL () mencegah injeksi SQL
'FiltratehtmlCode (STR) mencegah generasi HTML
'Htmlcode (str) filter html
'Ganti html (tstr) hapus html
'Getip () mendapatkan IP klien
'GetBrowser Mendapat Pesan Browser Klien
'GetSystem mendapatkan sistem operasi klien
'GetUrl () Mendapat URL halaman saat ini berisi parameter
'Curl () Mendapat URL halaman saat ini
'Getextend mendapatkan ekstensi file
'Checkexist (Table, FieldName, FieldContent, Isblur) mendeteksi apakah konten bidang dalam tabel tertentu ada
'GetNum (Tabel, FieldName, HasilType, ARGS) mendeteksi berapa banyak bidang yang ada dalam tabel tertentu, nilai maksimum, nilai minimum, dll.
'GetFoldersize (folderpath) menghitung ukuran folder tertentu
'GetFilesize (nama file) menghitung ukuran file
'Isobjinstalled (strclassString) memeriksa apakah komponen dipasang
'Sendmailjmail mengirim surat
'ResponseCookies Menulis cookie
'CleanCookies Clear Cookies
'GetTimeover mendapatkan waktu eksekusi halaman program
'Memformat format ukuran
'Format waktu performa
'Zodiak memperoleh zodiak
'Konstelasi untuk mendapatkan konstelasi
'-------------------------------------
Classcls_fun
'----------------------------------------- �
'*********************************************************
'Nama fungsi: Strlength
'Fungsi: Dapatkan panjang string (karakter Cina adalah 2)
'Argumen: STR ----- Konten String
'Nilai Pengembalian: Panjang String
'*********************************************************
PublicFunctionstrlength (str)
Dimrep, lensa, i