无刷新随时取得用户当前活动信息
作者:互联网
2009-06-23
最终显示是这样的:
用户:billy 权限:管理员 时间[2004年1月21日 20:54:08] 停留[0小时0分钟] 空闲[0分钟12秒]
显示的BOTTOM.HTM文件
用户: 权限: 时间[] 停留[] 空闲[]
提供XML数据的ASP页面 LOGINXML.ASP
<%
username=session("userName")
qxdm=session("qxdm")
set rs = server.createobject("adodb.recordset")
rs.source = "select * from userlogin where username='"&username&"'"
rs.open rs.source,conn,1,1
logindate=rs("logindate")
active=rs("active")
rs.close
stay=DateDIff("s",logindate,now())
off=DateDIff("s",active,now())
stay=stay/60
stay=Int(stay/60)&"小时"&Int(stay mod 60)&"分钟"
free=Int(off/60)&"分钟"&Int(off mod 60)&"秒"
us=DatePart("yyyy",date)&"年"&DatePart("m",date)&"月"&DatePart("d",date)&"日 "&time
%>
本来觉得这样会占用很多的资源,但是实际应用时觉得一切正常
相关标签:
相关推荐
