----------------------------------------------------------- New Message on BDOTNET
----------------------------------------------------------- From: Kota Message 3 in Discussion Hi, Using runtime report document you can print. Plese see sample code below. regards, Kota. Imports CrystalDecisions.CrystalReports.Engine Dim strPhisicalPath As String Dim rptVendorSales As ReportDocument rptVendorSales = New ReportDocument() rptVendorSales = BuildReport() rptVendorSales.PrintOptions.PrinterName = "\\CENTRAL\Hewlett Packard LaserJet 6L" Dim margins As PageMargins margins = rptVendorSales.PrintOptions.PageMargins margins.bottomMargin = 350 margins.leftMargin = 350 margins.rightMargin = 350 margins.topMargin = 350 ' Apply the page margins. rptVendorSales.PrintOptions.ApplyPageMargins(margins) rptVendorSales.PrintToPrinter(1, True, 1, 1) 'release objects rptVendorSales = Nothing ----------------------------------------------------------- To stop getting this e-mail, or change how often it arrives, go to your E-mail Settings. http://groups.msn.com/BDotNet/_emailsettings.msnw Need help? If you've forgotten your password, please go to Passport Member Services. http://groups.msn.com/_passportredir.msnw?ppmprop=help For other questions or feedback, go to our Contact Us page. http://groups.msn.com/contact If you do not want to receive future e-mail from this MSN group, or if you received this message by mistake, please click the "Remove" link below. On the pre-addressed e-mail message that opens, simply click "Send". Your e-mail address will be deleted from this group's mailing list. mailto:[EMAIL PROTECTED]
