<％
classcls_main
publicscriptName、sqlquerynum、savelog、system、reslicence、restype、reslanguage、userclass、strmsg、refererpage
publicAdminName、adminpass、system_sn、usertrueip
publicReloadtime、MaxCount、Cachename、Cache_Data、Spath
privatelocalcachename、cachedata、delcount、arrsetting
publicMemberSername、MemberUserid、MemberUserPassword、MemberUserClass、MemberViptype
'类初始化
privatesubclass_initialize（）
savelog = 0 '设置为1的时候会记录攻击或错误错信息。
sqlquerynum = 0
dimtmpstr、i
tmpstr = request.servervariables（ "path_info"）
tmpstr = split（tmpstr、 "/"）
i = ubound（tmpstr）
scriptname = lcase（tmpstr（i））
refererpage = request.servervariables（ "http_referer"）
adminname = session（ "adminname"）
adminpass = session（ "adminpass"）
reloadtime = 14400
cachename = falling（leplage（falple（server.mappath（ "index.asp"）、 "index.asp"、 ""）、 "："、 "）、"/"、" "）
System_sn = lcase（flighce.servervariables（ "server_name"）＆request.servervariables（ "url"）、split（request.servervariables（ "script_name"）、 "/"）
usertrueip = request.servervariables（ "http_x_forwarded_for"）
ifusertrueip = "" senusertrueip = request.servervariables（ "remote_addr"）
usertrueip = checkstr（usertrueip）
ifsystemedition = 3then
Spath = "../"
それ以外