Para usuarios activos, paginas vistas en el dia, y los visitantes del dia
Código:
<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>
y pon esto en tu index.asp para llamarlos
<%=Application("ActiveUsers")%> usuarios activos
<%=Application("UsersHoy")%> visitantes hoy
<%=Application("PaginHoy")%> páginas hoy
supongo que será esto lo que necesitas o algo asi