global.asa
<SCRIPT LANGUAGE=VBScript RUNAT=Server>
Sub Application_OnStart
Application("usuarios_activos") = 0
End Sub
Sub Application_OnEnd
End Sub
Sub Session_OnStart
Session.Timeout = 20
Application.lock
Application("usuarios_activos") = Application("usuarios_activos") + 1
Application.unlock
End Sub
Sub Session_OnEnd
Application.lock
Application("usuarios_activos") = Application("usuarios_activos") - 1
Application.unlock
End Sub
</SCRIPT>
Puse este fichero en: C:\Inetpub\wwwroot
como no funcinó lo pasé al mismo donde está el index.asp
Fichero con título:
<HTML>
<HEAD>
<TITLE>Prueba</TITLE>
</HEAD>
<BODY bgcolor="#FFFFFF">
<br><br>
visitantes activos: <%= Application("usuarios_activos") %>
</BODY>
</HTML>
¿Alguien sabe donde está el error?
Gracias por vuestra ayuda.
