源码网,源码论坛,源码之家,商业源码,游戏源码下载,discuz插件,棋牌源码下载,精品源码论坛

 找回密码
 立即注册
查看: 435|回复: 16

[ASP编程] 在线统计代码 application

[复制链接]

7万

主题

861

回帖

32万

积分

论坛元老

Rank: 8Rank: 8

积分
329525
发表于 2006-6-27 00:00:00 | 显示全部楼层 |阅读模式
首先要设置好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页面来不及装载就关掉了无法减少人数
回复

使用道具 举报

0

主题

1万

回帖

0

积分

中级会员

Rank: 3Rank: 3

积分
0
发表于 2022-10-29 17:41:12 | 显示全部楼层
灌灌灌灌水
回复 支持 反对

使用道具 举报

0

主题

1万

回帖

0

积分

中级会员

Rank: 3Rank: 3

积分
0
发表于 2022-11-4 09:42:19 | 显示全部楼层
还可以不错
回复 支持 反对

使用道具 举报

4

主题

2万

回帖

107

积分

注册会员

Rank: 2

积分
107
发表于 2023-2-26 04:34:56 | 显示全部楼层
谢谢小Y分享
回复 支持 反对

使用道具 举报

0

主题

2万

回帖

0

积分

中级会员

Rank: 3Rank: 3

积分
0
发表于 2024-3-2 03:25:04 | 显示全部楼层
感谢楼主分享
回复 支持 反对

使用道具 举报

2

主题

2万

回帖

73

积分

注册会员

Rank: 2

积分
73
发表于 2024-4-8 22:49:38 | 显示全部楼层
看看看看看看看看看看看看看看看看看看看看看看看看看看看
回复 支持 反对

使用道具 举报

0

主题

2万

回帖

194

积分

注册会员

Rank: 2

积分
194
发表于 2024-5-31 08:53:36 | 显示全部楼层
还不错啊
回复 支持 反对

使用道具 举报

1

主题

1万

回帖

51

积分

注册会员

Rank: 2

积分
51
发表于 2024-6-17 03:41:39 | 显示全部楼层
这个源码不错啊
回复 支持 反对

使用道具 举报

0

主题

2万

回帖

124

积分

注册会员

Rank: 2

积分
124
发表于 2024-6-30 13:39:53 | 显示全部楼层
感谢楼主分享
回复 支持 反对

使用道具 举报

13

主题

2万

回帖

97

积分

注册会员

Rank: 2

积分
97
发表于 2024-7-19 04:55:33 | 显示全部楼层
啦啦啦啦啦啦哈哈哈
回复 支持 反对

使用道具 举报

高级模式
B Color Image Link Quote Code Smilies

本版积分规则

手机版|小黑屋|网站地图|源码论坛 ( 海外版 )

GMT+8, 2025-2-6 15:15 , Processed in 0.139769 second(s), 24 queries .

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表