Utilizzo lo stesso script prova così e controlla che ti stampi il nome utente proveniente dal request:
codice:
Session("user") = Request("user")
response.write "prova1: " & Session("user") 
if InStr(1, Application("Users"), Session("user") & "|" ) = 0 then
response.write "prova2: " & Session("user") 
  'se l'utente non è già presente
  Application.Lock
  'viene aggiunto l'utente appena loggato alla stringa che contiene
  ' l'elenco degli utenti
  Application("Users") = Application("Users") & Session("user") & "|"
  Application.UnLock
end if
attento a cambiare il Request("user") con il tuo.
Fammi sapere e hai il mio post?
http://forum.html.it/forum/showthrea...hreadid=693425