Lianja

Example: Crypt2.AddPfxSourceFile method

Demonstrates how to call the AddPfxSourceFile method. Lianja

llSuccess = .F.

loCrypt = createobject("CkCrypt2")
llSuccess = .F.

// Do public-key decryption (RSA)
loCrypt.CryptAlgorithm = "pki"

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

lcPfxPath = "c:/my_pfx_files/a.pfx"
lcPfxPassword = "secret1"
llSuccess = loCrypt.AddPfxSourceFile(lcPfxPath,lcPfxPassword)
if (llSuccess = .F.) then
    ? loCrypt.LastErrorText
    release loCrypt
    return
endif

// Add as many as PFX sources as desired...
lcPfxPath = "c:/my_pfx_files/b.pfx"
lcPfxPassword = "secret2"
llSuccess = loCrypt.AddPfxSourceFile(lcPfxPath,lcPfxPassword)
if (llSuccess = .F.) then
    ? loCrypt.LastErrorText
    release loCrypt
    return
endif

// ...
// ...


release loCrypt