一、用户显示页面的使用
首先,我们来看看怎样现实当前网站的访问用户数量,程序代码如下:
<%@ Page Language="VB" debug="true" %>
<html>
<head>
<SCRIPT LANGUAGE="vb" RUNAT="server">
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Visitors.Text = "本站当前有: <b>" & (Application("user_sessions").ToString()) & "" & _
"</b> 位访问者 !"
end sub
</script>
<title>在线用户</title>
</head>
<body>
<asp:label id="visitors" runat="server" /><br>
</body>
</html>
可以看出,以上的程序特别简单,就是调用Application。当然,我们不必要专门设计一个页面来显示在线用户数量,在网站的任何页面,我们都可以直接调用Application("user_sessions").ToString()来显示当前用户数量。
二、global.asax文件实现
global.asax文件的作用我们自不必说,现在,我们直接来看统计当前在线用户数量如何实现:
<script language="VBScript" runat="Server">
Sub Application_OnStart(Sender as Object, E AS EventArgs)
application("user_sessions") = 0
End Sub
Sub Application_OnEnd(Sender as Object, E AS EventArgs)
End Sub
Sub Session_OnStart(Sender as Object, E AS EventArgs)
application.lock()
application("user_sessions") = application("user_sessions") + 1
application.unlock()
End Sub
Sub Session_OnEnd(Sender as Object, E AS EventArgs)
application.lock()
application("user_sessions") = application("user_sessions") - 1
application.unlock()
End Sub
</script>
以上代码很容易理解,当网站开始服务的时候(Application开始的时候),程序设置application("user_sessions")为零,然后,当用户进入网站(Session开始的时候)的时候,锁定Application,然后,将application("user_sessions")加一,用户退出网站的时候,application("user_sessions")减一。这样,就很巧妙的实现了在线用户的统计。
三、一点讨论
以上的统计,简明扼要,程序很容易实现。但是,如果我们仔细考虑,发现该方法有一定的局限,统计出来的在线用户数量可能稍微有点误差。因为我们在以上程序中,是根据用户建立和退出会话(Session)来实现在线人数的加减的,而我们知道,如果用户没有关闭浏览器,而进入另外一个网站,那么,这个会话在一定的时间内是不会结束的,这个时间我们可以通过TimeOut来设置,一般的,我们设置为20分钟。所以,在用户数量统计上面,还是存在一点误差的。
另外,我们知道,在ASP中,如果用户将浏览器上面的Cookies设置为“禁用”,那么,Session就不能再被传递,显然,这样设置让以上的统计程序无能为力。不过,在ASP.NET中我们有解决方法,在config.web文件中,我们将<sessionstate cookieless="false" />设置为true就可以了,也就说,不使用Cookies也可以传递Session。这样,我们的程序就可以在不同的访问者环境中顺利运行。
四、总结
以上的统计程序特别简单,但是,细节的东西我们不一定想到,这也是我们在编程中需要多一点考虑的。
评论 {{userinfo.comments}}
{{child.content}}
{{question.question}}
提交