Este conocido script que se encuentra en casi todos los sitios de ASP, sirve para contar los visitantes
activos (presentes en el momento), que hay en nuestro sitio web.
El ejemplo que está aqui abajo muestra cuantos visitantes hay activos en este momento en SoloASP.com.ar
El código se debe usar en el archivo Global.asa. No debe ir encerrado entre <% y %> y debe
ser lo único que haya dentro del mismo. (Bueno, no lo único, pero jugar con el Global.asa no lo recomiendo).
En este momento hay 68 usuario/s en nuestro sitio
Aqui está el código que va en el Global.asa
<script language=vbscript runat=server>
Sub Application_OnStart
Application("Activos") = 0
End Sub
Sub Application_OnEnd
End Sub
Sub Session_OnStart
Application.Lock
Application("Activos") = Application("Activos") + 1
Application.Unlock
End Sub
Sub Session_OnEnd
Application.Lock
Application("Activos") = Application("Activos") - 1
Application.Unlock
End Sub
</script>
Y para mostrar la informacion que recoge el Global.asa, o sea para mostrar
los usuarios activos como lo hice yo en mi ejemplo, deben poner lo siguiente en la página que muestran
el dato:
<P>En este momento hay <%=Application("Activos")%>
usuario/s en nuestro sitio</P>
