Spedisci la mail con i destinatari nel campo BCC (Blind Carbon Copy) ovvero la copia conoscenza nascosta.
In una vecchia pagina ASP usando CDO.Message avevo fatto così:
codice:
        
Dim objMail, objConfig

' Crea l'oggetto email
Set objMail = Server.createObject("CDO.Message")


' Dimensiona l'oggetto configurazione
Set objConfig = Server.createObject ("CDO.Configuration")


' Imposta le configurazioni
With objConfig


' Server SMTP di uscita
' ATTENZIONE! Usare il proprio indirizzo di server email!
' E' FONDAMENTALE per l'invio della email
.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "localhost"


' Porta SMTP
.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25


' Porta CDO
.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2


' Timeout
.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
.Fields.update


End With


' Assegna le configurazioni
Set objMail.Configuration = objConfig


' Assegna all'oggetto le proprietà necessarie
objMail.From = Indirizzo del mittente
objMail.Bcc = destinatario1;destinatario2;...
objMail.Subject = "Oggetto della mail"


' Invia l'email
objMail.Send()


Set objMail = Nothing
Vedi se ti può essere utile