LOCAL oListener As ReportListener, nPageIndex oListener = CREATEOBJECT("ReportListener") oListener.ListenerType=3 && renders all pages at once * make sure the report can load and run REPORT FORM MyReport PREVIEW OBJECT oListener FOR nPageIndex=1 TO oListener.PageTotal cOutputFile = "tmp"+TRANS(nPageIndex)+".bmp" oListener.OutputPage(nPageIndex,; cOutputFile, 105, 0,0,768,1024) && 105=bitmap NEXT