تغییر حالت چاپگر در گزارش گیری

[alizanganeh]

سلام

من توی پروژم برای گزارش گیری از Data Report استفاده کردم
و بعضی گزارش ها رو landscape و بعضی ها رو portrate کار کردم
و برای نمایش گزارش و پرینتش باید ابتدا تنظیمات پریتنر ویندوز رو به حالت مطابق با گزارش در بیارم

که اینکار سخته واسه کاربر که هی بره عوض کنه

آیا کدی هست که باهاش قبل از اجرای گزارش ، حالت پرینتر ویندوز رو به مثلا landscape تغییر داد؟

ممنون

[alizanganeh]

کسی نبود جواب مارو بده ؟

[alizanganeh]

بازدید 103
پاسخ 0

بابا فوریه جون من بگید دیگه
ینی هیچکی بلد نیست؟
اگر امکانش نیست حداقل بگید

[m.4.r.m]

Private Sub Command1_Click()

CommonDialog1.PrinterDefault

With Printer
.PaperSize = vbPRPSA4 'Using A4 size
.Orientation = 2 'Landscape
End With
End Sub

'I have even changed to A3 size for a smaller report, all fine.'Landscape was changed to 1 for portrait, also fine.
'In your sample it seems that you are trying to give a size of paper yourself by using the quotation marks after<li class="L3">.Papersize = "" 'Rather use the preset options from vbPRP...

[alizanganeh]

ممنون دوست عزیز
ولی این چطوریه؟
ارور میده
برای PrinterDefault میگه : invalid use of property
و کلا به تعریف api یا چیزی در general نیاز نداره ؟
ممنون

[m.4.r.m]

شما اول گزارش خودتو درست کن در اندازه A4 به صورت خوابیده یا افقی و وقتی می خوای پرینت بگیری از طریق این پرینت کن این حالت امتاحن کن ببین جواب میگیری اگه کار کرد اعلام کن مرسی

DataReport1.Show
CommonDialog1.ShowPrinter

With Printer
.PaperSize = vbPRPSA4 'Using A4 size
.Orientation = 2 'Landscape

End With