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) Sign PDF using ARSS (Aruba Remote Signing Service)See more Signing in the Cloud ExamplesDemonstrates how to sign a PDF using the Aruba Remote Signing Service (ARSS). Note: This example requires Chilkat v9.5.0.96 or greater.
' This example requires the Chilkat API to have been previously unlocked. ' See Global Unlock Sample for sample code. Dim pdf As New Chilkat.Pdf ' Load a PDF to be signed. Dim success As Boolean = pdf.LoadFile("qa_data/pdf/hello.pdf") If (success = False) Then Debug.WriteLine(pdf.LastErrorText) Exit Sub End If ' Options for signing are specified in JSON. Dim json As New Chilkat.JsonObject ' Indicate that we want an LTV-enabled signature json.UpdateBool("ltvOcsp",True) ' Define the appearance of the signature. json.UpdateInt("page",1) json.UpdateString("appearance.y","top") json.UpdateString("appearance.x","left") json.UpdateString("appearance.fontScale","10.0") json.UpdateString("appearance.text[0]","Digitally signed by: cert_cn") json.UpdateString("appearance.text[1]","current_dt") json.UpdateString("appearance.text[2]","This is an LTV-enabled signature.") ' Load the certificate used for signing. The certificate's private key is stored on ' the Aruba.it server and the signing will happen remotely using the ' ARSS (Aruba Remote Signing Service). ' However, we still need the certificate locally (without private key). Dim cert As New Chilkat.Cert success = cert.LoadFromFile("qa_data/certs/myCert.cer") If (success = False) Then Debug.WriteLine(cert.LastErrorText) Exit Sub End If ' To sign using the Aruba Remote Signing Service, ' add the following lines of code to specify your authentication credentials, ' and the ID of the certificate w/ private key on the server to be used. Dim jsonArss As New Chilkat.JsonObject ' Set the "service" equal to "ARSS" to tell Chilkat to use ARSS for signing. jsonArss.UpdateString("service","ARSS") ' Specify the certificate ID, such as "AS0" ' This certificate should match the certificate loaded in the above code. jsonArss.UpdateString("certID","YOUR_ARSS_CERT_ID") jsonArss.UpdateString("otpPwd","YOUR_OTP_PWD") jsonArss.UpdateString("typeOtpAuth","demoprod") jsonArss.UpdateString("user","YOUR_ARSS_USERNAME") jsonArss.UpdateString("userPWD","YOUR_ARSS_PASSWORD") success = cert.SetCloudSigner(jsonArss) ' Tell the pdf object to use the certificate for signing. success = pdf.SetSigningCert(cert) If (success = False) Then Debug.WriteLine(pdf.LastErrorText) Exit Sub End If ' Chilkat will build the signed PDF locally, but will (internally) use ARSS ' to do the RSA sign hash operation. success = pdf.SignPdf(json,"qa_output/hello_ltv_signed.pdf") If (success = False) Then Debug.WriteLine(pdf.LastErrorText) Exit Sub End If Debug.WriteLine("The PDF has been successfully cryptographically signed with long-term validation.") |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.