enviar email p/ mais de um endereço com CDONTS

[fidelbres 0]

<_<

 

alguém poderia me dizer como consigo enviar uma mensagem de indique este site para mais de um destinatário, eu tentei colocando vírgula no email do destinatário e não deu certo, olha o código dessa parte:

 

Set objCDO = Server.CreateObject("CDONTS.NewMail")

 

objCDO.To = amigo1, amigo2, amigo3

objCDO.From = seuemail

objCDO.Subject = "V I S I T E ! ! !"

objCDO.Body = htmlemail

objCDO.MailFormat = 0

objCDO.Bodyformat = 0

objCDO.Send

 

um abraço a todos

[fidelbres 0]

você pode fazer de dois modos :1-

do while not rs.eofSet objCDO = Server.CreateObject("CDONTS.NewMail")objCDO.To = amigo3objCDO.From = seuemailobjCDO.Subject = "V I S I T E ! ! !"objCDO.Body = htmlemailobjCDO.MailFormat = 0objCDO.Bodyformat = 0objCDO.Sendset objCDO = nothingrs.movenextloop

2-entretanto deste modo , na linha para aparecerão todos os destinatários que você enviou

Set objCDO = Server.CreateObject("CDONTS.NewMail")objCDO.To = amigo1objCDO.To = amigo2objCDO.To = amigo3objCDO.From = seuemailobjCDO.Subject = "V I S I T E ! ! !"objCDO.Body = htmlemailobjCDO.MailFormat = 0objCDO.Bodyformat = 0objCDO.Send

Obrigado, vou testar aqui e ver qual a melhor opção.um abraço