Kbase P3108: How to implement a mail merge in Microsoft Word
| Autor |
Progress Software Corporation - Progress |
| Acesso |
Público |
| Publicação |
10/15/2008 |
|
Status: Verified
GOAL:
How to implement a mail merge in Microsoft Word
FIX:
The following code shows how to implement a mail merge in Microsoft Word using ActiveX Automation:
DEFINE VARIABLE hWord AS COM-HANDLE NO-UNDO.
DEFINE VARIABLE hDoc AS COM-HANDLE NO-UNDO.
DEFINE VARIABLE cFile AS CHARACTER NO-UNDO INITIAL 'SomeWordFile.doc'.
CREATE 'Word.Application' hWord.
hWord:Visible = TRUE.
hDoc = hWord:Documents:Add().
hDoc:MailMerge:CreateDataSource(cFile).
RELEASE OBJECT hDoc.
RELEASE OBJECT hWord.