global.asa

[Elig]

Sólo me funciona el contador de activos y no el de "hoy"

¿Qué hay mal? A simple vista me parece correcto.


Global.asa


<script language="VBScript" runat="Server">

Sub Application_OnStart

End Sub

Sub Application_OnEnd
End Sub

Sub Session_OnStart
Application.Lock

if Application("dia")<> Date then
Application("hoy")=1
Application("dia")=Date
else
Application("hoy")=Application("hoy")+1
end if

Application("visitante")= Application("visitante")+1
Application.UnLock
End Sub

Sub Session_OnEnd
Application.Lock
Application("visitante")= Application("visitante")-1
Application.UnLock
End Sub

</script>


otro documento:

<br>Ahora: <%=Application("visitante")%>
<br>Hoy: <%=Application("hoy")%>


Saludos