Jaime,
That worked significantly swifter than my previous method. Thank you very very much. To think it was in VFP and I could not find this in the F1 search. Thanks again.
>I have been using the following method for years, in functions that send thousands of TIF docs / day. You will only need to install the Fax printer that comes with Windows XP in case it's not installed.
>
>set printer to name "Fax"
>report form myReport to file "myfile.tif" noconsole
>
>That's it :-)
>
>Jaime
>
>
>>Jaime,
>>
>>I don't need color however there are some grey scale images but I don't see that as a problem. Please let me know the method you are using.
>>
>>
>>>Jennifer
>>>If you need color TIF documents, then i cannot help you, otherwise i have a method that works on all vfp versions and is extremely fast, no matter how many pages you may have...
>>>Jaime
>>>
>>>>Hello,
>>>>
>>>>If anybody has a way to speed up a process to create a multi-page tiff file or another method that would be super. The FOR loop below slows as the pages increase I think because the end of the Tiff file has to be found for appending.
>>>>
>>>>
>>>>* Create the report listener object (create tiff version of report for fax)
>>>>
>>>>PUBLIC ReportListenerObj
>>>>ReportListenerObj = CREATEOBJECT('ReportListener')
>>>>ReportListenerObj.ListenerType = 3
>>>>
>>>>REPORT FORM &report_path OBJECT ReportListenerObj
>>>>
>>>>FOR PageCounter = 1 TO SavePageCount
>>>> ReportListenerObj.OutputPage(PageCounter, temp_fax_folder + file_copy + '.tif', IIF(PageCounter = 1, 101, 201))
>>>>ENDFOR
>>>>
>>>>Any help would be appreciated.
>>>>
>>>>Thank you