1NetMedia_Blog

<< asp获取地址栏带中文参数  类别: ASP/.NET SEO:关键不是技术,而是思维 >>
ASP的SESSION易失效,SESSION和COOKIES同时记录登录信息
[ 日期: 2015-02-13 5:37:23 PM | 作者: admin | 来源: 本站整理 | 人气:1227 | 晴天 | 心情: +2 ] 字号: 【
急速栏目链接:
标签:ASP  |  Session  |  失效  |  Cookies  |  
在使用了2003系统后,发现,后台登录时间常常很快就失效,设置的20分钟,但没到20分钟中丢失了,需要重新登录,烦!!有是因为服务器设置了回收进程的原因,有时是它自己就失丢失,至于2003系统为什么这样,我也不明白。这里用COOKIES的方法来解决。


这是普通的正常登录
dim rs,sql
set rs=server.createObject("adodb.recordset")
sql="select id,username,password,flag,lastlogin,lastloginip from admin_user where username='"&username&"'"
rs.open sql,conn,1,3
if rs("password")=password then

session("username")=rs("username")
session("Mlogin")=true

'下面设置COOKIES时间
Response.Cookies("ManageId").Expires=(date()+1)
Response.Cookies("ManagePwd").Expires=(date()+1)
'下面是设置COOKIES值
response.Cookies("ManageId")=rs("id")
response.Cookies("ManagePwd")=rs("password")

end if

下面是当SESSION值丢失时
if session("Mlogin")<>true then
uid=request.Cookies("id")
pwd=Cookies("ManagePwd")
if isnumeric(uid) then
set ur=conn.execute("select id,username,password,flag,lastlogin,lastloginip from admin_user where id="&uid)
if not ur.eof then
if pwd=ur("password") then
'正确后,重析设置SESSIOIN
session("username")=ml("username")
session("Mlogin")=true
end if
end if
end if
end if

好了,这样就可以不丢失信息了。
   
Rss Comment  

没有相关评论

发表评论
请先注册,才能发表评论!
- 注册 -