Credo di non aver capito ...

Gli indirizzi che valorizzano la variabile mailto da dove arrivano? Da un DB? Se si, avrai N record ognuno con 1 indirizzo email ... giusto?

Se è così devi ciclare questa riga in questo modo




codice:
do while not Rs.EOF
mailto=Rs("MiocampoDB")
Invia Mail 
Rs.MoveNext
Loop
Dove:
Rs è il recordset aperto per estrarre i valori dal DB
Rs("MiocampoDB") rappresenta il valore del campo che contiene l'email