Crystal Report導出報告爲excel文件

Question

我在VB 2008中創建了一個水晶報表，它在Crystal Report Viewer中生成一個MS Access文件，並且我想將我的工作導出爲水晶報表查看器作爲excel文件。這可能嗎？

Answer 1

我同意@Andrew有關MS Access文件，這不太合理。以下是一些示例代碼，演示瞭如何將報告導出爲.xls文件。代碼（顯然）分配給一個按鈕。

Private Sub ButtonExport_Click(ByVal sender As System.Object, _ 
ByVal e As System.EventArgs) Handles Button2.Click 
    Try 
     Dim CrExportOptions As ExportOptions 
     Dim CrDiskFileDestinationOptions As New _ 
     DiskFileDestinationOptions() 
     Dim CrFormatTypeOptions As New ExcelFormatOptions 
     CrDiskFileDestinationOptions.DiskFileName = _ 
            "c:\crystalExport.xls" 
     CrExportOptions = cryRpt.ExportOptions 
     With CrExportOptions 
      .ExportDestinationType = ExportDestinationType.DiskFile 
      .ExportFormatType = ExportFormatType.Excel 
      .DestinationOptions = CrDiskFileDestinationOptions 
      .FormatOptions = CrFormatTypeOptions 
     End With 
     cryRpt.Export() 
    Catch ex As Exception 
     MsgBox(ex.ToString) 
    End Try 
End Sub 

你知道的CrystalReportViewer與出口按鈕，可以導出到Excel，而無需任何額外的代碼的工具欄。您可以在CrystalReportViewer屬性中啓用/禁用該按鈕或使用如下代碼：

<CR:CrystalReportViewer .... HasExportButton="true" ... />