I am using the code below but it is not working:
Dim mMergeDoc As New MergeDocument
Dim documentTemplate As Template = New Template()
documentTemplate.Elements.Add(New PageElements.PageNumberingLabel("%%CP%% of %%TP%%", 0, 680, 512, 12, Font.HelveticaBold, 12, TextAlign.Right))
mMergeDoc.Template = documentTemplate
mMergeDoc.Append("pdfA.pdf")
mMergeDoc.Append("pdfB.pdf")
mMergeDoc.DrawToWeb("PdfReport.pdf", True)