Los pdfs se crean bien, de hecho el email que queda en elementos enviados del
Outlook está bien. Se lee sin problemas.
El problema lo tiene el que le llega al destinatario. Ese queda corrupto.
Que podrá ser? En otras PCs anda!
Aquí les copio el código:
IF nDestino = crptMapi Then
cPath = "c:\"
cNombArchivo = Trim(dbcTipoLici.BoundText) + Trim(txtNumero.Text) +
".pdf"
Report.PaperSize = crPaperLegal
Report.ExportOptions.DiskFileName = cPath + cNombArchivo
Report.ExportOptions.FormatType = crEFTPortableDocFormat
Report.ExportOptions.DestinationType = crEDTDiskFile
Report.ExportOptions.PDFExportAllPages = True
Report.Export False
DoEvents
Dim m_OutLook As Outlook.Application
Dim objMail As Outlook.MailItem
Dim objAttach As Outlook.Attachment
Set m_OutLook = New Outlook.Application
Set objMail = m_OutLook.CreateItem(Outlook.OlItemType.olMailItem)
objMail.To = sTo
objMail.Subject = sAsunto
objMail.Body = sMensaje
Set objAttach = objMail.Attachments.Add(cPath + cNombArchivo)
For i = 0 To lstAdj.ListCount - 1
Set objAttach = objMail.Attachments.Add(lstAdj.List(i))
Next
objMail.Send
Set m_OutLook = Nothing
EliminarArchivo (cPath + cNombArchivo)
End If
De: [email protected] [mailto:[EMAIL PROTECTED] En nombre de Juan Jose
Costello Levien
Enviado el: Lunes, 04 de Febrero de 2008 04:31 p.m.
Para: vbusers List Member
Asunto: [vbusers] Problemas Email Pdfs adjuntos
Hola Claudia,
Si tenés el fuente, revisalo a ver como hace para crear los PDF, para saber
donde puede llegar a estar el error.
Me parece que una solución rápida es subir los PDF a un portal web y mandar el
link por email. Quiero suponer que esa información no es confidencial, al
mencionar que la enviás por mail, por lo que publicarla en un portal sería una
solución conveniente.
Espero haberte ayudado. Saludos.
Juan
On lun, 2008-02-04 at 16:20 -0300, Claudia E. Abad wrote:
Gente:
A ver si a alguien le pasó lo siguiente:
Tengo un sistema en Visual que manda emails con adjuntos pdf que creo
utilizando el crystal reports.
Los pdfs se crean bien en la PC, de hecho en la bandeja de enviados queda el
email y el adjunto se
abre sin problemas.
Ahora, al destinatario le llega corrupto el adjunto y no lo puede abrir. Que
podrá ser?
Alguna sugerencia?
Desde ya, muchas gracias.
Claudia.
--
Juan Jose Costello Levien
[EMAIL PROTECTED]
