如何加载两次相同的Crystal Report?

时间:2016-02-26 19:53:47

标签: vb.net crystal-reports

出于某种原因,我无法在一个程序会话中加载此报告两次。我可以第一次打印它没有问题。我第二次收到错误:

CrystalDecisions.Shared.CrystalReportsException: Load report failed.

以下是此细分的代码。

Private Sub Print_Report()
    Using CrystalReport As New ReportDocument
        CrystalReport.Load("Reports\PrintMe.rpt")
        CrystalReport.SetParameterValue("Code", txtCode.Text)
        CrystalReport.SetParameterValue("Control", txtControl.Text)
        CrystalReport.PrintOptions.PrinterName = DefaultPrinterName()
        CrystalReport.PrintToPrinter(1, True, 0, 0)
    End Using
End Sub

Private Function DefaultPrinterName() As String
    Dim psDefault As New System.Drawing.Printing.PrinterSettings
    Try
        DefaultPrinterName = psDefault.PrinterName
    Catch ex As System.Exception
        DefaultPrinterName = ""
    Finally
        psDefault = Nothing
    End Try
End Function

我能想到的是,在第一次打印结束时,文件没有被释放。我看起来很简单吗?

1 个答案:

答案 0 :(得分:0)

问题是由Foxit Reader的PDF打印机引起的。我转而使用Adobe Acrobat,问题现在已经消失。我只使用PDF打印机进行打印机测试以节省纸张。我将使用“导出到磁盘”来处理与PDF相关的任何内容。