无刷新随时取得用户当前活动信息- ASP

当前位置: 首页 > 图文教程 > 网络编程 > ASP > 无刷新随时取得用户当前活动信息

ASP: ASP字符串大写转换成小写 ASP小写转换成大写 ucase lcase; asp base64加解密函数代码; Discuz!NT 论坛整合ASP程序论坛; discuz 2.0整合asp系统,用户添加函数; P3P 和跨域 (cross-domain) cookie 访问(读取和设置）; 通过asp程序来创建access数据库; 检查access数据库中是否存在某个名字的表的asp代码; asp #include file 与 #include virtual 的区别小结; 一个带采集远程文章内容,保存图片,生成文件等完整的采集功能; asp 横排显示数据; asp base64 utf-8为了兼容asp.net的base64; 两个非常规ASP木马(可躲过扫描); asp DateDiff实现文字在特定时间后消失; ASP所有的Session变量获取实现代码; 关于ASP eof与bof 区别分析; asp ajax注册验证之防止用户名输入空格; asp sqlserver 执行存储过程返回记录集报对象关闭时不允许操作; ASP 获取文件扩展名函数getFileExt(); asp 简单分页代码; asp删除mssql数据库中没有记录的图片代码

No. « ‹ 84 85 86 87 › »

技术文章搜索

关键字

ASP 中的无刷新随时取得用户当前活动信息

出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 190 ::

收藏到网摘: n/a

在VB中利用Word宏命令开发ASP组件编写一个asp代码执行器

最终显示是这样的：

用户：billy 权限：管理员时间[2004年1月21日 20:54:08] 停留[0小时0分钟] 空闲[0分钟12秒]

显示的BOTTOM.HTM文件

<SCRIPT language=JavaScript>
<!--
function bar()
{

var oXMLDoc = new ActiveXObject('MSXML'); //创建'MSXML'对象

sURL = "loginxml.asp" //获取登陆状态数据的地址

oXMLDoc.url = sURL; //load数据

var oRoot=oXMLDoc.root; //获取返回xml数据的根节点
if(oRoot.children != null)

{

//根据返回的数据在客户端显示

user.innerHTML=oRoot.children.item(0).text; //用户

myclock.innerHTML=oRoot.children.item(1).text; //时间

stay.innerHTML=oRoot.children.item(2).text; //停留

free.innerHTML=oRoot.children.item(3).text; //空闲

qx.innerHTML=oRoot.children.item(4).text; //权限

    }
       if (oRoot.children.item(5).text>1800) //空闲时间超过30分钟则自动转到退出登陆页面
         window.parent.location="/user/logoff.asp?id=1";

timeoutid = setTimeout("bar()",1000) //没1秒取得一次数据，}
//-->
</SCRIPT>

用户： 权限： 时间[] 停留[] 空闲[]

提供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
%>
<?xml version="1.0" encoding="gb2312" ?>

<plan>

<free><%=free%></free>

 <qx><%call qx(qxdm)%></qx>
 &nbs

在VB中利用Word宏命令开发ASP组件编写一个asp代码执行器

ASP 中的 无刷新随时取得用户当前活动信息

评论 (0) All

ASP 中的无刷新随时取得用户当前活动信息