ByteScout Data Extraction Suite – VB.NET – Export results to xml, csv, txt with barcode reader sdk

Home
/
Articles
/
ByteScout Data Extraction Suite – VB.NET – Export results to xml, csv, txt with barcode reader sdk

printable version:
ByteScout-Data-Extraction-Suite-VB-NET-Export-results-to-xml-csv-txt-with-barcode-reader-sdk.pdf

How to export results to xml, csv, txt with barcode reader sdk in VB.NET with ByteScout Data Extraction Suite

Step-by-step tutorial on how to export results to xml, csv, txt with barcode reader sdk in VB.NET

This sample source code below will display you how to export results to xml, csv, txt with barcode reader sdk in VB.NET. ByteScout Data Extraction Suite can export results to xml, csv, txt with barcode reader sdk. It can be applied from VB.NET. ByteScout Data Extraction Suite is the bundle that includes three SDK tools for data extraction from PDF, scans, images and from spreadsheets: PDF Extractor SDK, Data Extraction SDK, Barcode Reader SDK.

The SDK samples given below describe how to quickly make your application do export results to xml, csv, txt with barcode reader sdk in VB.NET with the help of ByteScout Data Extraction Suite. IF you want to implement the functionality, just copy and paste this code for VB.NET below into your code editor with your app, compile and run your application. This basic programming language sample code for VB.NET will do the whole work for you to export results to xml, csv, txt with barcode reader sdk.

ByteScout provides the free trial version of ByteScout Data Extraction Suite along with the documentation and source code samples.

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

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

Module1.vb

      Imports System.IO
Imports Bytescout.BarCodeReader
Imports System.Text
Imports System.Xml

Module Module1

    Sub Main()

        Dim reader As New Reader()
        reader.RegistrationName = "demo"
		reader.RegistrationKey = "demo"

        ' Set barcode type to find
        reader.BarcodeTypesToFind.All1D = True

        ' -----------------------------------------------------------------------
        ' NOTE: We can read barcodes from specific page to increase performance .
        ' For sample please refer to "Decoding barcodes from PDF by pages" program.
        ' ----------------------------------------------------------------------- 

        ' Read barcodes
        reader.ReadFromFile("barcodes.pdf")


        ' Export to files:
        ' ================

        ' 1. Export found barcodes to XML
        reader.ExportFoundBarcodesToXML("barcodes.xml")

        ' 2a. Export found barcodes to CSV with default delimiter, quotation and character encoding
        reader.ExportFoundBarcodesToCSV("barcodes.csv")

        ' 2b. Export found barcodes to CSV with custom delimiter, quotation and character encoding
        reader.ExportFoundBarcodesToCSV("barcodes2.csv", "|", "'", Encoding.UTF8)

        ' 3a. Export found barcodes to plain text file in default character encoding
        reader.ExportFoundBarcodesToTXT("barcodes.txt")

        ' 3b. Export only values of found barcodes to plain text file in custom character encoding
        reader.ExportFoundBarcodesToTXT("barcodes2.txt", True, Encoding.ASCII)


        ' Get formatted result to a variable for further processing
        ' =========================================================

        ' 1a. Get found barcodes as XmlDocument
        Dim xmlDocument As XmlDocument = reader.ExportFoundBarcodesToXMLDocument()

        ' 1b. Get found barcodes as XML string
        Dim xmlString = reader.ExportFoundBarcodesToXML()

        ' 2a. Get found barcodes as string in CSV format with default delimiter and quotation
        Dim csv As String = reader.ExportFoundBarcodesToCSV()

        ' 2b. Get found barcodes as string in CSV format with custom delimiter and quotation
        Dim csv2 As String = reader.ExportFoundBarcodesToCSV("|", "'")

        ' 3. Get found barcodes as string in plain text format
        Dim txt As String = reader.ExportFoundBarcodesToTXT()

        ' 4. Get found barcodes as string in JSON format
        Dim jsonString = reader.ExportFoundBarcodesToJSON()


        'Cleanup
        reader.Dispose()

    End Sub

End Module