Export Crystal Reports to PDF

Use 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
Share the Post:
Share on facebook
Share on twitter
Share on linkedin


Recent Articles: