الاخوة الاعزاء
الكثير تواجهه مشكله طباعة تقريره بعرض الصفحه
ميكرسوفت وضعت ملف اسمه
pageset.dll
يمكنك تنزيبله من الموقع الاتى
http://support.microsoft.com/download/support/mslfiles/PageSet.exe لو لم يعمل معك الرابط ابحث عن نفس الكلمه وستجد عديد من المواقع فيها نفس الملف
هذا الملف مضغوط فيه الشرح والملف المفروض تضيفه الى الوندوز بتسجيلك له
regsvr32.exe <full path to dll>\pageset.dll
مثال للتسجيل
regsvr32.exe c:\pageset.dll
حيث موقع الملف المطلوب تسجيله
فى بداية كل تقرير لابد من تعريف طريقة الطباعه وفى نهاية الفورم تغيرها للطريقة الافتراضيه
مثال
فى بداية الفورم
Dim obj As PageSet.PrinterControl
Private Sub Command1_Click()
On Error GoTo errorhandler:
Set obj = New PrinterControl
obj.ChngOrientationLandscape
DataReport1.Show
DataReport1.PrintReport False, rptRangeFromTo, 1, 1
Exit Sub
errorhandler:
MsgBox Err.Description
obj.ReSetOrientation
End Sub
Private Sub Form_Unload(Cancel As Integer)
obj.ReSetOrientation 'This resets the printer to portrait.
End Sub
بالتوفيق