 |
Example 4: Split a PDF file by bookmarks (Visual Basic) |
|
 |
Dim NVsplit : Set NVsplit = CreateObject("PDFsplit.Neevia")
NVsplit.SplitByBookmarks = true
Dim retVal : retVal = NVsplit.SplitPDF("c:\1.pdf", "c:\out\")
if retVal<>0 then
MsgBox "Error = " & CStr(retVal)
else
MsgBox "Done"
end if
|
|
 |
|