ByteScout Premium Suite - Visual Basic 6 - Change pdf to html output page width with pdf to html sdk - ByteScout

ByteScout Premium Suite – Visual Basic 6 – Change pdf to html output page width with pdf to html sdk

  • Home
  • /
  • Articles
  • /
  • ByteScout Premium Suite – Visual Basic 6 – Change pdf to html output page width with pdf to html sdk

How to change pdf to html output page width with pdf to html sdk in Visual Basic 6 using ByteScout Premium Suite

How to write a robust code in Visual Basic 6 to change pdf to html output page width with pdf to html sdk with this step-by-step tutorial

An easy to understand sample source code to learn how to change pdf to html output page width with pdf to html sdk in Visual Basic 6 ByteScout Premium Suite is the bundle that includes twelve SDK products from ByteScout including tools and components for PDF, barcodes, spreadsheets, screen video recording. It can change pdf to html output page width with pdf to html sdk in Visual Basic 6.

The following code snippet for ByteScout Premium Suite works best when you need to quickly change pdf to html output page width with pdf to html sdk in your Visual Basic 6 application. IF you want to implement the functionality, just copy and paste this code for Visual Basic 6 below into your code editor with your app, compile and run your application. Enjoy writing a code with ready-to-use sample Visual Basic 6 codes.

If you want to try other source code samples then the free trial version of ByteScout Premium Suite is available for download from our website. Just try other source code samples for Visual Basic 6.

On-demand (REST Web API) version:
 Web API (on-demand version)

On-premise offline SDK for Windows:
 60 Day Free Trial (on-premise)

ChangeOutputPageWidth.vbp
      
Type=Exe Reference=*\G{00020430-0000-0000-C000-000000000046}#2.0#0#..\..\..\..\..\..\..\..\..\Windows\SysWOW64\stdole2.tlb#OLE Automation Reference=*\G{3D7BFCBE-A112-4953-B4B0-83647F86C919}#9.1#0#..\..\..\..\..\..\..\..\..\WINDOWS\SYSWOW64\Bytescout.PDF2HTML.tlb#ByteScout PDF To HTML SDK [TRIAL] Form=Form1.frm Startup="Form1" Command32="" Name="ChangeOutputPageWidth" HelpContextID="0" CompatibleMode="0" MajorVer=1 MinorVer=0 RevisionVer=0 AutoIncrementVer=0 ServerSupportFiles=0 VersionCompanyName="Hiren" CompilationType=0 OptimizationType=0 FavorPentiumPro(tm)=0 CodeViewDebugInfo=0 NoAliasing=0 BoundsCheck=0 OverflowCheck=0 FlPointCheck=0 FDIVCheck=0 UnroundedFP=0 StartMode=0 Unattended=0 Retained=0 ThreadPerObject=0 MaxNumberOfThreads=1

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

Form1.frm
      
VERSION 5.00 Begin VB.Form Form1 Caption = "ChangeOutputPageWidth" ClientHeight = 1320 ClientLeft = 120 ClientTop = 465 ClientWidth = 4440 LinkTopic = "Form1" ScaleHeight = 1320 ScaleWidth = 4440 StartUpPosition = 3 'Windows Default Begin VB.CommandButton cmd_change_output_pdf_width Caption = "Change Output Page Width" Height = 855 Left = 480 TabIndex = 0 Top = 240 Width = 3495 End End Attribute VB_Name = "Form1" Attribute VB_GlobalNameSpace = False Attribute VB_Creatable = False Attribute VB_PredeclaredId = True Attribute VB_Exposed = False Private Sub cmd_change_output_pdf_width_Click() ' Hanlde Error On Error GoTo ErrorHandler: ' Create Bytescout.PDF2HTML.HTMLExtractor object Set extractor = CreateObject("Bytescout.PDF2HTML.HTMLExtractor") extractor.RegistrationName = "demo" extractor.RegistrationKey = "demo" ' Set HTML with CSS extraction mode extractor.ExtractionMode = 1 ' set output width to 200 pixels extractor.OutputPageWidth = 200 ' Load sample PDF document extractor.LoadDocumentFromFile ("sample2.pdf") ' Save extracted HTML to file extractor.SaveHtmlToFile_2 "output.html" MsgBox "PDF file successfully saved as 'output.html'.", vbInformation, "Success" ' Open output file in default associated application CreateObject("WScript.Shell").Run "output.html", 1, False ' Close form Unload Me ErrorHandler: If Err.Number <> 0 Then MsgBox Err.Description, vbInformation, "Error" End If End Sub

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