
27/03/2006, 14:01
|
 | | | Fecha de Ingreso: enero-2006 Ubicación: Chile
Mensajes: 237
Antigüedad: 19 años, 3 meses Puntos: 1 | |
EJEMPLO DE GLOBAL ASA.
ESTO CUENTA LA CANTIDAD DE PERSONAS QUE ESTAN VIENDO TU PAGINA EN ESTE MOMENTO.
EJEMPLO PARA MOSTRAR LA APLICACION DE LAS VARIABLES DE APLICACION.
<object id="objmiInfo" runat="server" scope="application" progid="mswc.myInfo">
</object>
<script language="VBScript" runat="server">
'--sentencias que se ejecutan al entrar el primer usuario
sub application_OnStart()
'la primera vez que entra el primer usuario a esta pagina inicia el contador
application("ActiveUsers")=0
end sub
sub session_onstart()
'--sentencias que se ejecutan cada vez que entra un usuario
application.lock
'se cierra la aplicacion para que ningun otro usuario entre en este momento
'esto sucede en milesimas de segundo
'se agrega un usuario mas a la cuenta
application("ActiveUsers")=Application("ActiveUser s")+1
'se abre el contador para que continue funcionando
application.Unlock
end sub
sub session_OnEnd
'--sentencias a ejecutar al irse el usuario
application.lock
'el usuario deja de visualizar esta pagina y lo descontamos del contador
application("ActiveUsers")=application("ActiveUser s")-1
application.Unlock
end sub
</script>
ESA ES UNA APLICACION GENERAL PARA ESTE TIPO DE VARIABLES.
__________________ Atte,
A n g e l u s
Concepción - Chile más vale respuestas bien pensadas, que 7000 post |