用APPLICATION
我只给一个方法,请你自己完善。
请在Global.asa 中:
<scriptlanguage="vbscript" ruanat="server">
sub Application_onstart
session.timeout=3
Application.lock
Application("whoson")=0
Application.Unclock
end sub
session_Onstart
Application.lock
Application("whoson")=Application("whoson")+1
Application.Unlock
end sub
session_Onend
Application.lock
Application("whoson")=Application("whoson")-1
Application.Unclock
ENd sub