Ver Mensaje Individual
  #1 (permalink)  
Antiguo 15/03/2003, 18:29
Avatar de Artepop
Artepop
 
Fecha de Ingreso: noviembre-2002
Ubicación: Fuengirola
Mensajes: 292
Antigüedad: 22 años, 7 meses
Puntos: 1
Usuarios, visitas, páginas...

Usuarios activos
Visitas de hoy
Páginas vistas hoy

Me podrian ayudar como se hace

¿El global.asa se pone en el en el root? en mi caso la carpeta 'www'

Y en las carpetas donde tengo otras páginas que llaman a la función ¿tengo que poner otro global.asa dentro de la misma?

Lo hice con esto, pero no me sale:

Global.asa

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

Sub Application_OnStart()
Application.Lock
Application("ActiveUsers") = 0
Application("UsersHoy") = 0
Application("Hoy") = Date()
Application.UnLock
End Sub

Sub Application_OnEnd()
End Sub

Sub Session_OnStart()
Session("Start") = Now
Application.Lock
If Application("Hoy") = Date() Then
Application("ActiveUsers") = Application("ActiveUsers") + 1
Application("UsersHoy") = Application("UsersHoy") + 1
Else
Application("UsersHoy") = 1
Application("PaginHoy") = 1
Application("Hoy") = Date()
End If
Application.UnLock
End Sub

Sub Session_OnEnd()
Application.Lock
Application("ActiveUsers") = Application("ActiveUsers") - 1
Application.UnLock
End Sub
</script>


Llamar

<%=Application("ActiveUsers")%> usuarios activos
<%=Application("UsersHoy")%> visitantes hoy
<%=Application("PaginHoy")%> páginas hoy

Agradeceria si ven algún error, gracias
__________________
http://www.mfo.com.es/

Última edición por Artepop; 15/03/2003 a las 18:34