چاپ گزارش در کریستال ریپورت به صورت اتوماتیک چگونه است ؟

[msbzc@yahoo.com]

سلام
من می خواهم تا چند تا فرم را یکجا پرینت بگیرم ، بدون اینکه هربار کلید پرینت را کلیلک کنم . ( لازم به یادآوری است که فرم ها متفاوت هستند )
در نسخه 9 یک دستوری وجود داشت بنام PrintOut ولی در نسخه 10 این دستور وجود ندارد .
راه حل چیست ؟

[Mehdi6052]

با سلام

از متد PrintToPrinter شیء ReportDocument استفاده کنید.
به عنوان مثال این کد را در یک ماژول قرار دهید:
Public ReportDoc As New CrystalDecisions.CrystalReports.Engine.ReportDocum ent
سپس در فرمی که CrystalReportViewer را در آن قرار داده اید کدهای زیر را در دکمه ی پرینت قراد دهید:
ReportDoc = New rep_Coding_Group
CrystalReportViewer.ReportSource = ReportDoc
ReportDoc.PrintToPrinter(1, False, 1, 1000)
ReportDoc.Close()

توجه :
rep_Coding_Group یک گزارش با فرمت .RPT است که قبلا به پروژه اضافه شده است