Eliminazione virgola finale

[[trodat]]

Ciao a tutti.

Con questo codice riesco ad ottenere i nomi degli utenti connessi ad un forum:

email = objRS("strEMail")
strNomeCognome = Left(email,InStr(email,"@")-1) 
strNomeCognome = replace(strNomeCognome, ".", " ")

response.write strNomeCognome &", "

Il problema è che vedo questo:

pippo pasticcio, tiziano tizio, beppe nappa,

Come elimino la virgola finale su beppe nappa ???

Grazie

[Stan]

strNomeCognome = Left(strNomeCognome, Len(strNomeCognome)-1)

[[trodat]]

Bé non è proprio così:

     strNomeCognome = Left(email,InStr(email,"@")-1) 
     strNomeCognome = replace(strNomeCognome, ".", " ")
     strNomeCognome = Left(strNomeCognome, Len(strNomeCognome)-1) 

        		Response.Write strNomeCognome &", "

Ottengo:

pippo pasticci, tiziano tizi, beppe napp,

[s0r42]

Il trucchetto qui è mettere la virgola prima del nome, ma solo a partire dal secondo basandosi su un booleano che viene attivato al completamento del primo ciclo

[[trodat]]

Originariamente inviato da s0r42
Il trucchetto qui è mettere la virgola prima del nome, ma solo a partire dal secondo basandosi su un booleano che viene attivato al completamento del primo ciclo

belle parole, ma cosa vuoi dire?

[willybit]

visto che sei all'interno di un ciclo puoi usare una variabile così

virgola = ""
do while not objRS.EOF
  email = objRS("strEMail")
  strNomeCognome = Left(email,InStr(email,"@")-1) 
  strNomeCognome = replace(strNomeCognome, ".", " ")

  response.write virgola & strNomeCognome
  virgola=", "
  objRS.MoveNext
loop

[Stan]

Originariamente inviato da [trodat]
Bé non è proprio così:

     strNomeCognome = Left(email,InStr(email,"@")-1) 
     strNomeCognome = replace(strNomeCognome, ".", " ")
     strNomeCognome = Left(strNomeCognome, Len(strNomeCognome)-1) 

        		Response.Write strNomeCognome &", "

Ottengo:

C'hai grossa crisi, o forse ce l'ho io

Quel codice lì toglie l'ultimo carettere di stringa

Se la tua stringa è

"pippo, paperino, topolino,"
poi diventa
"pippo, paperino, topolino"

Se era
"topolino"
diventa
"topolin"