PDA

View Full Version : حرفه ای: پرینت



dll9095
شنبه 14 اسفند 1389, 01:09 صبح
من یه برنامه دارم که داخلش از یک گزارش استفاده شده است .
میخواستم ببینم چطور میتونم از این فایل کریستال ریپرت استفاده کنم به شرطی که هنگام پرینت هیچ دیالگی باز نشه یا به عبارت دیگه مستقیم به پرینتر فرستاده بشه و PrinterSetting یا PrinterSetup باز نشه .

ali_najari
دوشنبه 16 اسفند 1389, 01:16 صبح
برای اینکه به یک پرینتر دلخواه بفرستی شما باید ابتدا یک ReportDocument تعریف کنید که شامل گزارش نهایی شما میشه که آن را Load میکنی و اطلاعاتت را در آن وارد میکنی
به عنوان مثال:

Dim RD AsNew ReportDocument
RD.Load("MyReport.rpt")

RD.SetDataSource(TBL)

RD.PrintOptions.PrinterName = "Your Printer Name"
RD.PrintToPrinter(1, False, 0, 0)