1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13

   <%
     Dim DC : Set DC = Server.CreateObject("Neevia.docCreator")

     Dim RVal : RVal = DC.mergePDF("d:\file1.pdf","d:\file2.pdf", "d:\out.pdf")

     Set DC = Nothing

     If RVal<>0 Then
       Response.Write "There was an error merging!!!"
     Else
       Response.Write "Done!!!"
     End If
   %>