Printer reset

Hi,

Any modification on the dialog of "CommonDialog1.ShowPrinter", will change my printer in the control panel.

How to reset back my printer like it was?

This code does not work with the printer in the control panel.

Dim x As Long

x = Printer.Orientation
CommonDialog1.ShowPrinter
Printer.Orientation = x

Thanks

Go here:http://www.planetsourcecode.com./vb/scripts/ShowCode.asp?lngWId=1&txtCodeId=78