1
2
3
4
5
6
7
8
9

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

   DC.mergeMultipleTIFF "d:\file1.tif+d:\file2.tif+d:\file3.tif", "d:\out.tif"
   DC.convertImage "d:\out.tif", "d:\out.pdf"
   DC.fileDelete "d:\out.tif"

   Set DC = Nothing

   MsgBox "Done converting!!!"