Here is some more information I found that might be useful:

There is another kb article (c2010983) that suppercedes the prior one I refered you to. The code looks almost identical but is different.

http://support.crystaldecisions.com/library/kbase/articles/c2010983.asp

I also found a writeup someone offered that might also be useful:

I have found that you CAN have the ReportDocument object print in
landscape. The problem is that the ReportDocument object has its
ReportOrientation property set to PrinterDefault, and this overrides the
setting in the report. To fix it, just set the orientation property of the
ReportDocument to Landscape. This can be done in design mode using the
Property window or done in code before calling the PrintToPrinter() method.
Thus, kb article c2010983 should be modified to state this as well.

In summary, here are your options to fix this bug:

1) Create a report object variable to instantiate the report.
Dim crReport as New DrillDownReport()
crReport.PrintToPrinter(1,Falsed, 0, 0)

2) Use the ReportDocument object, but set the orientation to Landscape using
the Properties Window
'ReportDocument1 object had its orientation set to Landscape already during
design mode
ReportDocument1.Load(filename)
ReportDocument1.PrintToPrinter(1,Falsed, 0, 0)

3) Use the ReportDocument object, but set the orientation to Landscape via
code.
'This example uses a strongly typed report that has been assigned to a
report call "DrillDown".
'Thus, calling Load() isn't required here.
drillDown1.PrintOptions.PaperOrientation = PaperOrientation.Landscape
drillDown1.PrintToPrinter(1, False, 0, 0)



>I tried their work around, but it didn't work. As I said before, it looks fine in the report viewer, the problem is in printing the report. I have to manually select landscape every time I print the report. Thanks for the link. Do you have any other ideas.