Cancellare i doppioni

[Luca1317]

Ho uno script che mi visualizza gli utenti connessi in quel momento tramite l'oggetto Application.

Vengono visualizzati correttamente ma se mi connetto 2 volte con lo stesso utente senza effettuare il logout ovviamente mi scrive il nome utente 2 volte.

Es.: utenti connessi: Luca - Luca - Luca - Andrea

Come posso fare per visualizzare solo una volta il nome luca?

x=Application("nomiusers") 
x=x & " " & username 
Application("nomiusers")=x 
response.write(" - ")&(Application("nomiusers"))

[supermac]

prova, non sono sicuro sia corretto

IF Instr(1," " & x & " ", " " & username & " ",1)=0 THEN
x=x & " " & username
END IF

[Luca1317]

Originariamente inviato da supermac
prova, non sono sicuro sia corretto

IF Instr(1," " & x & " ", " " & username & " ",1)=0 THEN
x=x & " " & username
END IF

ho inserito il codice che mi hai suggerito, funziona ma ora ho il problema inverso:

se mi loggo con internet explorer e subito dopo con firefox non mi scrive 2 volte "utenti connessi: luca luca" ma una volta ("utenti connessi: luca") e fin quì va benissimo

il problema è che se faccio il logout con uno dei due browser mi dice utenti "connessi: "(e non scrive nessun nome anche se l'oggetto application esiste ancora perchè riesco a navigare nelle pagine protette)

x=Application("nomiusers") 


IF Instr(1," " & x & " ", " " & username & " ",1)=0 THEN
x=x & " " & username
END IF


Application("nomiusers")=x 
response.write(" ")&(Application("nomiusers"))

[supermac]

il codice non ripulisce la tua var application dai doppioni, evita solo che entri un doppione nuovo

[optime]

non va perché tu aggiungi l'ultimo username con solo uno spazio all'inizio

devi confrontare " " & username & " " con application("nomiusers") & " "

[Luca1317]

avevo scritto che non andava ma poi verificando meglio funziona ma ho un problema diverso...ho modificato l'ultimo messaggio probabilmente mentre stavate scrivendo.

Ho inserito il codice che mi hai suggerito, funziona ma ora ho il problema inverso:

se mi loggo con internet explorer e subito dopo con firefox non mi scrive 2 volte "utenti connessi: luca luca" ma una volta ("utenti connessi: luca") e fin quì va benissimo

il problema è che se faccio il logout con uno dei due browser mi dice utenti "connessi: "(e non scrive nessun nome anche se l'oggetto application esiste ancora perchè riesco a navigare nelle pagine protette)

x=Application("nomiusers") 


IF Instr(1," " & x & " ", " " & username & " ",1)=0 THEN
x=x & " " & username
END IF


Application("nomiusers")=x 
response.write(" ")&(Application("nomiusers"))

[optime]

dipende da come controlli la navigazione nelle pagine protette

[supermac]

I problemi della visualizzazione della application dipendono da quel che combina sul logout: la pulizia della application dallo username che fa logout dovrebbe essere

Application("nomiusers")= Trim(Replace(" " & Application("nomiusers") & " "," " & username & " ", ""))

Per la navigazione dipende da come controlli la Application("nomiusers") nelle pagine.

[supermac]

pardon, cappellai la pulizia della application...
Application("nomiusers")= Trim(Replace(" " & Application("nomiusers") & " "," " & username & " ", " "))
corrected

[Luca1317]

il logout lo faccio così:

dim usercorrente
usercorrente=session("login2")

  Application("nomiusers")=replace(Application("nomiusers"),usercorrente,"")


Session.Abandon