Cuando alguien entra si actualizo en ese momento veo que aumenta en una unidad, pero si alguien sale no me disminuye en una unidad, o si lo hace no es en ese mismo momento. ¿Que ocurre?




<SCRIPT LANGUAGE=VBScript RUNAT=server>
sub application_onStart()
'sentencias que se ejecutan al entrar el primer usuario
application("num_usuarios")=0
end sub
sub session_onStart()
'sentencias que se ejecutan cada vez que entra un usuario
application.lock
application("num_usuarios") = application("num_usuarios") + 1
application.unlock
end sub
sub session_onEnd()
'sentencias a ejecutar al irse el último usuario
application.lock
application("num_usuarios") = application("num_usuarios") - 1
application.unlock
end sub
</SCRIPT>