Visual FoxPro

Load Certificate from .cer and Private Key from .pem

See more Certificates Examples

Load a certificate from a .cer and its associated private key from a .pem. Visual FoxPro

LOCAL lnSuccess
LOCAL loCert
LOCAL loSbPem

lnSuccess = 0

loCert = CreateObject('Chilkat.Cert')
lnSuccess = loCert.LoadFromFile("C:/certs_and_keys/Certificate.cer")
IF (lnSuccess = 0) THEN
    ? loCert.LastErrorText
    RELEASE loCert
    CANCEL
ENDIF

loSbPem = CreateObject('Chilkat.StringBuilder')
lnSuccess = loSbPem.LoadFile("C:/certs_and_keys/PrivateKey.pem","utf-8")
IF (lnSuccess = 0) THEN
    ? "Failed to load private key PEM"
    RELEASE loCert
    RELEASE loSbPem
    CANCEL
ENDIF

lnSuccess = loCert.SetPrivateKeyPem(loSbPem.GetAsString())
IF (lnSuccess = 0) THEN
    ? loCert.LastErrorText
    RELEASE loCert
    RELEASE loSbPem
    CANCEL
ENDIF

? "The certificate and associated private key are now loaded and ready for signing."

RELEASE loCert
RELEASE loSbPem