显示用户是否在线
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()
%>
