Numero de usuarios conectados

[algicor]

si, pero eso es valido unicamente si cierran la aplicacion correctamente, es decir, si pulsan algun boton de cerrar session o algo asi, pero si unicamente cierran la ventana del explorador, no se como hacer esa operacion. Es decir, en caso de cerrar la ventana del explorador, como hago:
SUB Session_OnEnd
Application.Lock
Application("usersonline")= Application("usersonline") - 1
Application.UnLock
END SUB