[طالب برمجة]

تستطيع الطباعة بدون الحاجة إلى أداة عرض الكريستال ريبورت CrystalReportViewer1

للطباعة مباشرة إلى الطابعة الافتراضية

PHP كود :

rpt1.PrintToPrinter(1, True, 0, 0) 


للطباعة إلى طابعة يتم تحديدها عن طريق مربع حوار الطباعة

PHP كود :

Using prnt As New PrintDialog
    If prnt.ShowDialog = Windows.Forms.DialogResult.OK Then
        rpt1.PrintToPrinter(prnt.PrinterSettings, New System.Drawing.Printing.PageSettings(prnt.PrinterSettings), False)
    End If
End Using 


للطباع مباشرة إلى طابعة محددة بالاسم

PHP كود :

Dim prnt As New System.Drawing.Printing.PrinterSettings
prnt.PrinterName = "إسم الطابعة"
rpt1.PrintToPrinter(prnt, New System.Drawing.Printing.PageSettings(prnt), False)