asp如何实时获知多少人在线?
发布时间:2010-05-18 18:34:00
global.asa
<SCRIPT LANGUAGE="VBScript" RUNAT="Server">
Sub Application_OnStart
' Sub Application_OnStart 是好在服务器每次启动的时候激活的方法
Session.Timeout = 3
' 定义用户在线时间,如果在定义时间内没有活动连接,则删掉他的session 变量实例,将其注销
Application.Lock
' 用.Lock 方法锁住Application 变量以继续运行.如果不锁,那么它在变量 "WhosOn"中不会发生变化
Application("WhosOn") = 0
' 变量从0开始
Application.UnLock
' 给application解锁
End Sub
Sub Session_OnStart
' Sub Session_OnStart 检测每一时刻新来的用户
Application.Lock
Application("WhosOn") = Application("WhosOn") + 1
Application.UnLock
' 此处是用户造访时增加的计数,记住锁/开Application变量
End Sub
Sub Session_OnEnd
' Sub Session_OnEnd 检测每一时刻退出网站的用户,并在Session:Timeout in 定义退出后几分钟内仍计数
Application.Lock
Application("WhosOn") = Application("WhosOn") - 1
Application.UnLock
' 当有用户退出时我们要在"WhosOn" 变量中减少1个数,同样要对application 变量进行锁/开
End Sub
</SCRIPT>
count.asp
<%
response.write "这会儿有" & Application("WhosOn") & "人正在asp之家流连忘返呢!"
%>
猜你喜欢
- 只要把下面代码放到index.asp或者default.asp中,只要在首页代码顶部引用call Check_Wap(),这个也是我的工程中
- 作者的blog:http://www.planabc.netz-index属性简介引用:z-index : auto | numberaut
- 最近接触到一个心理学方面的理论:心流理论。大意是一种个人精力完全投注在某件事情上的感觉。心流产生时会有高度的兴奋和充实感。其实也就是说人在进
- 首先,把这个“功能”包含到页首:<!--#include virtual="/readini/inifile.in
- 这段程序的方法是利用XMLHTTP来读取腾讯网站的相应HTML代码获取QQ的头像,根据这个想法,我们还
- 时下,个性ico图标却成为一些主流大牌网站提高用户体验(UE)的一个“时髦”玩法,那么,是如何在IE地址栏显示出网站的个性图标的呢?常浏览网
- 网站开发时经常需要在某个页面需要实现对大量图片的浏览,如果考虑流量的话,大可以像pconline一样每个页面只显示一张图片,让用户每看一张图
- 做为一个编程爱好者,也作为一个小站长(asp之家),中国站长站(www.chinaz.com)我时不时的都会去灌一下。当然发现好的文章我也不
- Hello every, 我是Sunrise_Chen,有人知道我吗?好久没来这里了,以前偶尔会来这里潜水今天心情很好,写了几个特效果。特效
- 本文介绍的圆角方法很特别,有创意。昨天群里大家讨论到一个豆瓣上的按钮,下面这个。在这里用到了不同宽度的按钮,但是只是用到了一个图片。&nbs
- var a = 0, b = 0;[0, 0].sort(function() {a = 1;return 0;});[0, 1].sort
- sql exist的妙用create table b(a varchar(10),b varchar(10),c varchar(10))i
- mysql数据库没有增量备份的机制,当数据量太大的时候备份是一个很大的问题。还好mysql数据库提供了一种主从备份的机制,其实就是把主数据库
- 当你连接一个MySQL服务器时,你通常应该使用一个口令。口令不以明文在连接上传输。所有其它信息作为能被任何人读懂的文本被传输。如果你担心这个
- 代码如下:--函数 CREATE function fn_GetPy(@str nvarchar(4000)) returns nvarch
- 在本文上两篇中,我们学习了脚本语言 VBScript 的变量、函数、过程和条件语句,本篇将继续给大家介绍 VBScipt 的循环语句,并对脚
- 如果不用类库(如jquery)来写,往往很多时候,都需要通过id或tag来获取html里的某一对象,然后对其进行操作。为了节省代码,把常用的
- 什么是CSS裸奔节?CSS裸奔节就是将这整站的css样式都去掉,这样所有的布局,颜色,背景什么的就都没有了(除非你使用table布局),只剩
- Microsoft SQL Server 7.0安全问题Microsoft Corporation【「Microsoft SQL Serve
- 如何最准确地统计在线用户数?我们推荐的这个程序据说是目前最好的在线用户数量统计程序。代码如下:'首先要设置好global.asa&n