Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

N3G4T1V3

Varios email

Recommended Posts

Galera eu quero enviar varios email usando o email cdonts alguem sabe como fica o codigo? Set objCDONTS = Server.CreateObject("CDONTS.NewMail") objCDONTS.From = strFromName & " <" & strFromEmail & ">" objCDONTS.To = strToEmail objCDONTS.BCC = "rodrigo@injapan.com.br" objCDONTS.Subject = strSubject objCDONTS.Body = strBody objCDONTS.Send Set objCDONTS = Nothing

Compartilhar este post


Link para o post
Compartilhar em outros sites

você tem os endereços num banco de dados? Se sim basta você fazer um while no banco para pegar os endereços e ir enviando os emails para todos os usuários cadastrados.

Compartilhar este post


Link para o post
Compartilhar em outros sites

eu consegui... assim: Set objCDONTS = Server.CreateObject("CDONTS.NewMail") objCDONTS.From = strFromName & " <" & strFromEmail & ">" objCDONTS.To = strToEmail1 & "," & strToEmail2 & "," & strToEmail3 objCDONTS.BCC = "rodrigo@injapan.com.br" objCDONTS.Subject = strSubject objCDONTS.Body = strBody objCDONTS.Send Set objCDONTS = Nothingporem ele num ta mandando a cópia oculta o BCC

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.