Cómo escribir código en asp para implementar el conteo de personas en línea

El nombre Global.asa' no se puede cambiar o no es válido. Este es un método estadístico relativamente simple. Muy bien

lt; SCRIPT LANGUAGE="VBScript" RUNAT="Server"gt;

Sub Application_OnStart

' Utilice el evento Application_OnStart aquí

'Defina aquí el período de validez en línea del usuario

'Defina aquí el período de validez en línea del usuario

' Defina aquí el período de validez en línea del usuario. Defina el tiempo en línea del usuario

Session.Timeout = 3

'Utilice el método de bloqueo para evitar que varios usuarios modifiquen el valor de la variable al mismo tiempo; de lo contrario, los datos se inexacto

Application.Lock

' Asigna un valor inicial a la variable: 0

Application("WhosOn") = 0

' Desbloquea la variable de aplicación

Application.UnLock