Hi All,
I am trying to get a Printform to try and print in Landscape mode,
The code I am using is:-
Private Sub cmdprint_Click()
Dim X As Integer ' used to temporarily store the printer
orientation
X = Printer.Orientation
MsgBox (X)
Printer.Orientation = 2
frmAddPeople.PrintForm
Printer.Orientation = X
End Sub
This only prints it out in Portrait mode.
If I manually set the printer to landscape then it works, although
interestingly the X value still shows up as 1.
The printer I am testing this on is a HP Laserjet 4, although I am not
sure what the "real printer will be".
Is there anyway of determining at run time what the correct values are
and then set them accordingly.
Any help would be most appreciated.
Cheers
Russ
BTW: If possible, could any answer's be Emailed, as I don't get to
take these newsfeed very often (it's the size you know).
R & L Enterprises - Software/ Hardware Development & Distribution
M.L. Greenwood's & Associates - Business & Technical Consultancy