Eliminare ultimo carattere [ASP]

[abab]

Buongiorno a tutti, con uno script prelevo dei dati da una pagina XML per poi inserirli in un database Access. Al momento in cui vengono prelevati, però, anche l' ultimo dato ha la virgola come da istruzione. Come faccio a togliere l' ultimo carattere cioè l' ultima virgola?

[Vincent.Zeno]

var= trim("a,b,c,d,")
if mid(StrReverse(var),1,1) ="," then
    var= mid(var,1,len(var)-1)
else
    var=var
end if

ci ho messo anche la verifica che l'ultimo carattere sia effettivamente una virgola

buon lavoro