Create Detached Signature File

Download Chilkat Crypt ActiveX

Creates and verifies a detached signature.

LOCAL loCrypt
LOCAL lnSuccess
LOCAL loCert

loCrypt = CreateObject('Chilkat.Crypt2')

*  Any string argument automatically begins the 30-day trial.

lnSuccess = loCrypt.UnlockComponent("30-day trial")
IF (lnSuccess <> 1) THEN
    =MESSAGEBOX("Crypt component unlock failed")
    QUIT
ENDIF

loCert = CreateObject('Chilkat.Cert')
loCert.LoadByCommonName("Chilkat Software, Inc.")

*  Tell the crypt component to use this cert.
loCrypt.SetSigningCert(loCert)

*  We can sign any type of file, creating a .sig as output:
lnSuccess = loCrypt.CreateDetachedSignature("test.pdf","test.sig")
IF (lnSuccess = 1) THEN
    =MESSAGEBOX("Success!")
ENDIF

=MESSAGEBOX(loCrypt.LastErrorText)

*  Verify and restore the original file:
loCrypt.SetVerifyCert(loCert)

lnSuccess = loCrypt.VerifyDetachedSignature("test.pdf","test.sig")
IF (lnSuccess = 1) THEN
    =MESSAGEBOX("Success!")
ENDIF

=MESSAGEBOX(loCrypt.LastErrorText)