Hi All,

I have a VFP application that prints hundreds to thousands of letters using M$ Word 2000. It is necessary, for legal purposes that I can prove that the letter was printed. Hence I create an image file of the letter as it is printed.

Using the VBA code below accomplishes this but for a large number of letters can take a very long time. The image file that is save for the first letter is the size of one letter. With each letter printed the file gets larger until it is saving a file that contains hundreds to thousands of letters EACH time. Is there a better way? I've searched the books for an "update", or "Save" method of some kind but didn't find anything. TIA.

Regards,

Paige



.Application.PrintOut
.Selection.WholeStory
.Selection.Copy
.Documents.open(ImageFil)
.Documents(&ImageFil).Activate
.Selection.Paste
.Selection.InsertBreak(0)
.ActiveDocument.Save