Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(VB.NET) ITIDA Create Canonical JSONSee more Egypt ITIDA ExamplesDemonstrates creating the canonical (ITIDA) version of a JSON document. The document in the example is the one at https://sdk.invoicing.eta.gov.eg/files/one-doc.json Note: This example requires Chilkat v9.5.0.92 or greater. For more information, see https://sdk.invoicing.eta.gov.eg/signature-creation/
' This example assumes the Chilkat API to have been previously unlocked. ' See Global Unlock Sample for sample code. ' Note: This example requires Chilkat v9.5.0.92 or greater. ' (In v9.5.0.92, the "itida" encoding was added to StringBuilder's Encode method.) Dim sb As New Chilkat.StringBuilder ' This is the file at https://sdk.invoicing.eta.gov.eg/files/one-doc.json Dim success As Boolean = sb.LoadFile("qa_data/itida/sdk.invoicing.eta.gov.eg/files/one-doc.json","utf-8") If (success = False) Then Debug.WriteLine("Failed to load input file.") Exit Sub End If ' Convert the contents of sb to the ITIDA canonical form. ' Always pass utf-8 for the 2nd arg. sb.Encode("itida","utf-8") Dim canonical As String = sb.GetAsString() Debug.WriteLine(canonical) ' Output: ' "SomeValue""DELIVERY""APPROACH""SomeValue""PACKAGING""SomeValue""DATEVALIDITY""2020-09-28T09:30:10Z"........."TOTALAMOUNT""5191.50""EXTRADISCOUNTAMOUNT""5.00""TOTALITEMSDISCOUNTAMOUNT""14.00" ' Let's verify we got the correct result. Dim sbExpected As New Chilkat.StringBuilder success = sbExpected.LoadFile("qa_data/itida/sdk.invoicing.eta.gov.eg/files/one-doc-serialized.json.txt","utf-8") If (success = False) Then Debug.WriteLine("Failed to expected output file.") Exit Sub End If ' Compare our computed canonical string with the expected result. If (sb.ContentsEqualSb(sbExpected,True) = True) Then Debug.WriteLine("The computed canonical result is correct.") Else Debug.WriteLine("The computed canonical result is NOT correct.") End If |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.