Document .Net - Insert Text

How to insert a text into an existing PDF document in a specific position using C# and VB.Net


Complete code

using SautinSoft.Document;

namespace Example
{
    class Program
    {
        static void Main(string[] args)
        {
            Paragraph();
        }
        /// <summary>
        /// Insert a text into an existing PDF document in a specific position.
        /// </summary>
        /// </remarks>
        /// Details: https://sautinsoft.com/products/document/examples/insert-text-to-pdf-document-net-csharp-vb.php
        /// </remarks>
       static void InsertText()
        {
            string filePath = @"..\..\example.pdf";
            string fileResult = @"Result.pdf";
            DocumentCore dc = DocumentCore.Load(filePath);

            // Find a position to insert text. Before this text: "> in this position".
            ContentRange cr =  dc.Content.Find("> in this position").FirstOrDefault();

            // Insert new text.
            if (cr != null)
                cr.Start.Insert("New text!");
            dc.Save(fileResult);
            System.Diagnostics.Process.Start(new System.Diagnostics.ProcessStartInfo(filePath) { UseShellExecute = true });
            System.Diagnostics.Process.Start(new System.Diagnostics.ProcessStartInfo(fileResult) { UseShellExecute = true });

        }
    }
}

Download.

        
            Imports System
Imports System.IO
Imports SautinSoft.Document

Module Sample
    Sub Main()
        Paragraph()
    End Sub

    ''' <summary>
    ''' Insert a text into an existing PDF document in a specific position.
    ''' </summary>
    ''' </remarks>
    ''' Details: https://sautinsoft.com/products/document/examples/insert-text-to-pdf-document-net-csharp-vb.php
    ''' </remarks>
   Sub InsertText()
        Dim filePath As String = "..\example.pdf"
        Dim fileResult As String = "Result.pdf"
        Dim dc As DocumentCore = DocumentCore.Load(filePath)

        ' Find a position to insert text. Before this text: "> in this position".
        Dim cr As ContentRange = dc.Content.Find("> in this position").FirstOrDefault()

        ' Insert new text.
        If cr IsNot Nothing Then
            cr.Start.Insert("New text!")
        End If
        dc.Save(fileResult)
        System.Diagnostics.Process.Start(New System.Diagnostics.ProcessStartInfo(filePath) With {.UseShellExecute = True})
        System.Diagnostics.Process.Start(New System.Diagnostics.ProcessStartInfo(fileResult) With {.UseShellExecute = True})
    End Sub
End Module

Download.


If you need a new code example or have a question: email us at support@sautinsoft.com or ask at Online Chat (right-bottom corner of this page) or use the Form below:



Questions and suggestions from you are always welcome!

We are developing .Net components since 2002. We know PDF, DOCX, RTF, HTML, XLSX and Images formats. If you need any assistance with creating, modifying or converting documents in various formats, we can help you. We will write any code example for you absolutely free.

© SautinSoft 2002 - 2019