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
(Classic ASP) UN/EDIFACT Syntax Level A Encoding/DecodingDemonstrates the new "eda" encoding that can be used throughout Chilkat starting in v9.5.0.65.
<html> <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8"> </head> <body> <% ' Note: Requires Chilkat v9.5.0.65 or greater. ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.StringBuilder") set sb = Server.CreateObject("Chilkat.StringBuilder") success = sb.Append("The 5 men of 223rd St") Response.Write "<pre>" & Server.HTMLEncode( sb.GetAsString()) & "</pre>" ' Encode the utf-8 byte representation of the string in the ' UN/EDIFACT syntax level A character set. success = sb.Encode("eda","utf-8") Response.Write "<pre>" & Server.HTMLEncode( sb.GetAsString()) & "</pre>" ' EDA Output should be: BTME027FCF6CFARFI94JT6.)F(14KJ2U ' Decode back to the original string. success = sb.Decode("eda","utf-8") Response.Write "<pre>" & Server.HTMLEncode( sb.GetAsString()) & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( "----") & "</pre>" ' The following requires the Chilkat API to have been previously unlocked. ' See Global Unlock Sample for sample code. ' The "eda" encoding can be used anywhere within Chilkat. ' For example, with the Crypt2 API ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Crypt2") set crypt = Server.CreateObject("Chilkat.Crypt2") crypt.CryptAlgorithm = "aes" crypt.CipherMode = "cbc" crypt.KeyLength = 256 crypt.EncodingMode = "eda" ivHex = "000102030405060708090A0B0C0D0E0F" crypt.SetEncodedIV ivHex,"hex" keyHex = "000102030405060708090A0B0C0D0E0F101112131415161718191A1B1C1D1E1F" crypt.SetEncodedKey keyHex,"hex" encStr = crypt.EncryptStringENC("The quick brown fox jumps over the lazy dog.") ' The output is UN/EDIFACT syntax level A Response.Write "<pre>" & Server.HTMLEncode( encStr) & "</pre>" ' Now decrypt: decStr = crypt.DecryptStringENC(encStr) Response.Write "<pre>" & Server.HTMLEncode( decStr) & "</pre>" %> </body> </html> |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.