Contando visitantes activos
Para llevar un control de los visitantes activos en un
sitio es necesario que el servidor tenga soporte del globlal.asa.
Lo que se hace en él, es crear un variable del objeto application.
Esta variable será inicializada con cero dentro del global.asa cuando sea
iniciada la aplicación (onstart) y se irá incrementando cada vez que un nuevo
visitante inicie una sesión, se captura con el evento session_onstart.
Cuando un visitante abandona el sitio es necesario restar en uno la cantidad de sesiones,
eso se realiza gracias al evento session_onend.
global.asa
Este archivo contendrá la siguiente información y se ubicará en el directorio raíz del
sitio.
<SCRIPT LANGUAGE="VBScript"
RUNAT="Server">
Sub Application_OnStart
application("vactivos")=0
application("fecha")=date()
End Sub
Sub Application_OnEnd
End Sub
Sub Session_OnStart
application.lock
application("vactivos")=application("vactivos")+1
application.unlock
End Sub
Sub Session_OnEnd
application.lock
application("vactivos")=application("vactivos")-1
application.unlock
End Sub
</SCRIPT>
Y luego para mostrar esta cantidad de usuarios activos en
alguna parte de nuestro pagina.asp se debe incluir el siguiente código:
<%=application("vactivos")%>
Para que quede mejor se puede "mezclar" (como
habitualmente se hace con cualquier código ASP) con Html:
<p><font face=verdana
size=1>Hay <%=application("vactivos")%> usuarios activos.</font></p>
|
