I forum Ricerca FAQ
Fai una domanda
Ultimo messaggio
viki1967
viki1967
il 29 luglio 2004 alle 13:53
261 messaggi dal 01 aprile 2003
Qualcuno mi spiegherebbe come posso separare con una virgola i nomi degli utenti collegati al mio sito, provo così: 
 Response.Write "<b><font color=red size=1 font face=verdana> " & arrUtenti(i) & ",</b></font>"

ma restituisce:
Utenti connessi: pippo, gigi,,
Modificato da viki1967 il 29 luglio 2004 13.54 -
RispondiQuoting
silviacantagalli
silviacantagalli
il 29 luglio 2004 alle 14:43
42 messaggi dal 14 maggio 2004
dim utenti

for i=0 to Ubound(arrUtenti)-1
if i<> ubound(arrUtenti-1) then
utenti=utenti & arrutenti(i) &","
else
utenti=utenti & arrutenti(i)
end if

Next
Response.write utenti
RispondiQuoting
viki1967
viki1967
il 29 luglio 2004 alle 14:57
261 messaggi dal 01 aprile 2003
Grazie, così come l'hai suggerita va in errore (mismacht) l'ho modificata così:
<%
dim arrUtenti
Response.Write "<b><font color=blue size=1 font face=verdana>Utenti Attivi: </b></font>"
arrUtenti = Split(Application("Users"),"|")
for i = 0 to UBound(arrUtenti)
dim utenti 
utenti=utenti & arrUtenti(i) & ", " 
next
Response.write "<b><font color=red size=1 font face=verdana> " & utenti & "</b></font>"
%>

ma continua a scrivere:
Utenti connessi: pippo, gigi,,
RispondiQuoting
viki1967
viki1967
il 29 luglio 2004 alle 15:26
261 messaggi dal 01 aprile 2003
Rettifico:
 <%
dim arrUtenti
arrUtenti = Split(Application("Users"),"|")
dim utenti 
for i = 0 to Ubound(arrUtenti)-1
utenti = utenti & arrUtenti(i) &", " 
Next 
Response.Write "<b><font color=red size=1 font face=verdana> " & utenti & "</b></font>"
%>

restituisce:
Utenti connessi: pippo, gigi,

ho eliminato una virgola ma non va bene del tutto...
Modificato da viki1967 il 29 luglio 2004 15.28 -
RispondiQuoting
viki1967
viki1967
il 29 luglio 2004 alle 15:41
261 messaggi dal 01 aprile 2003
code funzionante:
<%
Dim arrUtenti
Response.Write "<b><font color=blue size=1 font face=verdana>Utenti Attivi: </b></font>"
arrUtenti = Split(Application("Users"),"|")
dim utenti 
for i = 0 to Ubound(arrUtenti)-1
<b>if i<> UBound(arrUtenti)-1 then</b> 
utenti = utenti & arrUtenti(i) & ", "
else 
utenti = utenti & arrUtenti(i) 
end if  
Next 
Response.Write "<font color=red size=1 font face=verdana> " & utenti & "</font>"
%>

in grassetto l'errore.... di battitura naturalmente.
RispondiQuoting

Torna al forum | Feed RSS

ASPItalia.com non è responsabile per il contenuto dei messaggi presenti su questo servizio, non avendo nessun controllo sui messaggi postati nei propri forum, che rappresentano l'espressione del pensiero degli autori.