(Visual FoxPro) Load PFX with Different Password for Private Keys

Demonstrates how to load a PFX where the HMAC integrity password (the password for the entire PFX) is different than the password for the private keys contained inside.

Note: This example requires a new feature made available in Chilkat v9.5.0.75.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

LOCAL lnSuccess
LOCAL loPfx
LOCAL loJson

* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.Pfx')
loPfx = CreateObject('Chilkat.Pfx')
* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.JsonObject')
loJson = CreateObject('Chilkat.JsonObject')

* Build JSON containing the HMAC integrity (PFX) password, and the 
* password for the private keys.
loJson.UpdateString("integrity","password1")
loJson.UpdateString("privKeys","password2")

* The JSON contains this:
* 
* 	{
* 	  "integrity": "password1",
* 	  "privKeys": "password2"
* 	}
* 

* Use the above JSON instead of a simple password string when loading the PFX:
lnSuccess = loPfx.LoadPfxFile("qa_data/pfx/PrivateKeyPassIsDifferent.pfx",loJson.Emit())
IF (lnSuccess <> 1) THEN
    ? loPfx.LastErrorText
    RELEASE loPfx
    RELEASE loJson
    CANCEL
ENDIF

? "Success."

RELEASE loPfx
RELEASE loJson