Crystal Report 直接保存為 PDF，而不是查看

我想在 Crystal Report 中從 ASP.Net 製作一份報告。我想，當使用者點擊列印時，它應該只顯示保存、打開、另存為的瀏覽器對話框，並且應該保存 PDF，或者應該出現 Crystal Report 列印預覽，我不想先在查看器中顯示報表點擊按鈕以獲取列印或 PDF，我只想點擊 asp 按鈕，我對參數有所有想法並且知道如何製作報告，我的問題只是不顯示查看器並從表單中的 asp 按鈕獲取報告PDF 或列印預覽對話框進行列印。我已經為 Crystal Report 使用了 .Net 的 Export 方法，但它不起作用。

這是您正在尋找的解決方案：

http://www.c-sharpcorner.com/UploadFile/mahesh/ExportCRtoPDF10062006161918PM/ExportCRtoPDF.aspx

以下是該網站的報價：

以下步驟將指導您實現相同的目標：

將水晶報表 (.cr) 文件添加到您的 ASP.NET 應用程序。在頁面級別添加報表實例。

暗淡報告為 MyReport = 新的 MyReport

在 Page_Init 上填充報告數據

將 ds 調暗為 DataSet = GetData()

報告.SetDataSource(ds)

出口報告

report.ExportToHttpResponse（ExportFormatType.PortableDocFormat，響應，假，“ExportedReport”）

如果您希望將報告格式化為其他格式，只需將 ExportFormatType 列舉值更改為 > 您想要的格式。

如果要下載報告，只需將步驟 4 中 >ExportToHttpResponse 方法的第三個參數更改為 True。

您可以使用 Crystal Report 和一段程式碼生成 PDF….

• 第一：根據您的要求生成水晶報表。

• 第二：使用以下程式碼生成PDF：

  • 將以下名稱空間放在程式碼頁的頂部

  Imports CrystalDecisions.CrystalReports.Engine
  Imports CrystalDecisions.Shared
  

  • 變數聲明

  Dim CrReport As New CrystalReport1() // Report Name
  Dim CrExportOptions As ExportOptions
  Dim CrDiskFileDestinationOptions As New DiskFileDestinationOptions()
  Dim CrFormatTypeOptions as New PdfRtfWordFormatOptions()
  

  • 設置目標路徑和文件名

  CrDiskFileDestinationOptions.DiskFileName = "c:\RichText.pdf"
  

  • 指定頁面範圍（可選）

  crFormatTypeOptions.FirstPageNumber = 1 // Start Page in the Report
  crFormatTypeOptions.LastPageNumber = 3 // End Page in the Report
  crFormatTypeOptions.UsePageRange = True
  

  • 設置導出選項

  CrExportOptions = crReport.ExportOptions
  
  With CrExportOptions
  
  // Set the destination to a disk file
  .ExportDestinationType = ExportDestinationType.DiskFile
  
  // Set the format to PDF
  .ExportFormatType = ExportFormatType.PortableDocFormat
  
  // Set the destination options to DiskFileDestinationOptions object
  .DestinationOptions = CrDiskFileDestinationOptions
  .FormatOptions = crFormatTypeOptions
  
  End With
  

  • 擷取導出時發生的任何錯誤

  Try
      // Export the report
      CrReport.Export()
  Catch err As Exception
      MessageBox.Show(err.ToString())
  End Try
  

就是這樣…. 現在您已準備好創建報告的 PDF。

引用自：https://stackoverflow.com/questions/6210660