在线人数写法

YPE html PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN" "http://www.**w*3.org/TR/REC-html40/loose.dtd">

然后编写count.asp
user=request.cookies("21bbsusername")
totaluser=application("user")
if instr(totaluser,user)=0 then
application.lock
application("user")=totaluser&";"&user
application.unlock
end if
%>

最后显示在线人数。
user=split(application("user"),";")
num=ubound(user)
response.write num