Esempio di file global.asa (ASP) con gestione del conteggio degli utenti collegati tramite gli eventi generati dalla sessione.

VBScript

<SCRIPT LANGUAGE=VBScript RUNAT=Server>
'importa le costanti ADO
'equivale ad includere in ogni file ADOVBS.INC
<!--METADATA Type="typelib" uuid="{00000205-0000-0010-8000-00AA006D2EA4}"-->

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

Sub Session_OnStart
  application.Lock 
  application("countUser") = application("countUser") + 1
  application.UnLock 
End Sub 
Sub Session_OnEnd
  application.Lock 
  application("countUser") = application("countUser") - 1
  application.UnLock 
End Sub 
</SCRIPT>
Tags:
ASP12
Potrebbe interessarti anche: