28,390
社区成员
发帖
与我相关
我的任务
分享
<script language="vbscript" runat="server">
Sub Application_OnStart
End Sub
Sub Application_OnEnd
End Sub
Sub Session_OnStart
Response.Redirect("index.asp")
Session.Timeout = 1
End sub
Sub Session_OnEnd
loginuser=Split(session("loginuser"), ":")
If loginuser(0)="" then
Response.Redirect("index.asp")
End if
End Sub
</script>
再在页面上增加一条自动刷新的语句:
[code=HTML]
<meta http-equiv="Refresh" content="60; url=view.asp" />
Session.Timeout = 1
<meta http-equiv="Refresh" content="120; url=view.asp" />