ByteScout Premium Suite - VBScript - Create text annotation in pdf with pdf sdk - ByteScout

ByteScout Premium Suite – VBScript – Create text annotation in pdf with pdf sdk

  • Home
  • /
  • Articles
  • /
  • ByteScout Premium Suite – VBScript – Create text annotation in pdf with pdf sdk

How to create text annotation in pdf with pdf sdk in VBScript and ByteScout Premium Suite

Learn to code in VBScript to create text annotation in pdf with pdf sdk with this step-by-step tutorial

We made thousands of pre-made source code pieces for easy implementation in your own programming projects. ByteScout Premium Suite: the bundle that includes twelve SDK products from ByteScout including tools and components for PDF, barcodes, spreadsheets, screen video recording. It can create text annotation in pdf with pdf sdk in VBScript.

The SDK samples given below describe how to quickly make your application do create text annotation in pdf with pdf sdk in VBScript with the help of ByteScout Premium Suite. Simply copy and paste in your VBScript project or application you and then run your app! Enjoy writing a code with ready-to-use sample codes in VBScript.

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)

TextAnnotation.vbs
      
' This example demonstrates how to add a text annotation. ' 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 collapsed annotation (shown as a tooltip when mouse is over the icon) Set collapsedAnnotation = comHelpers.CreateTextAnnotation(20, 20) collapsedAnnotation.Color = comHelpers.CreateColorRGB(255, 255, 0) collapsedAnnotation.Icon = comHelpers.TEXTANNOTATIONICON_COMMENT collapsedAnnotation.Author = "Mr. Important" collapsedAnnotation.Contents = "The quick brown fox jumps over the lazy dog." page1.Annotations.Add(collapsedAnnotation) ' Add expanded annotation Set expandedAnnotation = comHelpers.CreateTextAnnotation(20, 50) expandedAnnotation.Color = comHelpers.CreateColorRGB(255, 0, 0) expandedAnnotation.Icon = comHelpers.TEXTANNOTATIONICON_NOTE expandedAnnotation.Open = True expandedAnnotation.Author = "John Doe" expandedAnnotation.Contents = "The quick brown fox jumps over the lazy dog." page1.Annotations.Add(expandedAnnotation) ' 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

ON-PREMISE OFFLINE SDK

60 Day Free Trial or Visit ByteScout Premium Suite Home Page

Explore ByteScout Premium Suite Documentation

Explore Samples

Sign Up for ByteScout Premium Suite Online Training

ON-DEMAND REST WEB API

Get Your API Key

Explore Web API Docs

Explore Web API Samples

VIDEO

ON-PREMISE OFFLINE SDK

60 Day Free Trial or Visit ByteScout Premium Suite Home Page

Explore ByteScout Premium Suite Documentation

Explore Samples

Sign Up for ByteScout Premium Suite Online Training

ON-DEMAND REST WEB API

Get Your API Key

Explore Web API Docs

Explore Web API Samples

Tutorials:

prev
next