我正在使用Crystal Reports將訂單打印到KOT打印機。我有四種不同的KOT打印機。這些項目根據分配的相應打印機名稱進行打印。選擇「無打印機」選項時的打印問題
這工作正常,但爲了提高打印速度,我選中了「無打印機」選項。然後打印只有一臺打印機。當它未被檢查時,問題就解決了。
代碼:
strSQL = ""
Dim crptDV As New ReportDocument()
Dim da As New SqlDataAdapter(strSQL, gblCon)
Dim ds As New DataSet
da.Fill(ds)
Dim path As String
path = Application.StartupPath
crptDV.Load(path & "\reports\rptItemOrder.rpt")
crptDV.SetDataSource(ds.Tables(0))
Dim parameter As New ParameterField
parameter = crptDV.ParameterFields("CompanyName")
parameter.CurrentValues.AddValue(CompName)
crptDV.PrintOptions.PrinterName = PrinterName
crptDV.Close()
crptDV.Dispose()
爲什麼不將訂單寫入文本文件並將文件發送到打印機而不使用水晶報告 –
這是一個很好的建議,我使用了很多公式,所以我無法避免水晶報告 – sarath
我不清楚從你的問題的理想結果。另外,您是否可以顯示已有的打印代碼片段?我已經能夠打印到指定的打印機(即使沒有選擇打印機選項) – reckface