No funciona Global.asa
Publicado por B.V.G (18 intervenciones) el 12/01/2001 00:00:00
Hola, Quiero visualizar el numero de usuarios activos y he puesto el siguiente codigo en global.as que esta en el mismo directorio que el resto de programas, pero no me hace nada.
<SCRIPT LANGUAGE="VBScript" RUNAT="Server">
Sub Application_OnStart
Application("ActiveUsers") = 0
End Sub
Sub Session_OnStart
Session.Timeout = 20
Session("Start") = Now
Application.Lock
Application("ActiveUsers") = Application("ActiveUsers") + 1
Application.UnLock
End Sub
Sub Session_OnEnd
Application.Lock
Application("ActiveUsers") = Application("ActiveUsers") - 1
Application.UnLock
End Sub
</SCRIPT>
Y luego en el programa que lo llama hago:
<p><strong> Usuarios activos <% = Application("ActiveUsers")%>
Que es lo que hago mal.
Muchas gracias.
<SCRIPT LANGUAGE="VBScript" RUNAT="Server">
Sub Application_OnStart
Application("ActiveUsers") = 0
End Sub
Sub Session_OnStart
Session.Timeout = 20
Session("Start") = Now
Application.Lock
Application("ActiveUsers") = Application("ActiveUsers") + 1
Application.UnLock
End Sub
Sub Session_OnEnd
Application.Lock
Application("ActiveUsers") = Application("ActiveUsers") - 1
Application.UnLock
End Sub
</SCRIPT>
Y luego en el programa que lo llama hago:
<p><strong> Usuarios activos <% = Application("ActiveUsers")%>
Que es lo que hago mal.
Muchas gracias.
Valora esta pregunta


0