cPrinter = GETPRINTER() IF NOT EMPTY(cPrinter) && Printer selected LOCAL Printdev1 SET CLASSLIB TO RawPrint.VCX Printdev1 = CREATEOBJECT("Printdev") Printdev1.cPrinterName = (m1) IF .NOT. Printdev1.oOpen() msg = "Printer is not ready!" IF Printdev1.nopenerror == 0 msg = msg +" Check the SPOOLER settings" ELSE msg = msg + " Error # " +STR(Printdev1.nopenerror) ENDIF MessageBox(msg, 16, "Print error") RETURN ENDIF Printdev1.cFileName = YourFullPathToFile Printdev1.oPrintFile() Printdev1.oClose() ENDIF