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) Create Egypt ITIDA CAdES-BES .p7s Signature (with strings in-memory)See more Egypt ITIDA ExamplesDemonstrates how to create a .p7s signature that fits Egypt's ITIDA requirements. Note: This example requires Chilkat v9.5.0.75 or greater.
<html> <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8"> </head> <body> <% ' This example assumes the Chilkat API to have been previously unlocked. ' See Global Unlock Sample for sample code. ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Crypt2") set crypt = Server.CreateObject("Chilkat.Crypt2") ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Cert") set cert = Server.CreateObject("Chilkat.Cert") ' There are many ways to load the certificate. ' This example was created for a customer using an ePass2003 USB token. ' Assuming the USB token is the only source of a hardware-based private key.. success = cert.LoadFromSmartcard("") If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( cert.LastErrorText) & "</pre>" Response.End End If ' Tell the crypt component to use this cert. success = crypt.SetSigningCert(cert) If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( crypt.LastErrorText) & "</pre>" Response.End End If ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.JsonObject") set cmsOptions = Server.CreateObject("Chilkat.JsonObject") ' Setting "DigestData" causes OID 1.2.840.113549.1.7.5 (digestData) to be used. success = cmsOptions.UpdateBool("DigestData",1) success = cmsOptions.UpdateBool("OmitAlgorithmIdNull",1) crypt.CmsOptions = cmsOptions.Emit() ' The CadesEnabled property applies to all methods that create CMS/PKCS7 signatures. ' To create a CAdES-BES signature, set this property equal to true. crypt.CadesEnabled = 1 crypt.HashAlgorithm = "sha256" ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.JsonObject") set jsonSigningAttrs = Server.CreateObject("Chilkat.JsonObject") success = jsonSigningAttrs.UpdateInt("contentType",1) success = jsonSigningAttrs.UpdateInt("signingTime",1) success = jsonSigningAttrs.UpdateInt("messageDigest",1) success = jsonSigningAttrs.UpdateInt("signingCertificateV2",1) crypt.SigningAttributes = jsonSigningAttrs.Emit() ' By default, all the certs in the chain of authentication are included in the signature. ' If desired, we can choose to only include the signing certificate: crypt.IncludeCertChain = 0 ' Make sure we sign the utf-8 byte representation of the JSON string crypt.Charset = "utf-8" ' Create the CAdES-BES signature. textToSign = """issuer""""address""""branchID""""0""""country""""EG""""regionCity..." crypt.EncodingMode = "base64" sigBase64 = crypt.SignStringENC(textToSign) If (crypt.LastMethodSuccess = 0) Then Response.Write "<pre>" & Server.HTMLEncode( crypt.LastErrorText) & "</pre>" Response.End End If Response.Write "<pre>" & Server.HTMLEncode( "Base64 signature:") & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( sigBase64) & "</pre>" %> </body> </html> |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.