当前位置:雨林木风下载站 > 网页设计教程 > 详细页面

ASP显示在线人数

ASP显示在线人数

更新时间:2025-12-19 文章作者:未知 信息来源:网络 阅读次数:

用两个文件.GLOBAL.ASA和online.asp下面分别给出两个文件的源代码.呵呵,我也是菜鸟,大家加油哟!<SCRIPT LANGUAGE=VBScript RUNAT=Server&...
 

用两个文件.GLOBAL.ASA和online.asp
下面分别给出两个文件的源代码.呵呵,
我也是菜鸟,大家加油哟!

<SCRIPT LANGUAGE=VBScript RUNAT=Server>

Sub Application_onStart
     Application("OnLine") = 0
End Sub
 

Sub Session_onStart
     Application.Lock
     Application("OnLine") = Application("OnLine") + 1
     Application.Unlock
End Sub

如果防止刷新,不要下面这段!
Sub Session_OnEnd
   Application.Lock
   Application("OnLine") = Application("OnLine") - 1
   Application.Unlock
End Sub
   
</SCRIPT>

online.asp代码如下!
<%@language=VBscript%>
<Html>
<head>
<title>
显示在线人数
</title>
</head>
<body>
<center>
欢迎光临本网站,当前共有<%=Application("OnLine")%>在线
</center>
</body>

 


温馨提示:喜欢本站的话,请收藏一下本站!

本类教程下载

系统下载排行