判断当前你是第几个访问者

作者：未知来源：未知添加时间：2006-5-21 10:29:37

如果你想知道当前有多少人正在访问你的站点,例如你需要一个地方去存储该变量，你必须创建一个叫global.asa的文件来存储. The global.asa 包括了四个处理函数:

Application_OnStart
Application_OnEnd
Session_OnStart
Session_OnEnd

打开记事本，粘贴以下代码

<SCRIPT LANGUAGE=VBScript RUNAT=Server>
Sub Application_OnStart
Application("visits") = 0
Application("Active") = 0
End Sub

Sub Application_OnEnd

End Sub

Sub Session_OnStart
Session.Timeout = 20
Session("Start") = Now
Application.lock
Application("visits") = Application("visits") + 1
intTotal_visitors = Application("visits")
Application.unlock
Session("VisitorID") = intTotal_visitors
Application.lock
Application("Active") = Application("Active") + 1
Application.unlock
End Sub

Sub Session_OnEnd
Application.lock
Application("Active") = Application("Active") - 1
Application.unlock
End Sub
</SCRIPT>

把这个文件存为globe.asa

打开记事本，粘贴以下代码
<head>
<title>ALLASP</title>
</head>
<body>

You are one of <%=Application("Active")%> current visitors.
</body>
</html>
保存文件为 hit.asp

上一篇：在Flash中使用ASP技术
下一篇：如何利用ASP实现邮箱访问

站内搜索