asp utenti online

[SteR9]

sto scrivendo un forum in asp e avrei la necessità di visualizzare gli utenti collegati al forum...come potrei fare??
grazie!

[VICIUS]

nonprendere per oro colato quello che dico ma secondo me dovresti usare il file global.asa e i vari eventi che vengono eseguiti alla connesione. cionci aveva postato anche quanlche frammento di codice qualche tempo fa.

ciao

[matpez]

Originariamente inviato da VICIUS
nonprendere per oro colato quello che dico ma secondo me dovresti usare il file global.asa e i vari eventi che vengono eseguiti alla connesione. cionci aveva postato anche quanlche frammento di codice qualche tempo fa.

ciao

No è giusto, ecco ti qua come fare: http://www.aspitalia.com/liste/usag/...&Search=utenti

PS: siccome la Session_OnEnd è un evento che viene scaturito quando il tempo di validità della sessione scade è bene settare una varibile session nn troppo alta, altrimenti succede che se tu imposti il timeout a 180 minuti, fino a 3 ore dopo che l'utente è uscito rimarrà virtualmente sul sito

[SteR9]

Originariamente inviato da matpez
No è giusto, ecco ti qua come fare: http://www.aspitalia.com/liste/usag/...&Search=utenti

PS: siccome la Session_OnEnd è un evento che viene scaturito quando il tempo di validità della sessione scade è bene settare una varibile session nn troppo alta, altrimenti succede che se tu imposti il timeout a 180 minuti, fino a 3 ore dopo che l'utente è uscito rimarrà virtualmente sul sito

io ho fatto così

Sub Application_OnStart 
   Application.Lock 
   Application("collegati") = 0 
   Application("utenti") = request.cookies("utente_mio_forum")("login")
   Application.UnLock
   Session.Timeout = 1
End Sub 



Sub Session_OnStart 
  Application.Lock 
  Application("collegati") = Application("collegati") + 1 
  Application("utenti") = Application("utenti") + request.cookies("utente_mio_forum")("login")
  Application.UnLock 
     Session.Timeout = 1
End Sub 



Sub Session_OnEnd 
  Application.Lock 
  Application("collegati") = Application("collegati") - 1 
  Application("utenti") = Application("utenti") - request.cookies("utente_mio_forum")("login")
  Application.UnLock 
     Session.Timeout = 1
End Sub

però se un utente entra più volte mi stampa più volte lo stesso nick...come faccio a controllare che venga inserito una sola volta?

[cionci]

Come fa un utente ad entrare più di una volta ? L'unico modo di faro è con due browser (non due finestre dello stesso) differenti...

[SteR9]

Originariamente inviato da cionci
Come fa un utente ad entrare più di una volta ? L'unico modo di faro è con due browser (non due finestre dello stesso) differenti...

ma sei io aggiorno più volte la pagina con questo script

<% 
    response.write "Ci sono " & Application("collegati") & " utenti collegati." 
	response.Write "nick " & Application("utenti")
%>

il contatore si incrementa....

[SteR9]

Uppettino