Set merge fields

The example shows you how to retrieve all merge fields from a document and set their values. See pictures below how document looks like before and after update. See screenshot.

C# example

using System;
using Independentsoft.Office;
using Independentsoft.Office.Word;
using Independentsoft.Office.Word.Fields;

namespace Sample
{
    class Program
    {
        static void Main(string[] args)
        {
            string customerID = "12345";
            string customerName = "John Smith";
            string customerAddress = "123 Way, New York, NY 10019";

            WordDocument doc = new WordDocument("c:\\template.docx");

            ContentElementCollection docElements = doc.GetContentElements();

            foreach (IContentElement docElement in docElements)
            {
                if (docElement is SimpleField)
                {
                    SimpleField simpleField = (SimpleField)docElement;

                    if (simpleField.Field is MergeField)
                    {
                        MergeField mergeField = (MergeField)simpleField.Field;

                        if (mergeField.Name == "CustomerID")
                        {
                            Run run = new Run(customerID);

                            simpleField.Content.Clear();
                            simpleField.Add(run);
                        }
                        else if (mergeField.Name == "CustomerName")
                        {
                            Run run = new Run(customerName);

                            simpleField.Content.Clear();
                            simpleField.Add(run);
                        }
                        else if (mergeField.Name == "CustomerAddress")
                        {
                            Run run = new Run(customerAddress);

                            simpleField.Content.Clear();
                            simpleField.Add(run);
                        }
                    }
                }
            }

            doc.Save("c:\\test.docx");
        }
    }
}

VB example

Imports System
Imports Independentsoft.Office
Imports Independentsoft.Office.Word
Imports Independentsoft.Office.Word.Fields

Module Module1
    Sub Main(ByVal args As String())

        Dim customerID As String = "12345"
        Dim customerName As String = "John Smith"
        Dim customerAddress As String = "123 Way, New York, NY 10019"

        Dim doc As WordDocument = New WordDocument("c:\template.docx")

        Dim docElements As ContentElementCollection = doc.GetContentElements()

        For Each docElement As IContentElement In docElements
            If TypeOf docElement Is SimpleField Then
                Dim simpleField As SimpleField = DirectCast(docElement, SimpleField)

                If TypeOf simpleField.Field Is MergeField Then
                    Dim mergeField As MergeField = DirectCast(simpleField.Field, MergeField)

                    If mergeField.Name = "CustomerID" Then
                        Dim run As New Run(customerID)
                        simpleField.Content.Clear()
                        simpleField.Add(run)
                    ElseIf mergeField.Name = "CustomerName" Then
                        Dim run As New Run(customerName)
                        simpleField.Content.Clear()
                        simpleField.Add(run)
                    ElseIf mergeField.Name = "CustomerAddress" Then
                        Dim run As New Run(customerAddress)
                        simpleField.Content.Clear()
                        simpleField.Add(run)
                    End If

                End If
            End If
        Next

        doc.Save("c:\test.docx")

    End Sub
End Module