怎样实时跟踪论坛在线用户的数量，并显示出来

Question

一般的做法都是在页面显示或刷新的时候，取当最近一段时间(几秒，几分钟)的登录人数你要实时的话，也可以用一个iframe，然后在iframe里不停的定时刷新

Answer 1

///global.asa ：  <SCRIPT LANGUAGE="VBScript" RUNAT="Server">
     Sub Application_OnStart
       Session.Timeout=30
       Application.Lock
       Application("WhosOn") = 0
       Application.UnLock
     End Sub     Sub Session_OnStart
       Application.Lock
       Application("WhosOn") = Application("WhosOn") + 1
       Application.UnLock
     End Sub     Sub Session_OnEnd
       Application.Lock
       Application("WhosOn") = Application("WhosOn") - 1
       Application.UnLock
     End Sub
  </SCRIPT>////显示：
【<% response.write "当前在线 " & Application("WhosOn") & " 人" %>】