I added thsi code:
I get an invalid procedure call on the RESULT = lineCode:'------------------- ' test PDF merging '------------------- ' Dim RESULT As Integer Dim parm1 As String Dim parm2 As String Dim PARM3 As String Dim output As String Dim strfolder As String strfolder = "Z:\DAD\QUOTES\" parm1 = strfolder & glbQuoteNumber & "Quote.pdf" parm2 = strfolder & glbQuoteNumber & "Quote Page 2.pdf" PARM3 = strfolder & glbQuoteNumber & "TEST COMBINED PDF.PDF" output = strfolder & PARM3 RESULT = Shell(strfolder & " PDFTK.EXE " & parm1 & " " & parm2 & " CAT OUTPUT " & output) ' '---------------------




Reply With Quote