ASP Examples

ChilkatHOMEAndroid™ASPVisual BasicVB.NETC#iOS (IPhone)Objective-CC++CUnicode C++Unicode CMFCDelphi DLLDelphi ActiveXFoxProJavaPerlPHP ExtensionPHP ActiveXPythonPowerShellRubySQL ServerVBScript

ASP Examples

ASP String
ASP Byte Array
Bounced Mail
Bz2
Character Encoding
CSV
Digital Certificates
Digital Signatures
Email
FTP
HTML Conversion
HTTP
IMAP
Encryption
MHT / HTML Email
POP3
RSA
S/MIME
SMTP
Socket
Spider
SSH
SSH Tunnel
SSH Key
SFTP
Tar
ASP Upload
XML
XMP
Zip Compression

More Examples...
Amazon S3
Email Object
DKIM / DomainKey
NTLM
DH Key Exchange
DSA
FileAccess
RSS
Atom
Self-Extractor
Service
PPMD
Deflate
Bzip2
LZW

 

 

 

 

 

 

PKCS7 SignedData Detached Signature

How to create a PKCS7 detached signature. The resulting PKCS7 structure is encoded to a printable string using hex or base64 encoding. The data being signed is not included in the PKCS#7 structure.

Download Chilkat Crypt ActiveX

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
set crypt = Server.CreateObject("Chilkat.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

set cert = Server.CreateObject("Chilkat.Cert")
success = cert.LoadByCommonName("Chilkat Software")
If (success <> 1) Then
    Response.Write cert.LastErrorText & "<br>"

End If

'  Make sure this certificate has a private key available:

bHasPrivateKey = cert.HasPrivateKey()
If (bHasPrivateKey <> 1) Then
    Response.Write "No private key available for signing." & "<br>"

End If

'  Tell the encryption component to use this cert.
crypt.SetSigningCert cert

strData = "This is the data to be signed."

'  Indicate that the PKCS7 signature should be returned
'  as a base64 encoded string:
crypt.EncodingMode = "base64"

'  The EncodingMode may be set to other values such as
'  "hex", "url", "quoted-printable", etc.

strSignature = crypt.SignStringENC(strData)

Response.Write Server.HTMLEncode( strSignature) & "<br>"

'  Now verify the signature against the original data.

'  Tell the component what certificate to use for verification.
crypt.SetVerifyCert cert

success = crypt.VerifyStringENC(strData,strSignature)
If (success = 1) Then
    Response.Write "digital signature verified" & "<br>"
Else
    Response.Write "digital signature invalid" & "<br>"
End If

'  Try it with incorrect data:
success = crypt.VerifyStringENC("This is not the signed data",strSignature)
If (success = 1) Then
    Response.Write "digital signature verified" & "<br>"
Else
    Response.Write "digital signature invalid" & "<br>"
End If

%>
</body>
</html>

 

© 2000-2013 Chilkat Software, Inc. All Rights Reserved.