Pagine e Global.asa

Col seguente script, è possibile conteggiare le pagine viste da tutti gli utenti connessi.

<SCRIPT LANGUAGE="VBScript" RUNAT="Server">

Sub Application_OnStart

Application.Lock

Application("pagine") = 0

Application.UnLock

End Sub

Sub Session_OnStart

Application.Lock

Application("pagine") = Application("pagine") + 1

Application.UnLock

End Sub

</SCRIPT>

Per salvare il dato, bisogna modificare lo script proposto