La clase Cartero está escrita en VB, pero vamos, es muy sencillita. En este caso es para correo con autenticación. No obstante te recomiendo que de momento no empieces a utilizar la clase Cartero u otra que te crees tú, si no que utilices el envío normal de mensajes, es decir, escribiendo todo el código para que te vayas familiarizando con él.
Código:
Imports System.Configuration
Imports System.Web.Mail
Public Class Mensaje
Public Desde As String = ConfigurationSettings.AppSettings("mailCartero")
Public Hacia As String = ""
Public Titulo As String = ""
Public Cuerpo As String = ""
Public Adjunto As String = ""
Public Sub enviar()
Dim mensaje As New MailMessage
With mensaje
.Fields("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
.Fields("http://schemas.microsoft.com/cdo/configuration/sendusername") = ConfigurationSettings.AppSettings("sendusername")
.Fields("http://schemas.microsoft.com/cdo/configuration/sendpassword") = ConfigurationSettings.AppSettings("sendpassword")
.From = Desde
.To = Hacia
.Subject = Titulo
.Body = Cuerpo
.BodyFormat = MailFormat.Html
If Adjunto <> "" Then
.Attachments.Add(Adjunto)
End If
End With
Dim mailSMTP As SmtpMail
mailSMTP.SmtpServer = ConfigurationSettings.AppSettings("SMTPServer")
mailSMTP.Send(mensaje)
End Sub
End Class
Por otro lado, en el tema que nos atañe, había pensado en que a lo mejor es preferible invocar un servicio web para el envío masivo de correos a la lista de distribución. ¿Qué opináis de esto?
Un saludo.