global.asp

来自「ZD-BS是一个基于asp+access的个人blog系统 程序特点: 1.」· ASP 代码 · 共 58 行

<%@Language="JScript" codepage="65001"%>
<%
Response.Buffer=true;
Session.Timeout=30;
%>

<!--#include file="config.asp"-->

<%
//do initialize
initialize();

//load the cache
//theCache.reload();
theCache.getAll(false);
if(theCache.bError){
	globalMsgBox(zd_ls["error:load cache"]);
	Response.End();
}

//get blog setting
var zd_set=theCache.setting;

//Do count
sys.visitorCount();

//Get visitor info
sys.getVisitorInfo();

//check the bad IP
if(!sys.checkBadIP()&&zd_userGroup!="admin"){
	var bPass=false;
	try{
		bPass=superLogin();
	}catch(e){
		bPass=false;
	}
	if(bPass!=true){
		globalMsgBox(zd_ls["error:bad ip"]);
		Response.End();
	}
}

//check the site close
if(!zd_set["opened"]&&zd_userGroup!="admin"){
	var bPass=false;
	try{
		bPass=superLogin();
	}catch(e){
		bPass=false;
	}
	if(bPass!=true){
		globalMsgBox(zd_bs["error:site close"]);
		Response.End();
	}
}

%>