ASP.NET - Envío de mails

   
Vista:

Envío de mails

Publicado por Richard Alexis (32 intervenciones) el 25/11/2009 03:40:42
Buenas noches amigos del foro, les escribo para preguntarles lo siguiente:

¿Cómo puedo hacer para enviar correos desde ASP .NET a 6 cuentas de correo a la vez?

Espero me puedan ayudar amigos ya que llevo tiempo buscando como hacer esa funcionalidad.

Gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Envío de mails

Publicado por flashnet (11 intervenciones) el 25/11/2009 12:29:49
Hola Richard,
te mando un ejemplo comentado un poco, para que te sirva de referencia.

Un saludo

CODIGO:

' Guardo Los Datos del cuerpo del email en una variable
Dim Body_Email As String

' Guardo Los Datos en una variable
Body_Email = "esto es una prueba" 'Cuerpo del correo
Dim email2 As New System.Net.Mail.MailMessage()
email2.To.Add("correo1@test.com") 'Dirección a la que se envia
email2.To.Add("correo2@test.com") 'Segunda dirección a la que se envia

email2.From = New System.Net.Mail.MailAddress("correo3@test.com", "Soy Manolete", System.Text.Encoding.UTF8)
email2.Subject = "Esto es una prueba"
email2.Body = Body_Email
'email2.IsBodyHtml = True 'Si vas a enviar como html o texto plano
email2.Priority = System.Net.Mail.MailPriority.Normal 'Prioridad del correo

Dim s As New System.Net.Mail.SmtpClient("servidorSMTP", 25) 'Dominio o Ip del servidor SMTP y puerto (en este caso 25)
s.Credentials = New System.Net.NetworkCredential("USUARIO", "CLAVE") 'Usuario y clave del servidor SMTP
s.EnableSsl = False 'Activar SSL
s.Send(email2)
email2 = Nothing

Try 'Si todo va bien
Response.wrinte Redirect("Envio Correo correcto")

Catch ex As Exception 'Si falla algo
Response.Write("ERROR: " & ex.Message)
End Try
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar