Is there a way to change the print option of the common-dialog-print to
portrait or landscape ?

I did not see a way using the common dialog flags options.
I am trying to force a landscape to the Printer, but I would also need to
find out which setting the user is set for and after printing, reset it
back to the way it was.

Please help :-(

Hi:

Try...
Printer.Orientation = vbPRORLandscape
(vbPRORPortrait is the VB5 constant for Portrait)

Dean

Look at:
http://www.microsoft.com/kb/articles/q80/1/85.htm

This is an extract:

Declare Function Escape% Lib "GDI" (ByVal hDC%, ByVal nEsc%, | ByVal nLen%,
lpData As Any, lpOut As Any)

Sub Command1_Click ()

Const PORTRAIT = 1
Const LANDSCAPE = 2
Const GETSETPAPERORIENT = 30
Dim Orient As OrientStructure
Printer.Print ""
Orient.Orientation = LANDSCAPE
x% = Escape(Printer.hDC, GETSETPAPERORIENT, Len(Orient), "", Null)
Print x%

End Sub
--
[Henri at]

: Is there a way to change the print option of the common-dialog-print to
: portrait or landscape ?
:
: I did not see a way using the common dialog flags options.
: I am trying to force a landscape to the Printer, but I would also need to
: find out which setting the user is set for and after printing, reset it
: back to the way it was.
:
: Please help :-(
: