Newsletter enviando email no campo "Para" ao invés de "Cóp

[Lucas Sena 0]

Olá galera. Tenho um sistema de newsletter em que o usuário faz uma pesquisa, seleciona os emails para qual serão enviado e em seguida é redirecionado para uma página aonde ele coloca título e mensagem do e-mail para então enviar.

Ele envia normal, os usuários selecionados recebem o email tudo certinho, o problema é que ele ao invés de mandar ou um por um, ou para apenas um email e os demais como cópia oculta, ele manda todos os destinatários no campo para. Ai quando o destinatário recebe o email, ao invés de estar somente o email dele no campo "para", está o email de todos os selecionados para receber o msm.

Alguém tem ideia de como concertar isso?

Abraços!

[xanburzum 169]

use o campo BCC Com Cópia Oculta ou CC Com Cópia , se estiver usando o CDOSYS, use assim:

 

 

<%
Set myMail=CreateObject("CDO.Message")
myMail.Subject="Sending email with CDO"
myMail.From="mymail@mydomain.com"
myMail.To="someone@somedomain.com"
myMail.Bcc="someoneelse@somedomain.com"
myMail.Cc="someoneelse2@somedomain.com"
myMail.TextBody="This is a message."
myMail.Send
set myMail=nothing
%> 

[Lucas Sena 0]

Opa xanburzum, vlw pela resposta, mas estou usando um formulário um pouco diferente.

Ele pega os dados da consulta e envia o email somente aos selecionados na pesquisa anterior.

Segue ele abaixo:

 

	sNmUsuario = "Cliente Lucas Sena"

' Agora chamo a função que vai enviar o email para os email que estão no hidden.
iRet = EnviarEmail( 	"LucasSena", sEMAIL_REMETENTE,					_
						sNmUsuario, "",			_
						Request.Form( "fsSubject" ), sHtmlEmail,	_
						vsEmailUsuario, sMsgErro					)

IF iRet < 0 THEN
	Response.Write( sMsgErro )
	Response.End
END IF

 

Abraços!

[xanburzum 169]

na sua função EnviarEmail, onde estiver especificando o .To (para)

altere para .Bcc

[Lucas Sena 0]

Já tentei, ele nem carrega a página.

Já tentei adicionar o campo de mensagem oculta e mudar o mail.to para um email em específico e pegar o valor gerado da pesquisa e colocar no campo cópia oculta, mas qualquer alteração que eu faço da erro na página ou na hora do envio.