在管理主页加<iframe style="width: 0px;; height:0px;" name="freshform" src="Admin_Fresh.asp" frameBorder="0" width="0" height="0"></iframe>
但是带来的后果就是，不够安全：）
当离开而没关闭后台时，会被别人利用你的登陆。
同理，也可以适用ajax方式割段时间来跟服务器交互
<!--#include file="../inc/config.asp"-->
<!--#include file="../inc/conn.asp"-->
<!--#include file="../inc/Inc_Functions.asp"-->
<!--#include file="../inc/Inc_SystemFun.asp"-->
<%
Dim Admin
Set Admin = New cls_Admin
IF Not Admin.CheckSystemAdmin("","",False) Then
Response.End
End IF
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<title>Fresh</title>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<meta http-equiv="Refresh" content="300" />
</head>
<body>
</body>
</html>
<%
Set Admin = Nothing
Call PageBottom()
%>
但是带来的后果就是，不够安全：）
当离开而没关闭后台时，会被别人利用你的登陆。
同理，也可以适用ajax方式割段时间来跟服务器交互
<!--#include file="../inc/config.asp"-->
<!--#include file="../inc/conn.asp"-->
<!--#include file="../inc/Inc_Functions.asp"-->
<!--#include file="../inc/Inc_SystemFun.asp"-->
<%
Dim Admin
Set Admin = New cls_Admin
IF Not Admin.CheckSystemAdmin("","",False) Then
Response.End
End IF
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<title>Fresh</title>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<meta http-equiv="Refresh" content="300" />
</head>
<body>
</body>
</html>
<%
Set Admin = Nothing
Call PageBottom()
%>