ExtractHTML.vbs
' 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 ' Load sample PDF document extractor.LoadDocumentFromFile("..\..\sample2.pdf") ' Save extracted HTML to file extractor.SaveHtmlToFile_2 "output.html" ' Open output file in default associated application Set shell = CreateObject("WScript.Shell") shell.Run "output.html", 1, false Set shell = Nothing Set extractor = Nothing
ExtractHTMLFromPage.vbs
' 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 ' Load sample PDF document extractor.LoadDocumentFromFile("..\..\sample2.pdf") ' Convert 2-nd page to HTML and save it to file extractor.SaveHtmlPageToFile 1, "output.html" ' Open output file in default associated application Set shell = CreateObject("WScript.Shell") shell.Run "output.html", 1, false Set shell = Nothing Set extractor = Nothing