在线统计代码 application

2018-09-06 10:56

阅读:529

  首先要设置好global.asa 文件,如下

以下内容为程序代码 <script language=vbscript runat=server> sub application_onstart application(activeusers) = 0 //初始值 end sub sub session_onstart session.timeout = 20 //删除不活动用户的时间 session(start) = now application.lock //锁定application变量 application(activeusers) = application (activeusers) + 1 //统计 application.unlock //解锁 end sub sub session_onend application.lock application(activeusers) = application (activeusers) - 1 //删除不活动用户或退出用户 application.unlock end sub </script>

  
显示在线用户数量的页面

  
以下内容为程序代码 <%@ language=vbscript %> <html> <head> <title>在线用户</title> </head> <body> <b>当前共有<font color=#cc0000><%= application(activeusers) %></font> 人在线</b> </body> </html>

  最普通的方法是用SESSION,但缺点是无法即时反应在线情况(有超时时间)和占用服务器资源(如果有100人在线就有100个SESSION,想想看8);上次(好象间隔很久了耶)介绍了一种采用APPLICATION+COOKIES的方法,但实现方法有些烦琐同时还要设一个隐藏的自刷新页面。
这种方法则避免了以上的弊病,经实践,效果不错(例子:。COM/BBS),具体如下:
假定INDEX。HTM为框架网页,包含ID=LEFT,ID=TOP和ID=BOTTOM的三个框架
1、做个统计页面USERNUM。ASP
<p>正在统计数据。。。</p>
<%
user=request.querystring(user)
ifuser=0then如果离开则人数-1
application.lock
application(num)=application(num)-1
application.unlock
response.write<script>self.close();</script>
elseifuser=1then如果进入则+1
application.lock
application(num)=application(num)+1
application.unlock
endif
%>

2、在框架页面中如(INDEX。HTM)嵌入USERNUM。ASP
<bodyonbeforeunload=window.open(usernum.asp?user=0,num,menubar=no)>
......
<iframesrc=usernum.asp?user=1frameborder=0width=0height=0></iframe>
3、在需要显示人数的页面(假定在LEFT显示)中加入
<divid=num><%=application(num)%></div>
4、设定需要更新数据的页面(如BOTTOM)
functiontj(){
}
<bodyonload=tj()>
完毕,这只是一个例子,具体应用可以灵活,另外,为什么当离开时要WINDOW。OPENUSERNUM。ASP呢?因为如果同样放在IFRME中,窗口关得太快,USERNUM。ASP页面来不及装载就关掉了无法减少人数


评论


亲,登录后才可以留言!