神马品牌网少儿新疆民族舞蹈视频:ASP代码如何写在线人数
来源：百度文库 编辑：神马品牌网 时间：2024/04/27 15:03:05
Server、Session 和Application的应用
显示当前在线人数（注：无论怎样刷新页面，在线不人数不能变化，但打开新的页面，在线人数会变化）
如果使用global.asa请详细说明怎么调用该文件,因为本人是初学者.
万分感谢!
显示当前在线人数（注：无论怎样刷新页面，在线不人数不能变化，但打开新的页面，在线人数会变化）
如果使用global.asa请详细说明怎么调用该文件,因为本人是初学者.
万分感谢!
把以下代码嵌入到网页中即可～
<%
t=(cint(day(date()))*24+cint(hour(time())))*60+cint(minute(time()))
k=0
i=1
y=0
Do While application("zxip"&i)<>""
if application("zxip"&i)=Request.ServerVariables("REMOTE_ADDR") then
application("zxsj"&i)=t
y=1
end if
if t-application("zxsj"&i)>9 or t<application("zxsj"&i) then
k=k+1
else
if k>0 then
application.lock
application("zxip"&i-k)=application("zxip"&i)
application("zxsj"&i-k)=application("zxsj"&i)
application.unlock
end if
end if
if k>0 then
application.lock
application("zxip"&i)=""
application.unlock
end if
i=i+1
loop
if y=0 then
application("zxip"&i)=Request.ServerVariables("REMOTE_ADDR")
application("zxsj"&i)=t
else
i=i-1
end if
%>