ByteScout Data Extraction Suite – VB.NET – Add image stamp in pdf with pdf extractor sdk

Home
/
Articles
/
ByteScout Data Extraction Suite – VB.NET – Add image stamp in pdf with pdf extractor sdk

printable version:
ByteScout-Data-Extraction-Suite-VB-NET-Add-image-stamp-in-pdf-with-pdf-extractor-sdk.pdf

How to add image stamp in pdf with pdf extractor sdk in VB.NET and ByteScout Data Extraction Suite

If you want to learn more then this tutorial will show how to add image stamp in pdf with pdf extractor sdk in VB.NET

Source code documentation samples give simple and easy method to install a needed feature into your application. Want to add image stamp in pdf with pdf extractor sdk in your VB.NET app? ByteScout Data Extraction Suite is designed for it. ByteScout Data Extraction Suite is the bundle that includes three SDK tools for data extraction from PDF, scans, images and from spreadsheets: PDF Extractor SDK, Data Extraction SDK, Barcode Reader SDK.

This prolific sample source code in VB.NET for ByteScout Data Extraction Suite contains various functions and other necessary options you should do calling the API to add image stamp in pdf with pdf extractor sdk. Follow the instructions from scratch to work and copy the VB.NET code. Applying VB.NET application mostly includes various stages of the software development so even if the functionality works please test it with your data and the production environment.

The trial version of ByteScout Data Extraction Suite can be downloaded for free from our website. It also includes source code samples for VB.NET 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)

Module1.vb

      Imports System.Drawing
Imports Bytescout.PDFExtractor

Namespace AddImageStampInPDF

    Class Program

        Shared Sub Main(ByVal args As String())

            Dim inputFile As String = ".\Invoice.pdf"
            Dim outputFile As String = ".\Invoice_Stamped.pdf"
            Dim stampImageFile As String = ".\stamp_image.png"

            Using stamper As New Stamper("demo", "demo")

                ' Optionally make the image background transparent
                ' stamper.MakeStampImageTransparent = true

                Using image As Image = Image.FromFile(stampImageFile)

                    ' Get image size in PDF units
                    Dim imageSizeInPoints As SizeF = stamper.GetImageSizeInPoints(image)

                    Dim Rectangle = New RectangleF(440, 370, imageSizeInPoints.Width / 3, imageSizeInPoints.Height / 3)

                    stamper.Stamp(inputFile, outputFile, image, Rectangle, 0, -1)

                End Using

            End Using

            ' Open result file in default associated application (for demo purposes)
            Process.Start(outputFile)

        End Sub

    End Class

End Namespace