Saludos .
Tengo el siguiente problema, necesito enviar un e-mail con un archivo pdf adjunto a un servidot smtp, ya puedo enviar el e-mail pero sin el archivo adjunto pq si lo envio con el adjunto me marca el siguiente error:
"No se puede tener acceso al objeto CDO.Message"
este es el codigo que utilizo:
Imports System.Web.Mail
Dim MyEmail As New System.Web.Mail.MailMessage
Dim i As Integer
Dim smtpMail As System.Web.Mail.SmtpMail
Dim att As New MailAttachment(Application.StartupPath & "\Solicitud\Solicitud.pdf", MailEncoding.UUEncode)
With MyEmail
.From = "Control de Llamadas"
.To = "
[email protected]"
.Cc = "
[email protected]"
.Subject = "Solicitud de Registro"
.Body = "Esto es una prueba si te llega avisame...Juan Carlos"
.BodyFormat = MailFormat.Text
.Priority = Web.Mail.MailPriority.High
.Attachments.Add(att)
End With
Try
smtpMail.SmtpServer = "185.100.11.203"
smtpMail.Send(MyEmail)
Catch ex As Exception
MsgBox(ex.Source & Chr(13) & ex.Message)
End Try
End Sub
Agredezco de antemano su ayuda
