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