La clase es sencilla, es para enviar correos con autentificación:
Código:
Con un proyecto normal de biblioteca de clases no puedo usar System.Web.Mail.MailMessage#Region "Mensajes por SMTP" Public Class Mensaje Protected Friend Desde As String = ConfigurationSettings.AppSettings("mailCartero") Protected Friend Hacia As String = "" Protected Friend Titulo As String = "" Protected Friend Cuerpo As String = "" Protected Friend Adjunto As String = "" Public Sub enviar() Dim mensaje As New System.Web.Mail.MailMessage With mensaje .Fields("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1 .Fields("http://schemas.microsoft.com/cdo/configuration/sendusername") = "username" .Fields("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "password" .From = Desde .To = Hacia .Subject = Titulo .Body = Cuerpo .BodyFormat = Mail.MailFormat.Html If Adjunto <> "" Then .Attachments.Add(Adjunto) End If End With Dim mailSMTP As System.Web.Mail.SmtpMail mailSMTP.SmtpServer = ConfigurationSettings.AppSettings("SMTPServer") mailSMTP.Send(mensaje) End Sub End Class #End Region
¿sigo haciéndolo como proyecto web o hay otra manera?
Gracias y un saludo.