Using VB6, I'm trying to print a report in portrait mode and I'm getting a runtime error:

Report width is larger than the paper width

The code in use is:

With RptInvoiceReg
Set .DataSource = adoVoucherRS
.Orientation = rptOrientPortrait
.Show vbModal, Me
.PrintReport true
End With

The report is setup to have 65 columns, can someone tell me what I'm doing wrong?

Also how do I request 3 copies without user intervention?

Thanks for your responses.