Xbase++

Example: Crypt2.AddPfxSourceFile method

Demonstrates how to call the AddPfxSourceFile method. Xbase++

LOCAL nSuccess
LOCAL oCrypt
LOCAL cPfxPath
LOCAL cPfxPassword

nSuccess := 0

oCrypt := CreateObject("Chilkat.Crypt2")
nSuccess := 0

//  Do public-key decryption (RSA)
oCrypt:CryptAlgorithm := "pki"

//  ...
//  ...
//  ...

cPfxPath := "c:/my_pfx_files/a.pfx"
cPfxPassword := "secret1"
nSuccess := oCrypt:AddPfxSourceFile(cPfxPath, cPfxPassword)
IF (nSuccess == 0)
    ? oCrypt:LastErrorText
    oCrypt:destroy()
    RETURN
ENDIF

//  Add as many as PFX sources as desired...
cPfxPath := "c:/my_pfx_files/b.pfx"
cPfxPassword := "secret2"
nSuccess := oCrypt:AddPfxSourceFile(cPfxPath, cPfxPassword)
IF (nSuccess == 0)
    ? oCrypt:LastErrorText
    oCrypt:destroy()
    RETURN
ENDIF

//  ...
//  ...

oCrypt:destroy()