当前位置: 首页 > 图文教程 > 网络编程 > ASP > 在线统计代码 application

ASP
asp分页(自己整理的2个分页程序)
ASP常用的系统配置函数
雨哲防采集策略之列表篇
雨哲浅谈关于防采集而不影响收录内容篇
asp数据库连接函数
ajax XMLHTTP Post Form时的表单乱码综合解决
ASP注入详细命令40条
用ASP实现MSSQL用户密码破解
ASP创建对象的两种方法比较
ASP字符串转换为整形、双精度型、布尔
ASP计算str2在str1中出现的次数
asp采集抓取网上房产信息的代码
ASP注册登陆实例代码
ASP中使用FileSystemObject时提高性能的方法
分享一个好东东,动态Include文件 (Dynamic File Includes)
解决 JScript 中使用日期类型数据时出现类型错误的问题
在ASP里面创建GUID
在JScript中使用缓存技术的实际代码
ASP javascript Application对象的Contents和StaticObjects做Cache的一些经验
海阳2006+功能中的潜水王

ASP 中的 在线统计代码 application


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-13   浏览: 210 ::
收藏到网摘: n/a

首先要设置好global.asa 文件,如下
图片点击可在新窗口打开查看以下内容为程序代码
  1. <script language="vbscript" runat="server">
  2. sub application_onstart
  3. application("activeusers") = 0  //初始值
  4. end sub
  5. sub session_onstart
  6. session.timeout = 20    //删除不活动用户的时间
  7. session("start") = now
  8. application.lock       //锁定application变量
  9. application("activeusers") = application
  10. ("activeusers") + 1      //统计
  11. application.unlock     //解锁
  12. end sub
  13. sub session_onend
  14. application.lock
  15. application("activeusers") = application
  16. ("activeusers") - 1     //删除不活动用户或退出用户
  17. application.unlock
  18. end sub
  19. </script>


显示在线用户数量的页面


图片点击可在新窗口打开查看以下内容为程序代码
  1. <%@ language=vbscript %>
  2. <html>
  3. <head>
  4. <title>在线用户</title>
  5. </head>
  6. <body>
  7. <b>当前共有<font color="#cc0000"><%= application("activeusers") %></font> 人在线</b>
  8. </body>
  9. </html>

最普通的方法是用SESSION,但缺点是无法即时反应在线情况(有超时时间)和占用服务器资源(如果有100人在线就有100个SESSION,想想看8);上次(好象间隔很久了耶)介绍了一种采用APPLICATION+COOKIES的方法,但实现方法有些烦琐同时还要设一个隐藏的自刷新页面。
这种方法则避免了以上的弊病,经实践,效果不错(例子:WWW。ATERSOFT。COM/BBS),具体如下:
假定INDEX。HTM为框架网页,包含ID=LEFT,ID=TOP和ID=BOTTOM的三个框架
1、做个统计页面USERNUM。ASP
<p>正在统计数据。。。</p>
<%
user=request.querystring("user")
if user=0 then '如果离开则人数-1
application.lock
application("num")=application("num")-1
application.unlock
response.write "<script>self.close();</script>"
elseif user=1 then '如果进入则+1
application.lock
application("num")=application("num")+1
application.unlock
end if
%>
2、在框架页面中如(INDEX。HTM)嵌入USERNUM。ASP
<body onbeforeunload="window.open('usernum.asp?user=0','num','menubar=no')">
......
<iframe src="usernum.asp?user=1" frameborder=0 width=0 height=0></iframe>
3、在需要显示人数的页面(假定在LEFT显示)中加入
<div id=num><%=application("num")%></div>
4、设定需要更新数据的页面(如BOTTOM)
function tj(){
top.left.num.innerHTML=<%=application("num")%>;
}
<body onload="tj()">
完毕,这只是一个例子,具体应用可以灵活,另外,为什么当离开时要WINDOW。OPEN USERNUM。ASP呢?因为如果同样放在IFRME中,窗口关得太快,USERNUM。ASP页面来不及装载就关掉了无法减少人数