Visual FoxPro

Load PFX with Different Password for Private Keys

See more PFX/P12 Examples

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.

Visual FoxPro

LOCAL lnSuccess
LOCAL loPfx
LOCAL loJson

lnSuccess = 0

loPfx = CreateObject('Chilkat.Pfx')
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