I foud a code in this forum for showing the webuser who are online. The code works fine but I have the problem that the users are not deleted when the session is finish. There must be a failure in the global.asa which I don't know how to fix. Can sombodey help me? I added the call statement before the code because I retrieved always parens error because sub-file... Is perhaps there the mistake?
Here my code: *thx in advance mgroyal
<SCRIPT LANGUAGE='VBScript' RUNAT='Server'>
Application("userNames") = ""
Application("userNumber") = 0
'End Session after 10 min.
Session.Timeout = 10
'Delete Username from the list
CurrentUser = session("currentUser")
i = inStr(CurrentUser,";")-1
UserName = left(Session("CurrentUser"),i)
call replace(Application("userNames"),"|" & UserName,"")
Application("userNumber") = Application("userNumber") - 1