Setting printer paper size

[Just Me]

I want to save and then be able to restore the printer paper size.

Something like:

WriteLine(lFile Num, gAddressesPD.De faultPageSettin gs.PaperSize.To String)



Then:

Dim lTempPaperSize As PaperSize

Input(lFileNum, lTempPaperSize)

gAddressesPD.De faultPageSettin gs.PaperSize = lTempPaperSize



Of course that is not correct but I don't know how to do it.

Can anyone help?