发送文本邮件合并域在Microsoft Word 2010 [英] Sending text to Mail-Merge Fields in Microsoft Word 2010

问题描述

我用下面的代码发送文字我已经与目前的单一MERGEFIELD成立只是一个简单的Word模板来测试我能得到这个工作。结果
我的代码使用如下：

I'm using the following code to send a text to a simple word template I've set up just with a single MergeField at present to test I can get this working.
The code I am using is as follows:

public static void ReplaceMailMergeField(string pWordDoc, string pMergeField, string pValue)
{
    object docName = pWordDoc;
    object missing = Missing.Value;
    Word.MailMerge mailMerge;
    Word._Document doc;
    Word.Application app = new Word.Application();
    app.Visible = false;
    doc = app.Documents.Open(ref docName, ref missing, ref missing, ref missing, ref missing,
                                          ref missing, ref missing, ref missing, ref missing,
                                          ref missing, ref missing, ref missing, ref missing,
                                          ref missing, ref missing, ref missing);
    mailMerge = doc.MailMerge;
    foreach (Word.MailMergeField f in mailMerge.Fields)
    {
        if (f.Code.Text.IndexOf("MERGEFIELD  \"" + pMergeField + "\"") > -1)
        {
            f.Select();
            app.Selection.TypeText(pValue);
        }
    }
    object saveChanges = Word.WdSaveOptions.wdSaveChanges;
    doc.Close(ref saveChanges, ref missing, ref missing);
    app.Quit(ref missing, ref missing, ref missing);
}

这是我从我用下面的应用程序中调用：

Which I call from my application with the following:

string pWordDoc = @"C:\Users\Pete-Laptop\Documents\CMS Document Mangement\Word Template.dotx";
cDocument.ReplaceMailMergeField(pWordDoc, "fieldAddress1", "Put address here!");

但没有任何反应。当我通过代码它尽可能的app.Documents.Open得到，然后似乎停止了。我相信这是因为应用程序无法找到我的Word文档。我在发送完整的文件路径文件名参数是否正确？如果没有，则该应用程序会要不然怎么找到我的Word模板？

But nothing happens. When I step through the code it gets as far as the app.Documents.Open and then seems to freeze. I believe this is because the application cannot find my Word document. Am I correct in sending the full file path to the filename parameter? If not, how else is the application going to find my Word Template?

推荐答案

我曾经和最后的代码对我的作品如下：

The final code I used and which works for me is as follows:

public static void TextToWord(string pWordDoc, string pMergeField, string pValue)
    {
        Object oMissing = System.Reflection.Missing.Value;
        Object oTrue = true;
        Object oFalse = false;
        Word.Application oWord = new Word.Application();
        Word.Document oWordDoc = new Word.Document();
        oWord.Visible = true;
        Object oTemplatePath = pWordDoc;
        oWordDoc = oWord.Documents.Add(ref oTemplatePath, ref oMissing, ref oMissing, ref oMissing);
        foreach (Word.Field myMergeField in oWordDoc.Fields)
        {
            Word.Range rngFieldCode = myMergeField.Code;
            String fieldText = rngFieldCode.Text;
            if (fieldText.StartsWith(" MERGEFIELD"))
            {
                Int32 endMerge = fieldText.IndexOf("\\");
                Int32 fieldNameLength = fieldText.Length - endMerge;
                String fieldName = fieldText.Substring(11, endMerge - 11);
                fieldName = fieldName.Trim();
                if (fieldName == pMergeField)
                {
                    myMergeField.Select();
                    oWord.Selection.TypeText(pValue);
                }
            }
        }
    }

这代码是从orignally的这里。

This code is orignally from here.

这篇关于发送文本邮件合并域在Microsoft Word 2010的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！