CR 8.5
Windows NT 4.0 SP6a
Visual Basic 6.0 SP4
Two Forms:
frmMain is used to select the report.
frmRDC is used to view the report.
I'm using RDC to create a report distribution control. I've created the following code in hopes of using Windows Standard Printer Setup dialog box when the print button is clicked. Currently, when I click the Print button, it prints a blank page. No matter what printer I select, it prints a blank page. What am I doing wrong? Also, when I click Print, Print Setup check box defaults to No Printer. I have to click on the checkbox to allow the multiple printer dialog box.
You can see an example of this on Crystals site Article ID c2006318.
Dim Report As New CR1
Option Explicit
Private Sub CRViewer1_PrintButtonClicked(UseDefault As Boolean)
UseDefault = False
Report.PrinterSetup frmRDC.hWnd
Report.PrintOut False
End Sub
--BradB
Windows NT 4.0 SP6a
Visual Basic 6.0 SP4
Two Forms:
frmMain is used to select the report.
frmRDC is used to view the report.
I'm using RDC to create a report distribution control. I've created the following code in hopes of using Windows Standard Printer Setup dialog box when the print button is clicked. Currently, when I click the Print button, it prints a blank page. No matter what printer I select, it prints a blank page. What am I doing wrong? Also, when I click Print, Print Setup check box defaults to No Printer. I have to click on the checkbox to allow the multiple printer dialog box.
You can see an example of this on Crystals site Article ID c2006318.
Dim Report As New CR1
Option Explicit
Private Sub CRViewer1_PrintButtonClicked(UseDefault As Boolean)
UseDefault = False
Report.PrinterSetup frmRDC.hWnd
Report.PrintOut False
End Sub
--BradB