كيف احدد حجم الصفحة لطباعة التقرير

الحمدلله توصلت إلى هذا الكود

        // Get the report document        
        ReportDocument repDoc = getReportDocument();
        repDoc.PrintOptions.PaperSize = CrystalDecisions.Shared.PaperSize.PaperA4;

ولكن بعض طابعات hp الجديدة مشكلة وبس لأنها حتى بعد تحديد الحجم ما تطبع !

شكرا لجميع من شاهد الموضوع واتمنى أن تخدم السطرين أعلاه اي باحث عن نفس الفكرة

للتحكم بنوع الصفحة من اعدادات printdocument

لنفرض اسم التقرير لديك هو rpt1

dim rpt2 as new prt1
Dim pa As New System.Drawing.Printing.PaperKind
Dim p As New PaperSize
p = (pa)
rpt2.PrintOptions.PaperSize = (p)
Dim f1 As New Form1
f1.CrystalReportViewer1.ReportSource = rpt2
        f1.Show()

هذا مع تقارير كريستال ريبورت , باستخدام كائن printdocument