I need to be able to merge PDF's using VBS script.

 

Can someone send me the code for it?

 

I tried this but it comes up with a "expected end of statement error oin the first line"

 

    Dim oPDF As New PDF_reDirect_v25002.Batch_RC_AXD
    Dim Files_to_Merge(1) As String
    Dim TempBool As Boolean
   
    ' Files to Merge
Files_to_Merge(0) = "y:\Reporting\Budget Reports\2012\Report PDFs\Executive Summary2011\201102\IBD01_Income Budget Executive Summary.PDF"
Files_to_Merge(1) = "y:\Reporting\Budget Reports\2012\Report PDFs\Executive Summary2011\201102\IBD02_Broking Branch Executive Income Budget Summary.PDF"

    With oPDF
       
        TempBool = .Utility_Merge_PDF_Files("Y:\Reporting\Budget Reports\2012\Report PDFs\Executive Summary2011\Merged_Files.pdf", Files_to_Merge)
       
        If Not TempBool Then
            ' NOTES ON ERROR CODES for oPDF.ErrorLastDLL
            ' 401 - One of the Input File could not be opened
            ' 410 - One of the Input File could not be decrypted
            MsgBox "An Error Occured: " & .LastErrorDescription & vbCrLf & _
                     "Error Number =" & Str$(.LastErrorNumber) & vbCrLf & _
                     "DLL Error Number =" & Str$(.ErrorLastDLL), _
                    vbExclamation
        Else
            MsgBox "Merge Successful.", vbInformation
        End If
       
    End With
   
    Set oPDF = Nothing

 

thanks