asp显示当前在线人员

来源：百度知道编辑：UC知道时间：2024/06/06 06:16:07

假设用xxx登陆网站,会显示xxx在线,当刷新的时候就会显示2个xxx在线,每次刷新都会增加一个,哪位知道怎么让他只显示一个,而且退出的时候清除掉
global.asa文件
<SCRIPT LANGUAGE=VBScript RUNAT=Server>
Sub Application_onStart
Application("OnLine") = 0
dim userNames
userNames=""
Application("userNames")=Application("userNames") & userNames
Application("all1")="dd"
End Sub

Sub Session_onStart
Application.Lock
Application("OnLine") = Application("OnLine") + 1
Application("all1")=Session.contents("PPst_UserName")
Application.Unlock
End Sub

Sub Session_OnEnd
Application.Lock
Application("OnLine") = Application("OnLine") - 1
Application("all1")="dd"
Application.Unlock
End Sub

</SCRIPT>

首页(用自己的用户名登陆进来)
<%@language

Sub Session_onStart
if session("userexists")="" then '如果session为空
Application.Lock
Application("OnLine") = Application("OnLine") + 1
Application("all1")=Session.contents("PPst_UserName")
Application.Unlock
session("userexists")="111" '将session赋值，只要页面不关闭，Application就只加一次
end if
End Sub

asp显示当前在线人员 asp 显示在线人员用户名 asp页面当前在线人数显示问题？ asp怎样显示当前页的在线人数 asp显示当前用户信息编写一个ASP程序，实现并显示当前网页的在线人数和计数器 asp 动态显示当前时间 VBS asp 显示在线用户 asp 分两列显示在线等 ASP.NET网页显示当前时间的代码？