#define FileNameOption_NoPrompte 0x00000001 && do not prompt for file name #define FileNameOption_UseFileName 0x00000002 && use file name set by SetDefaultFileName else use document name #define FileNameOption_JPegLevelLow 0x00020000 && Low JPeg compression #define FileNameOption_CCITTCompression 0x20000000 && activate CCITT compression m.loPdf = CREATEOBJECT("cdintf.cdintf") m.loPdf.DriverInit("PDF CONVERTER") m.loPdf.FileNameOptionsEx = INT(FileNameOption_NoPrompte ; + FileNameOption_UseFileName ; + FileNameOption_JPegLevelLow) m.loPdf.Orientation = 1 m.loPdf.Resolution = 150 m.loPdf.PaperSize = 1 m.loPdf.DefaultDirectory = ADDBS(JUSTDRIVE(m.lcPDFfile)) m.loPdf.DefaultFileName = m.lcPDFfile m.loPdf.SetDefaultConfigEx() SET PRINTER TO NAME ("PDF CONVERTER") REPORT FORM rptimagereport.frx NOEJECT NOCONSOLE TO PRINTER
"Do not let any unwholesome talk come out of your mouths,
but only what is helpful for building others up according to their needs,
that it may benefit those who listen."
- Ephesians 4:29-30 NIV
Dare to Question -- Care to Answer
Time is like water in a sponge, as long as you are willing you can always squeeze some.
--Lu Xun, Father of Modern Chinese Literature