Free Active Servers Counter (.asp)

With this script we will be able to know and show in our pages the number of active visitors in a given moment. The script has two parts: a file name global.asa (check information on "global.asa" file in this tutorial), and a small code you must insert in your pages to show the number of active users.

Just copy the code in the table to a text file and save it in the main directory of your site ("/global.asa").
 

global.asa
<SCRIPT LANGUAGE="VBScript" RUNAT="Server">

Sub Application_OnStart
application("activevisitors")=0
End Sub

Sub Application_OnEnd
End Sub

Sub Session_OnStart
application.lock
application("activevisitors")=application("activevisitors") 1
application.unlock
End Sub

Sub Session_OnEnd
application.lock
application("activevisitors")=application("activevisitors")-1
application.unlock
End Sub

</SCRIPT>

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22

The first time a visitor gets to our pages, global.asa will be executed, and consequently, application("activevisitors") in line 4 will get a value equal to "0". Immediately (as a new session has started), in line 12, application("activevisitors") will be increased by one. Each time a new visitor gets to our pages application("activevisitors") will be increased by one, and identically, each time a session is finished, this parameter will be reduce by one (line 18).

In case we want to show the number of visitors in our page, we must use this kind of code :

index.asp
There are  <% =application("activevisitors") %> active visitors.

AspTutorial.info