ASP做后台长时间没操作会被取消管理权限，如何在长时间没有操作之后能自动跳转到登入页面？

答案:5 悬赏:20

解决时间 2021-03-03 06:23

提问者网友：清茶柒夏
2021-03-02 14:54

<%option explicit%>
<html>




<%
Response.Write "<SCRIPT LANGUAGE=JAVASCRIPT>"
Response.Write "if (top.location != self.location)top.location=self.location;"
Response.Write "</SCRIPT>"

dim datestrnow
datestrnow="fj49gtfnsl"
Response.Cookies("test_str") = datestrnow
If Request.Cookies("test_str") = datestrnow Then
Response.Cookies("test_str")=""
Response.Cookies("test_str").expires=dateadd("s",-2,now())
else
response.Write "<font color='red'>您的浏览器不支持Cookie,请开启...</font>"
response.End()
End if

if trim(request.Form("mycount"))<>"" and trim(request.Form("mypasswd"))<>"" and issafestr(trim(request.Form("mycount"))) and issafestr(trim(request.Form("mypasswd"))) and isselfrefer() then
if trim(request.Form("yanzhen"))<>trim(Session("GetCode")) then
response.Redirect "error.asp?msg="&server.URLEncode("验证码不正确!")&"&url=login.asp"
response.End()
end if

call conn_open()
set rs=server.CreateObject("adodb.recordset")

sql="select * from admin_xys where ax_count_s='"&trim(request.Form("mycount"))&"'"
rs.open sql,conn,1,3
if rs.eof then
call conn_close()
response.Clear()
response.Redirect("error.asp?msg=用户名不存在&url=login.asp")
response.End()
else
if rs("ax_passwd_s")<>md5(trim(request.Form("mypasswd"))) then
call conn_close()
response.Clear()
response.Redirect("error.asp?msg=密码不正确&url=login.asp")
response.End()
else
response.Cookies("site_name")=site_manager_name
response.cookies("site_name").Expires=DateAdd("n",20,Now())

response.Cookies("admincount")=rs("ax_count_s")
response.cookies("admincount").Expires=DateAdd("h",4,Now())

'采用session安全验证检查的用户名
session(site_manager_name)=rs("ax_count_s")

'检查管理员级别
session("admin_lvl_n")=rs("ax_lvl_n")

response.Cookies("relname")=rs("ax_name_s")
response.cookies("relname").Expires=DateAdd("h",4,Now())

response.Cookies("lognum")=rs("ax_lognum_n")+1
response.cookies("lognum").Expires=DateAdd("h",4,Now())

response.Cookies("lastlogtime")=rs("ax_lastlog_d")
response.cookies("lastlogtime").Expires=DateAdd("h",4,Now())

response.Cookies("login_time")=now()
response.cookies("login_time").Expires=DateAdd("h",4,Now())

rs("ax_lognum_n")=rs("ax_lognum_n")+1
rs("ax_lastlog_d")=now()
rs.update
call conn_close()
response.Redirect "index.asp"
response.End()
end if
end if
end if
%>
<style type="text/css">

</style><head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title><%=site_name%> :: 网站管理登陆入口 :: </title>

请各位高手们帮帮忙，请的源代码上修改！谢谢了！

最佳答案

二级知识专家网友：啵啵桃汀
2021-03-02 15:05

用session记录时记得加上
session.Timeout=60
后面时间代表分钟

全部回答

1楼网友：一身浪痞味
2021-03-02 18:28

如果你是用session，那么可以在blobal.asa的session.end 里面写个东西，你用cookies，我就不知道了。

2楼网友：有钳、任性
2021-03-02 18:16

session获取第一次登录时间下次对比时间时间大了就跳转

3楼网友：眠于流年
2021-03-02 16:50

在需要验证的页面里加上 if session("admin_lvl_n")="" then response.redirect "login.asp"

4楼网友：duile
2021-03-02 15:38

你好！找到做权限验证的代码块,在if false判断里写response.redirect语句就可以了如有疑问，请追问。

我要举报

如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！