Module1.vb
Imports ByteScout.DocumentParser ' This example demonstrates document data parsing to JSON and YAML formats. Module Module1 Sub Main() Dim templatesFolder As String = ".\Templates" Dim inputDocument1 As String = ".\DigitalOcean.pdf" Dim inputDocument2 As String = ".\AmazonAWS.pdf" ' Create DocumentParser instance Using documentParser As New DocumentParser("demo", "demo") Console.WriteLine("Loading templates...") Dim count = documentParser.AddTemplates(templatesFolder) Console.WriteLine($"{count} templates loaded.") Console.WriteLine() Console.WriteLine($"Parsing ""{inputDocument1}""...") Console.WriteLine() ' Parse document data in JSON format Dim jsonString As String = documentParser.ParseDocument(inputDocument1, OutputFormat.JSON) ' Display parsed data in console Console.WriteLine("Parsing results in JSON format:") Console.WriteLine() Console.WriteLine(jsonString) Console.WriteLine() Console.WriteLine($"Parsing ""{inputDocument2}""...") Console.WriteLine() ' Parse document data in YAML format Dim yamlString As String = documentParser.ParseDocument(inputDocument2, OutputFormat.YAML) ' Display parsed data in console Console.WriteLine("Parsing results in YAML format:") Console.WriteLine() Console.WriteLine(yamlString) End Using Console.WriteLine() Console.WriteLine("Press any key to continue...") Console.ReadLine() End Sub End Module