![]() |
Chilkat HOME Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi DLL Go Java Node.js Objective-C PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
Verify .p7s and Extract Original File
ASP example to verify and unpack the contents of a .p7s to restore the original file. <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8"> </head> <body> <% set crypt = Server.CreateObject("Chilkat_9_5_0.Crypt2") ' Any string argument automatically begins the 30-day trial. success = crypt.UnlockComponent("30-day trial") If (success <> 1) Then Response.Write "Crypt component unlock failed" & "<br>" End If ' Find our digital certificate from the Current User certificate store. set ccs = Server.CreateObject("Chilkat_9_5_0.CreateCS") Set certStore = ccs.OpenCurrentUserStore() Set cert = certStore.FindCertBySubjectCN("Chilkat Software, Inc.") If (cert Is Nothing ) Then Response.Write cert.LastErrorText & "<br>" End If ' Verify and restore the original file: crypt.SetVerifyCert cert success = crypt.VerifyP7S("license.p7s","license2.rtf") If (success = 0) Then Response.Write crypt.LastErrorText & "<br>" End If Response.Write "Success!" & "<br>" %> </body> </html> |
||||
© 2000-2026 Chilkat Software, Inc. All Rights Reserved.