Me puede decir porque no funciona este codigo ASP

[Mahias]

Se supone que este codigo lo que hace es poder conatr los usuarios activos de uma pagina web pero lo que resulta es que al probar el codigo solo me aumenta los visitante y se supone que no se trata de eso si no que si una persona sale de la pagina tiene que restarme un usuario pero eso no resulta si alguien me pudiera ayudar y decirme por que no resulta le estaria agradecido.

Este codigo tiene que ir incluido en el archivo global.asa


<SCRIPT LANGUAGE="VBScript" RUNAT="Server">
Sub Application_OnStart
application("activos")=0
application("fecha")=date()
End Sub
Sub Application_OnEnd
End Sub
Sub Session_OnStart
application.lock
application("activos")=application(&quot ;activos")+1
application.unlock
End Sub
Sub Session_OnEnd
application.lock
application("activos")=application(&quot ;activos")-1
application.unlock
End Sub
</SCRIPT>

Y este ultimo codigo es el que me dice la cantidad de usuarios

<%=application("activos")%>

Se despide Atte.
Eduardo

[Chivil]

Te está faltando el CInt. Esto te sirve para transformar en entero el valor de la variable Activos.
entonces el código quedaría así:
<td><font face="Arial" color=#004080>En estos momentos hay <%=CInt(Application("activos"))%&g t; usuarios activos</font></td>
Espero que te sirva

[Holden]

El problema que te pasa es porque el global asa solo se da cuenta de que entra alguien cuando se hace una peticion sobre una página web. Pero no sabe cuando sale solo reconoce que hay un visitante menos cuando expira su session.
Hay muchos tutoriales sobre ese tema si no encontras avisame y te paso uno que tengo por aca.

Hasta donde tengo entendido no se puede hacer mucho mas.

<font face="Arial, Helvetica, sans-serif" size="2">Holden-@r[/CODE]