Print Orientation

[mystique]

How can i change the print orientation from code?
Maybe somewhere in registry...?

thank you

[JohnFol]

Public Sub Printing()
Try
streamToPrint = New StreamReader(fi lePath)
Try
printFont = New Font("Arial", 10)
Dim pd As New PrintDocument()
AddHandler pd.PrintPage, AddressOf pd_PrintPage
pd.PrinterSetti ngs.PrinterName = printer
' Set the page orientation to landscape.
pd.DefaultPageS ettings.Landsca pe = True
pd.Print()
Finally
streamToPrint.C lose()
End Try
Catch ex As Exception
MessageBox.Show (ex.Message)
End Try
End Sub

"mystique" <mi***@softhome .net> wrote in message
news:uQ******** ******@TK2MSFTN GP15.phx.gbl...

How can i change the print orientation from code?
Maybe somewhere in registry...?

thank you