The SDK samples given below describe how to quickly make your application do create uri (link) action in pdf with pdf sdk in VBScript with the help of ByteScout PDF Suite. IF you want to implement the functionality, just copy and paste this code for VBScript below into your code editor with your app, compile and run your application. Complete and detailed tutorials and documentation are available along with installed ByteScout PDF Suite if you’d like to learn more about the topic and the details of the API.
Trial version of ByteScout PDF Suite is available for free. Source code samples are included to help you with your VBScript app.
' This example demonstrates how to create URI (link) action. ' Create Bytescout.PDF.Document object Set pdfDocument = CreateObject("Bytescout.PDF.Document") pdfDocument.RegistrationName = "demo" pdfDocument.RegistrationKey = "demo" Set comHelpers = pdfDocument.ComHelpers ' Add page Set page1 = comHelpers.CreatePage(comHelpers.PAPERFORMAT_A4) pdfDocument.Pages.Add(page1) ' Add button Set button1 = comHelpers.CreatePushButton(20, 20, 150, 25, "button1") button1.Caption = "BYTESCOUT.COM" ' Add URI action Set uriAction = comHelpers.CreateURIAction("https://bytescout.com/") button1.OnActivated = uriAction page1.Annotations.Add(button1) ' 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