Tem alguma possibilidade de se mandar o mail para vários destinatários diferentes usando-se ; (ponto e vírgula) para separar as contas de e-mail?
Por favor, se houver uma forma postem aí!
Ultimamente uso assim:
<%
Destino = Request.Form("nomedocampo")
servidor = "servidor.server.com.br"
titulo = "Titulo da MSG"
Disparador = Request.Form("nomedocampo")
nombre = Request("nomedocampo")
Origen = Request("nomedocampo")
linkEnv = Request("nomedocampo")
msg = Request("nomedocampo")
Set Mail = Server.CreateObject("Persits.MailSender")
strBody = strBody & "<font face='Verdana, Arial, Helvetica, sans-serif' size='2' color='#555555'>"
strBody = strBody & "<p> Um amigo lhe enviou um link do portal Chibanas.com<br><br> "
strBody = strBody & "Nome do Amigo: "
strBody = strBody & "<b>" & nombre & "</b><br><br>"
strBody = strBody & "E-mail do seu Amigo: "
strBody = strBody & "<b>" & Origen & "</b><br><br>"
strBody = strBody & "Acesse este link: "
strBody = strBody & "<b> <a href=" & chr(34) & linkenv & chr(34) & ">" & linkenv & "</a></b><br><br>"
strBody = strBody & "Mensagem: "
strBody = strBody & "<b>" & msg & "</b><br><br>"
strBody = strBody & Mensaje & chr(10)
strBody = strBody & "</font>"
Mail.Host = servidor
Mail.Port = 25 ' Valor opcional. 25 es el puerto por defecto.
Mail.From = Request.Form("seumail")
Mail.FromName = Disparador ' Opcional
Mail.Subject = titulo
Mail.Body = strBody
Mail.IsHTML = True
Mail.AddAddress Destino
On Error Resume Next
Mail.Send
Response.Redirect("enviarok.asp")
Set Mail = Nothing
%>
E funciona perfeitamente para eu enviar para um destinatário apenas, quando coloco mais de dois, da tilt
Como contorno essa situação?
[]!
