ByteScout Premium Suite – VBScript – Create zugferd invoice with pdf sdk

Home
/
Articles
/
ByteScout Premium Suite – VBScript – Create zugferd invoice with pdf sdk

printable version:
ByteScout-Premium-Suite-VBScript-Create-zugferd-invoice-with-pdf-sdk.pdf

How to create zugferd invoice with pdf sdk in VBScript and ByteScout Premium Suite

Learning is essential in computer world and the tutorial below will demonstrate how to create zugferd invoice with pdf sdk in VBScript

Sample source code below will display you how to manage a complex task like create zugferd invoice with pdf sdk in VBScript. ByteScout Premium Suite can create zugferd invoice with pdf sdk. It can be applied from VBScript. ByteScout Premium Suite is the bundle that includes twelve SDK products from ByteScout including tools and components for PDF, barcodes, spreadsheets, screen video recording.

The SDK samples given below describe how to quickly make your application do create zugferd invoice with pdf sdk in VBScript with the help of ByteScout Premium Suite. This VBScript sample code is all you need for your app. Just copy and paste the code, add references (if needs to) and you are all set! If you want to use these VBScript sample examples in one or many applications then they can be used easily.

The trial version of ByteScout Premium Suite can be downloaded for free from our website. It also includes source code samples for VBScript and other programming languages.

On-demand (REST Web API) version:
Web API (on-demand version)

On-premise offline SDK for Windows:
60 Day Free Trial (on-premise)

FileAttachmentAnnotations.vbs

      ' This example demonstrates how to attach a file to PDF document.

' Open pdf document
Set pdfDocument = CreateObject("Bytescout.PDF.Document")
pdfDocument.RegistrationName = "demo"
pdfDocument.RegistrationKey = "demo"

' Load existing document
pdfDocument.Load("Invoice.pdf")

Set comHelpers = pdfDocument.ComHelpers

' Attach ZUGFeRD XML file
Set fileAttachment = comHelpers.CreateFileAttachmentAnnotation("ZUGFeRD-invoice.xml", 0, 0, 0, 0)
pdfDocument.Pages.Item(0).Annotations.Add(fileAttachment)

' Instruct PDF viewer applications to show attachments pane on startup (optional)
pdfDocument.PageMode = comHelpers.PAGEMODE_ATTACHMENT

' Save document to file
pdfDocument.Save("result.pdf")

' Open document in default PDF viewer app
Set shell = CreateObject("WScript.Shell")
shell.Run "result.pdf", 1, false