Enviar un correo por SMTP

Artículo por Club Developers · 11 mayo 2006

2083 vistas

Usaremos la clase System.Web.Mail



vbnet
  1. Shared Sub Main(ByVal args As String())
  2.     
  3. Dim msg As MailMessage = New MailMessage
  4.     
  5.     msg.From = "from@undominio.com"
  6.     msg.To = "to@undominio.com;toto@otrodominio.com"
  7.     msg.Cc = "cc@undominio.com"
  8.     msg.Body = "Hola" & Convert.ToChar(10) & "" + "Esto es el contenido del correo" & Convert.ToChar(10) & "" + "Saludos"
  9.     msg.Attachments.Add(New MailAttachment("c:\fichero.txt", MailEncoding.UUEncode))
  10.     SmtpMail.SmtpServer = "smtp.dominio.com"
  11.     SmtpMail.Send(msg)
  12. End Sub



Nota: las excepciones que pueda levantar el método Send, no suelen ser muy explÃcitas.