check.asp
<script language=javascript>
function Test()
{
var xmlhttp = new ActiveXObject("MSXML2.XMLHTTP");
xmlhttp.open("POST","online.asp",false); // 向onceonline.asp发送更新请求
xmlhttp.setRequestHeader("CONTENT-TYPE","application/x-www-form-urlencoded");
xmlhttp.send();
}
setInterval("Test();",10); // 10秒钟发送一次更新请求
</script>
online.asp
<!--#include file="conn.asp"-->
<%
conn.Execute "update hand_us set i='"&ii&"' where h=true and a='"&request.cookies("login_hand")&"'" '更新最后在线时间
conn.Execute "update hand_us set h=false where datediff('s',i,now())>1" '删除不在线的用户
enddata()
%>
<script language=javascript>
function Test()
{
var xmlhttp = new ActiveXObject("MSXML2.XMLHTTP");
xmlhttp.open("POST","online.asp",false); // 向onceonline.asp发送更新请求
xmlhttp.setRequestHeader("CONTENT-TYPE","application/x-www-form-urlencoded");
xmlhttp.send();
}
setInterval("Test();",10); // 10秒钟发送一次更新请求
</script>
online.asp
<!--#include file="conn.asp"-->
<%
conn.Execute "update hand_us set i='"&ii&"' where h=true and a='"&request.cookies("login_hand")&"'" '更新最后在线时间
conn.Execute "update hand_us set h=false where datediff('s',i,now())>1" '删除不在线的用户
enddata()
%>
博客展示了使用JavaScript实现定时更新在线用户信息的代码。通过check.asp中的JavaScript函数Test,每10秒向online.asp发送更新请求。online.asp则根据请求更新最后在线时间,并删除不在线的用户。
6280

被折叠的 条评论
为什么被折叠?



