pdf adjunto a mail
Publicado por jaume (2 intervenciones) el 28/09/2008 20:29:27
.
Intento pasar el archivo adjunto al correo outlook con extensión .doc, . txt . xls y va bien, pero no con pdf
Que puedo hacer?
Set OutApp = CreateObject("Outlook.Application")
Set OutMail = OutApp.CreateItem(olMailItem)
With OutMail
.To = CStr(Me![Canal])
.CC = Me![CC]
.BCC = ""
.Subject = Me!ASUNTO
.Body = Me!CONCEPTO
.Attachments.Add "C: uta........M0008.pdf"
.Display
End With
Set OutMail = Nothing
Set OutApp = Nothing
Gracias
Intento pasar el archivo adjunto al correo outlook con extensión .doc, . txt . xls y va bien, pero no con pdf
Que puedo hacer?
Set OutApp = CreateObject("Outlook.Application")
Set OutMail = OutApp.CreateItem(olMailItem)
With OutMail
.To = CStr(Me![Canal])
.CC = Me![CC]
.BCC = ""
.Subject = Me!ASUNTO
.Body = Me!CONCEPTO
.Attachments.Add "C: uta........M0008.pdf"
.Display
End With
Set OutMail = Nothing
Set OutApp = Nothing
Gracias
Valora esta pregunta
0