Convert from HTML to PDF in CSharp VB and ASP.NET with a Free 3rd Party Library

Converting from html to pdf is not an easy task. There are some tools that can do that, but most of them cost thousands of dollars. SelectPdf offers a Community Edition (FREE) of the powerful Html To Pdf Converter for .NET that can be found in the full featured pdf library.

3.6 Star
52,883 times
Add to favorites
E-mail Twitter Digg Facebook

Solution explorer

Imports System.Collections.Generic
Imports System.Linq
Imports System.Web
Imports System.Web.UI
Imports System.Web.UI.WebControls
Imports SelectPdf

Namespace SelectPdf.Samples
    Partial Public Class pdf_converter_viewer_preferences
        Inherits System.Web.UI.Page

        Protected Sub BtnCreatePdf_Click(sender As Object, e As EventArgs)
            ' read parameters from the webpage
            Dim url As String = TxtUrl.Text

            Dim page_layout As String = DdlPageLayout.SelectedValue
            Dim pageLayout As PdfViewerPageLayout = DirectCast( _
                [Enum].Parse(GetType(PdfViewerPageLayout), page_layout, True),  _

            Dim page_mode As String = DdlPageMode.SelectedValue
            Dim pageMode As PdfViewerPageMode = DirectCast( _
                [Enum].Parse(GetType(PdfViewerPageMode), page_mode, True),  _

            Dim centerWindow As Boolean = ChkCenterWindow.Checked
            Dim displayDocTitle As Boolean = ChkDisplayDocTitle.Checked
            Dim fitWindow As Boolean = ChkFitWindow.Checked
            Dim hideMenuBar As Boolean = ChkHideMenuBar.Checked
            Dim hideToolbar As Boolean = ChkHideToolbar.Checked
            Dim hideWindowUI As Boolean = ChkHideWindowUI.Checked

            ' instantiate a html to pdf converter object
            Dim converter As New HtmlToPdf()

            ' set converter options
            converter.Options.ViewerPreferences.CenterWindow = centerWindow
            converter.Options.ViewerPreferences.DisplayDocTitle = displayDocTitle
            converter.Options.ViewerPreferences.FitWindow = fitWindow
            converter.Options.ViewerPreferences.HideMenuBar = hideMenuBar
            converter.Options.ViewerPreferences.HideToolbar = hideToolbar
            converter.Options.ViewerPreferences.HideWindowUI = hideWindowUI

            converter.Options.ViewerPreferences.PageLayout = pageLayout
            converter.Options.ViewerPreferences.PageMode = pageMode
            converter.Options.ViewerPreferences.NonFullScreenPageMode = _

            ' create a new pdf document converting an url
            Dim doc As PdfDocument = converter.ConvertUrl(url)

            ' save pdf document
            doc.Save(Response, False, "Sample.pdf")

            ' close pdf document
        End Sub
    End Class
End Namespace