妙用asp+的global.asax
发表时间:2023-08-08 来源:明辉站整理相关软件相关文章人气:
[摘要]/*豆腐制作 都是精品http://www.asp888.net 豆腐技术站如转载 请保留这个版权信息*/在asp的以前的文章里我讲了一下如何在asp中实现页面统计,但是这样的程序有这样的一个问题,...
/*
豆腐制作 都是精品
http://www.asp888.net 豆腐技术站
如转载 请保留这个版权信息
*/
在asp的以前的文章里我讲了一下如何在asp中实现页面统计,但是这样的程序有这样的一个问题,就是只能统计单个的页面,我们在asp+中可以很轻松的实现对整个站点页面的统计
在asp.net 中 原来 asp 中的 global.asa 被调整成为了 global.asax 其中除了以前的
四个事件又 增加了 两个事件Application_BeginRequest 和 Application_EndRequest
这两个事件在站点的任意一个文件被请求的时候都会被激发,因此我们便利用这个事件实现对站点的访问统计
我们首先来看看这个global.asax 文件
<script language="VB" runat="server">
Sub Application_Start(Sender As Object, E As EventArgs)
End Sub
Sub Application_End(Sender As Object, E As EventArgs)
'我们捎带实现了 站点的当前在线人数
dim intOnlineNumber as integer
intOnlineNumber=cInt(Application("ONLINENUMBER"))-1
Application("ONLINENUMBER")=intOnlineNumber
End Sub
Sub Session_Start(Sender As Object, E As EventArgs)
Application.Lock
intOnlineNumber=cInt(Application("ONLINENUMBER"))+1
Application("ONLINENUMBER")=intOnlineNumber+1
Application.UnLock
End Sub
Sub Session_End(Sender As Object, E As EventArgs)
End Sub
Sub Application_BeginRequest(Sender As Object, E As EventArgs)
'就是这里
response.write("当前访问的页面是 " + Request.FilePath + "<br>")
'既然我们可以得到FilePAth 则我们只要把这个参数进行详细的各种各样的统计就可以了
End Sub
Sub Application_EndRequest(Sender As Object, E As EventArgs)
End Sub
</script>
'好了一切完结之后,我们访问站点的任意一个aspx 文件,都会在最上方发现一行文字:当前访问的页面是 。。。。
怎么样,还不赶快尝试一下??
作者:豆腐()