Contador de visitantes activos en ASP

Utilizaremos para llevar el control de visitantes activos una variable del objeto application.

Esta variable la inicializaremos a cero en global.asa cuando iniciemos la aplicación (application_onstart) y la iremos incrementando en uno cada vez que un nuevo visitante entre en la aplicación , capturaremos esta entrada en el evento session_onstart tambien en globla asa.

Reduciremos en uno el numero de vistante cada vez que uno de ellos abandone nuestra aplicación, esto lo sabremos gracias al evento session_onend

Luego simplemente en nuestras páginas mostraremos el numero almacenado en la variable de aplicación.

global.asa

<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>

mipagina.asp

<html>

........

Sois actualmente <%=application("vactivos")%> visitantes concurrentes

.....

</html>

Autor: ASPTutor
http://www.asptutor.com/asp/vart.asp?id=35

Usuarios que han visto este tema también han visto...

- Frase personalizada para cada una de las 24 horas del dia
- Intranets con ASP
- Uso de Cookies con ASP
- RecordCount distinto de -1
- Manipulando la fecha y hora con ASP

- Versión imprimible de este documento

- Enviar por e-mail este documento