如何在多台打印机上打印水晶报表？

【问题标题】：How to print crystal report on multiple printers?如何在多台打印机上打印水晶报表？
【发布时间】：2017-01-16 15:40:16
【问题描述】：

我有一个 vb.net 应用程序，它有不同的水晶报告。我想在不打开报告查看器的情况下将这些报告打印到打印机，我想在我的 2 台打印机上打印这些报告，其中 1 台通过 USB 电缆安装在我的电脑上，另一个是网络打印机。对于网络打印机，如果需要，我可以为应用程序定义一个 ip 或任何本地网络地址..

【问题讨论】：

标签： vb.net printing crystal-reports

【解决方案1】：

您好，首先您应该为这些打印机命名

        strSQL = "your select statement"
        Dim crptDV As New ReportDocument()
        Dim da As New SqlDataAdapter(strSQL, SqlCon)
        Dim ds As New DataSet
        da.Fill(ds)
        If ds.Tables(0).Rows.Count = 0 Then
            Exit Sub
        End If
        Dim path As String //Report Path
        crptDV.Load(path & "\reports\ReportName.rpt")
        End If

        crptDV.PrintOptions.PrinterName = PrinterName1
        crptDV.PrintToPrinter(1, True, 0, 0)

        crptDV.PrintOptions.PrinterName = PrinterName2
        crptDV.PrintToPrinter(1, True, 0, 0)
        crptDV.Close()
        crptDV.Dispose()

【讨论】：