Usuarios online

[mrabacus]

hola
he buscado en este foro ayuda sobre lo que quiero hacer, pero no encuentro la soluciona a lo que me pasa

tengo una web basada en asp y access

quiero saber si un usuario esta online o no

en la bd tengo un campo "conectado"
en el login lo pongo a "Si", y en el logout a "No"

el problema es cuando se desconecta por timeout

he leido por ahi que controlandolo en el evento session_onEnd() del fichero global.asa bastaria, pero no me funciona

les pongo el contenido de ese evento

sub session_onEnd()
application.lock
application("num_usuarios") = application("num_usuarios") - 1
application.unlock

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("bd1.mdb"))
dim iduser, var_conectado
iduser = session("user_autentificado")
var_conectado = "No"
sSQL = "update TablaUsuarios set conectado = '" & var_conectado & "' where id_usuario='" & iduser & "'"
Set RS = Conn.Execute(sSQL)
Conn.Close
end sub

el funcionamiento de la variable "num_usuarios" funciona, pero el actualizar al campo "conectado" no funciona
no se si es porque en el momento en el que se ejecuta este evento, la variable de sesion "user_autentificado" (que se crea en el login) ya no existe

por favor, alguien me puede dar alguna idea de lo que pasa?

muchas gracias