I have created a number of Reports using Crystal Reports 4.5. On this last set I decided to get cute and try to change the printer at runtime in VB5. The problem I am encountering is that when I display a Landscape report it is showing up as portrait (the printer supports landscape). I am supplying the code below....PLEASE HELP!!!

For Each X In Printers
If X.DeviceName = varDfltPrinter Then
Report1.PrinterName = X.DeviceName
Report1.PrinterPort = X.Port
Report1.PrinterDriver = X.DriverName
Exit For 'stop looking for printer
End If
Next

Note: varDfltPrinter is the name of the printer (E.g. HP DESKJET 810C Series Printer).