Ads by Smowtion

jueves, 7 de agosto de 2008

Export Crystal Reports to PDF

Export Crystal Reports to PDFUse this code when you're developing Web pages and you need to export Crystal Reports to PDF without creating their own files. The undocument FormatEngine property of ReportDocument class (you can see it using ObjectBrowser or ILDASM) gets the job done: Private Sub ExportToPDF(ByVal oRpt As ReportDocument) Dim crExportOptions As ExportOptions crExportOptions = oRpt.ExportOptions With crExportOptions .FormatOptions = New PdfRtfWordFormatOptions() .ExportFormatType = ExportFormatType.PortableDocFormat End With Dim req As ExportRequestContext = New ExportRequestContext() req.ExportInfo = crExportOptions Dim st As System.IO.Stream st = oRpt.FormatEngine.ExportToStream(req) Response.ClearContent() Response.ClearHeaders() Response.ContentType = "application/pdf" Dim b(st.Length) As Byte st.Read(b, 0, st.Length) Response.BinaryWrite(b) Response.End() End Sub
Export Crystal Reports to PDF
Escrito con el Navegador Flock

No hay comentarios: