Aktıf zıyaretcı sayısını bulma asp kodu

--------- Bu kodlarla Global.asa adına bir dosya oluşturup sitenizine en üst klasörüne yerleştirin ---------
<!-- Global.asa başlangıcı -->
<SCRIPT LANGUAGE=VBScript RUNAT=Server>
Sub Application_OnStart
  Application("Aktif") = 0
End Sub

Sub Session_OnStart
  Application.Lock
  Application("Aktif") = Application("Aktif") + 1
  Application.Unlock
End Sub

Sub Session_OnEnd
  Application.Lock
  Application("Aktif") = Application("Aktif") - 1
  Application.Unlock
End Sub
</SCRIPT>
<!-- Global.asa bitişi -->

<!-- Aktif ziyaretçi sayısını göstermek istediğiniz sayfaya da şu kodu yazın-->
<%= Application("Aktif") %> Kişi Aktif