Exportar Crystal 8.0 a Pdf
Publicado por Ezequiel Namios (3 intervenciones) el 25/09/2006 21:15:10
Estoy teniendo un problema cuando exporto un reporte de crystal report version 8.0 a un archivo PDF mediante codigo de visual basic 6.0.
el problema es que no me respeta el formato del reporte (es decir la letra en negrita, recuadros, espaciado de caracteres, etc). y como son contratos si no salen iguales no me sirven.
Agradeceria que alguien que sepa la forma de solucionarlo me lo comunique.
desde ya muchas gracias.
[email protected]
adjunto el codigo que estoy usando
Dim Aplication As CRAXDRT.Application
Dim prcdReport As CRAXDRT.Report
Set Aplication = New CRAXDRT.Application
Set prcdReport = Aplication.OpenReport(gsReportesPath & Archivo)
'prcdReport.Database.SetDataSource null
prcdReport.EnableParameterPrompting = False
prcdReport.DiscardSavedData
prcdReport.ExportOptions.DestinationType = crEDTDiskFile
prcdReport.ExportOptions.DiskFileName = gsImportacionPDF
prcdReport.ExportOptions.FormatType = crEFTPortableDocFormat
prcdReport.Export False
Set Aplication = Nothing
Set prcdReport = Nothing
el problema es que no me respeta el formato del reporte (es decir la letra en negrita, recuadros, espaciado de caracteres, etc). y como son contratos si no salen iguales no me sirven.
Agradeceria que alguien que sepa la forma de solucionarlo me lo comunique.
desde ya muchas gracias.
[email protected]
adjunto el codigo que estoy usando
Dim Aplication As CRAXDRT.Application
Dim prcdReport As CRAXDRT.Report
Set Aplication = New CRAXDRT.Application
Set prcdReport = Aplication.OpenReport(gsReportesPath & Archivo)
'prcdReport.Database.SetDataSource null
prcdReport.EnableParameterPrompting = False
prcdReport.DiscardSavedData
prcdReport.ExportOptions.DestinationType = crEDTDiskFile
prcdReport.ExportOptions.DiskFileName = gsImportacionPDF
prcdReport.ExportOptions.FormatType = crEFTPortableDocFormat
prcdReport.Export False
Set Aplication = Nothing
Set prcdReport = Nothing
Valora esta pregunta
0