Mergefield in header

[krhyll]

How to manually parse all MERGEFIELD inside header?

Standard mailmerge works like a charm with MERGEFIELD inside main part of document.

But would like to manually "mailmerge" MERGEFIELD in header. Is it possible, any example?

[Gary.zhang]

Hello Kristian,

Thanks for your inquiry. Sorry for late reply as weekend.
For your need, please refer to the demo in the attament, which doesn't include the dll as they are large, please quote them and try. If it doesn't fulfill your need, please provide us your template if convenience.

Best Regards,
Gary
E-iceblue support team

[krhyll]

Hi Gary,

Thanks a lot for demo here. Will test it and it seems like a simple solution.
Could you please point to where in your documentation the functionality of this method is described?
- doc.MailMerge.Execute(filedNames, filedValues);

I did manage to find a solution as shown in code below. The catch in my code is that the MERGEFIELDs must be located inside a TEXTBOX, but it works somehow.

Code: Select all

                '
                ' Post mailmerge in header
                '
                For Each para As Paragraph In document.Sections(0).HeadersFooters.Header.Paragraphs
                    For Each item As Object In para.Items
                        If TypeOf item Is Spire.Doc.Fields.TextBox Then
                            For Each paras As Paragraph In TryCast(item, Spire.Doc.Fields.TextBox).ChildObjects
                                For Each paraItem As Object In paras.Items
                                    If TypeOf paraItem Is Spire.Doc.Fields.MergeField Then
                                        Dim paraItemMergeField As Spire.Doc.Fields.MergeField = TryCast(paraItem, Spire.Doc.Fields.MergeField)
                                        Dim mmValue As String = ""
                                        Try
                                            mmValue = CStr(ds.Tables("Prosjekt").Rows(0)(paraItemMergeField.FieldName))
                                        Catch ex As Exception

                                        End Try
                                        'paraItemMergeField.FieldName = "Header:FieldName:" + mmValue
                                        'paraItemMergeField.FieldText = "Header:FieldText:" + mmValue
                                        'paraItemMergeField.Pattern = "Header:Pattern:" + mmValue
                                        'paraItemMergeField.TextAfter = "Header:TextAfter:" + mmValue
                                        paraItemMergeField.Text = mmValue
                                    End If
                                Next
                            Next
                        End If
                    Next
                Next



Kristian Hyllestad

[Gary.zhang]

Hello Kristian,

Thanks for your quick reply.
Sorry for inconvenience. At present we are completing the documentation about the functionality of our product, but if you installed the Spire.Office on computer, you could find these demos in SampleCenter.exe, and you could also find the demos from http://www.e-iceblue.com/Knowledgebase/ ... Merge.html. BTW, your solution is also feasible.

If there are any questions, welcome to get it back to us.

Sincerely,
Gary
E-iceblue support team