PDA

View Full Version : می شه بگید چطور موقع چاپ "نوع پرینتر" را انتخاب کرد؟


flatron
سه شنبه 02 خرداد 1385, 14:45 عصر
با سلام
من اول گزارش خودم را با دستور زیر نمایش میدم و کاربر اگه خواست اونو چاپ کنه از toolbar کریستال ایکن پرینتر را کلیک می کنه.در این حالت من نمی تونم نوع پرینتر را انتخاب کنم چون کریستال پرینتر پیش فرض را انتخاب میکنه.

Dim CRViewer91_app As New CRAXDRT.Application
Dim CRViewer91_rep As CRAXDRT.Report
CRViewer91.ViewReport
CRViewer91.Zoom (100)
flatron
پنج شنبه 04 خرداد 1385, 10:58 صبح
با سلام

تو را خدا یکی جواب بده؟
flatron
پنج شنبه 11 خرداد 1385, 15:53 عصر
با سلام
واقعا کسی بلد نیست یا جواب نمی دید؟؟؟؟
محمد رضاپور
پنج شنبه 11 خرداد 1385, 16:36 عصر
با سلام

من برای اینکه کاربر بتونه Printer رو انتخاب کنه و Proprtyهای اون رو Set بکنه از این کدها استفاده می کنم. امیدوارم که مشکل شما رو هم حل کنه.

With CRViewer91_rep
.SelectPrinter Printer.DriverName, Printer.DeviceName, Printer.Port
.PaperSize = crPaperA4
.PaperOrientation = crPortrait
.PrinterSetup 0
End With

موفق باشید.
flatron
شنبه 13 خرداد 1385, 12:05 عصر
با سلام
می شه بگید این کد را کجا می نویسید.
flatron
شنبه 13 خرداد 1385, 14:53 عصر
با سلام
فهمیدم کجا باید نوشت.از راهنمایتون خیلی ممنون.