Module1.vb
Imports ByteScout.InvoiceParser
' This example demonstrates invoice data parsing to JSON and YAML formats.
Module Module1
Sub Main()
Dim inputDocument1 As String = ".\DigitalOcean.pdf"
Dim inputDocument2 As String = ".\AmazonAWS.pdf"
' Create InvoiceParser instance
Using invoiceParser As New InvoiceParser("demo", "demo")
Console.WriteLine($"Parsing ""{inputDocument1}""...")
Console.WriteLine()
' Parse invoice data in JSON format
Dim jsonString As String = invoiceParser.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 invoice data in YAML format
Dim yamlString As String = invoiceParser.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