<%
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 = "../"
それ以外