![]() ![]() MyAppPrintOptions.PaperSize = CType(PkSize.RawKind, ) MyAppPrintOptions.PrinterName = "Epson FX1170" PkSize = (i)ĭim myAppPrintOptions As = ObjCrReport.PrintOptions ObjPrinterSetting.PrinterName = "Epson FX1170"įor i As Integer = 0 To - 1 Public Sub SetReportPageSize(ByVal mPaperSize As String, ByVal PaperOrientation As Integer)ĭim ObjPrinterSetting As New ĭim PkSize As New MessageBox.Show(ex.Message, "Alert", MessageBoxButtons.OK, MessageBoxIcon.Error) ObjCrReport.PrintToPrinter(1, False, 0, 0) Private Sub BtnPrintDoc_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnPrintDoc.Click ObjCrReport.SetDataSource(ObjPrintDataSet.Tables("PrintData")) Here's the code I'm using to print: Public Sub. When I run report from VB.net, the Crystal report viewer shows the correct preview for custom paper size but when I give print command it prints with the default printer paper size. ![]() Now I’m trying to set custom Paper Size for Crystal Report using VB.net 2005. I have created custom paper Size "SUPP 15 x 14" in Setting - Printers - File - Server Properties. ![]()
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |