Ver Mensaje Individual
  #2 (permalink)  
Antiguo 18/01/2006, 07:11
tammander
 
Fecha de Ingreso: enero-2006
Ubicación: Torroles (Costa der Só)
Mensajes: 1.017
Antigüedad: 19 años, 3 meses
Puntos: 7
En el archivo global.asa puedes usar cuatro procedimientos. Te pongo un ejemplo de como va:

<script Language="VBScript" RUNAT=Server>
Sub Application_OnEnd()
Application.Contents.RemoveAll()
End Sub

Sub Application_OnStart()
Application("NumSesion") = 0
Application("NumVisitas") = 0
End Sub

Sub Session_OnEnd()
Application("NumSesion") = Application("NumSesion") - 1
End Sub

Sub Session_OnStart()
Session.Timeout = 60
Application("NumSesion") = Application("NumSesion") + 1
Application("NumVisitas") = Application("NumVisitas") + 1
End Sub
</script>