I'm using this code to Select the correct Pagesize and print via VB 6.0
' Select my printer pageSize
Printer.PaperSize = 3
Printer.Orientation = 1
' Print
nForm = frmMDI.ActiveForm.Tag
nMaxPage = pdDoc.GetNumPages()
r = AcroExchAVDoc(nForm).PrintPages(0, nMaxPage, 1, 0, 0)
* This Works...