CLEAR * set printer to MODI oWSHNet = CREATEOBJECT('Wscript.Network') oWSHNet.SetDefaultPrinter('Microsoft Office Document Image Writer') * run report to file lcoutfile="c:\hi.XXX" ERASE (lcoutfile) USE your_table REPORT FORM report_name TO FILE (lcoutfile) noco * close MODI interface if it arrived WAIT WINDOW TIMEOUT 1.0 "" oshell = CREATEOBJECT("wscript.shell") IF oShell.AppActivate("hi.XXX") oShell.SendKeys("%Fx") ENDIF WAIT WINDOW TIMEOUT 1.0 "" * do OCR, file should be in tif format, and with tif extention. At least, it is how it works for me miFILE_FORMAT_TIFF=1 miDoc = Createobject('MODI.Document') miDoc.Create( "C:\hi.XXX") erase c:\hi.tif miDoc.SaveAs("c:\hi.tif", miFILE_FORMAT_TIFF) midoc.Close() miDoc.Create( "C:\hi.tif") miDoc.Images(0).OCR ?miDoc.Images(0).Layout.text && get text midoc.Close() * do cleanup for objects created.... ......Good Luck