Free Trial
Web API version
Licensing
Request A Quote
HAVE QUESTIONS OR NEED HELP? SUBMIT THE SUPPORT REQUEST FORM or write email to SUPPORT@BYTESCOUT.COM
Extract Attachments from PDF | VBScript
ExtractAttachments.vbs:
VB
' Create Bytescout.PDFExtractor.extractor object Set extractor = CreateObject("Bytescout.PDFExtractor.AttachmentExtractor") extractor.RegistrationName = "demo" extractor.RegistrationKey = "demo" ' Load sample PDF document with embedded attachments extractor.LoadDocumentFromFile("attachments.pdf") ' Iterate through attachments and save them For i = 0 To extractor.Count - 1 ' Save file to current folder with original name extractor.Save i, extractor.GetFileName(i) Next MsgBox "Done: " & CStr(extractor.Count) & " attachments extracted" Set extractor = Nothing