Como fazer para mandar Multiplos E-mails

[fabiosc80 0]

Ola Pessoal,Tenho uma dúvida meio embaçada aqui.Tenho que fazer um sistema que mande e-mails para os clientes porem tem que ser assim:Num campo Select de um formulario comum mas usando ele em formato multiple, quero que ao selecionar mais de um e-mail ele mande dessa forma.Abraços

[explore 3]

Faz um select normal e tenta da um loop!

[Marcelo Barcellos 0]

Ola Pessoal,

 

Tenho uma dúvida meio embaçada aqui.

 

Tenho que fazer um sistema que mande e-mails para os clientes porem tem que ser assim:

 

Num campo Select de um formulario comum mas usando ele em formato multiple, quero que ao selecionar mais de um e-mail ele mande dessa forma.

 

 

Abraços

<{POST_SNAPBACK}>

Quando há mais de um valor selecionado o form envia os dados separados por vírgula. Então você recebe os valores cria um Array e da um For..Next

 

ds_destinatario = Split(Request("ds_destinatario"),",")Set ObjEmail = Server.CreateObject("ObjEmail")....For i = 0 To Ubound(ds_destinatario)ObjEmai.AddRecipient ds_destinatario(i),ds_destinatario(i),1Next....ObjEmail.Send

[fabiosc80 0]

Pode ser usando do while loop?????

 

 

Ola Pessoal,

 

Tenho uma dúvida meio embaçada aqui.

 

Tenho que fazer um sistema que mande e-mails para os clientes porem tem que ser assim:

 

Num campo Select de um formulario comum mas usando ele em formato multiple, quero que ao selecionar mais de um e-mail ele mande dessa forma.

 

 

Abraços

<{POST_SNAPBACK}>

Quando há mais de um valor selecionado o form envia os dados separados por vírgula. Então você recebe os valores cria um Array e da um For..Next

 

ds_destinatario = Split(Request("ds_destinatario"),",")Set ObjEmail = Server.CreateObject("ObjEmail")....For i = 0 To Ubound(ds_destinatario)ObjEmai.AddRecipient ds_destinatario(i),ds_destinatario(i),1Next....ObjEmail.Send

<{POST_SNAPBACK}>

[Marcelo Barcellos 0]

Pq...Qual a diferença

[fabiosc80 0]

Pq...Qual a diferença

<{POST_SNAPBACK}>

Pòr nada nao só foi por perguntar só

 

Pra que serve o SPLIT?

[Marcelo Barcellos 0]

O Split serve para tornar uma string em um Array.Daria pra usar while .. loop...Mas quando tratamos com incremente de variavel , no caso a variavel "i", é mais fácil usar o For..Next

[fabiosc80 0]

Eu usei While Loop pois podia ser diferente aqui porem ele ta enviando o e-mail repetidas vezes para o mesmo e-mail.

 

exemplo

 

Se tem 7 pessoas no banco ele ta mandando 7 e-mails para cada um.

 

 

 

olha o código

 

'Envia e-mail com conteúdo do form	Set Mail = Server.CreateObject("Persits.MailSender")	Do While NOT TB.EOF	Mail.isHtml = true	Mail.Host = "mail.....com.br"	Mail.From = "admin@....com.br"	Mail.FromName = "Mult-Labor"		Mail.AddBCC TB("Email"),TB("Nome")	Mail.Subject = Assunto  Mail.Username = "admin@....com.br"  Mail.Password = "..."			mail.body = Descricao		if not mail.Send then    Response.Write " Ocorreu um erro no envio do email: <br>"    Response.Write mail.Response  Response.Write "<br><br><a href=""#"" onClick=""window.history.go(0);"">Tentar novamente</a>"  Response.End	end if	            TB.MoveNext     Loop

Sabe porque disso?

[Marcelo Barcellos 0]

Voce colocou o Loop no lugar errado......

 

O Loop deve ficar assim

 

Do While NOT TB.EOFMail.AddBCC TB("Email"),TB("Nome")Loop

[fabiosc80 0]

Voce colocou o Loop no lugar errado......

 

O Loop deve ficar assim

 

Do While NOT TB.EOFMail.AddBCC TB("Email"),TB("Nome")Loop

<{POST_SNAPBACK}>

Deu certo aqui.

 

Na verdade o "Do while not TB.EOF" tem que ficar antes do:

Set Mail = Server.CreateObject("Persits.MailSender")

[Marcelo Barcellos 0]

?????????Isso vai fazer que o e-mail seja enviado várias vezes !!!!

[dark0 0]

resolveu o problema?

[fabiosc80 0]

resolveu o problema?

<{POST_SNAPBACK}>

Deu certo sim e esta enviando um e-mail para cada cliente sem repetir varias vezes.

[Marcelo Barcellos 0]

Mas é o mesmo e-mail ???Você não queria incluir vários nomes no campo "Destinatário" ou seja, enviar um e-mail para todos. ???Se não for, desculpa, entendi errado ?

[fabiosc80 0]

Mas é o mesmo e-mail ???

Você não queria incluir vários nomes no campo "Destinatário" ou seja, enviar um e-mail para todos. ???

Se não for, desculpa, entendi errado ?

<{POST_SNAPBACK}>

Marcelo, era tb, mas no final mudaram o esquema aqui e nao precisou ser que nem você me ajudou.

Mas valeu mesmo assim beleza?

[cabral51 0]

Mas é o mesmo e-mail ???

Você não queria incluir vários nomes no campo "Destinatário" ou seja, enviar um e-mail para todos. ???

Se não for, desculpa, entendi errado ?

<{POST_SNAPBACK}>

Marcelo, era tb, mas no final mudaram o esquema aqui e nao precisou ser que nem você me ajudou.

Mas valeu mesmo assim beleza?

 

eu rpeciso enviar um email para varios destinatários como faço?