Merging PDF / Page Numbers / Acrobat SDK V9 & LiveCycle

[Brent.Jones@adobeforums.com]

Hello everyone,

I use Adobe LiveCycle to create forms, Visual Studio 2005 and the Acrobat SDK for the application I'm programming to fill in these forms. The application fills in the forms and merges them with no issues.

The problem I have is that these pages have page numbers in the upper right. I use the Page N of M object on these forms in LiveCycle. PDF page numbers are filled in correctly when filling in the forms, but when I merge PDFs, the pages keep their original page numbers. I've looked at the Windows - Interapplication Communications even using templates to no avail.

How can I merge these pdf's and have my program renumber these pages correctly and how can insert pages anywhere I want in the merge document?

Below is the code I use to merge the PDF's. It was posted in a forum.

Sub MergePDF(ByVal ThePath As String, ByVal outFileName As String)
On Error GoTo serror

Dim dPDDocMerge As New Acrobat.AcroPDDoc
Dim dPDDoc As New Acrobat.AcroPDDoc
Dim strFiles() As String
Dim numPage As Integer
Dim TotalPage As Integer
Dim objThisFile As IO.FileInfo 'get FileInfo object for file string

strFiles = System.IO.Directory.GetFiles(ThePath) ' Read in the file names

Dim b As Boolean ' mostly for testing purposes... could use it for error 'checking to make sure that a file is really added before deleleting it...

For i As Integer = 0 To strFiles.Length - 1 ' run through all the files in 'the directory
objThisFile = New IO.FileInfo(strFiles(i)) ' Get the extension

If objThisFile.Extension = ".pdf" Then ' Only add in PDFs

If dPDDocMerge.GetFileName = "" Then ' check if it's the first file
dPDDocMerge = New Acrobat.AcroPDDoc = dPDDocMerge.Open(strFiles(i)) ' open first file TotalPage = dPDDocMerge.GetNumPages
Else
dPDDoc = New Acrobat.AcroPDDoc = dPDDoc.Open(strFiles(i)) ' open other files numPage = dPDDocMerge.GetNumPages ' get the page count
TotalPage += numPage = dPDDocMerge.InsertPages(numPage - 1, dPDDoc, 0, dPDDoc.GetNumPages, _ False) ' Insert End If
End If

Next
'b = dPDDocMerge.Save(1, ThePath & "\" & outFileName) ' save file = dPDDocMerge.Save(1, ThePath & "\" & "\MyTest.PDF") ' save file = dPDDocMerge.Close() Exit Sub
serror:
MsgBox(ErrorToString)
End Sub

Thanks for any code or advice.

[Leonard_Rosenthol@adobeforums.com]

You can't merge LiveCycle forms this way :(. LC forms are NOT standard PDF files and can't be processed in the same way.