Visual FoxPro

Save a Private Key as a Traditional DER File

Demonstrates the Chilkat PrivateKey.SavePkcs1File method, which saves the key using the traditional/preferred unencrypted DER representation. The only argument is the destination path.

Note: The file paths are relative to the application's current working directory. Absolute paths may also be used. Supply the paths appropriate to your own environment.

Background: This writes the older, algorithm-specific DER structure — useful for compatibility with tools that predate or do not accept PKCS #8. For new work, PKCS #8 (SavePkcs8File) is more interoperable. The output is unencrypted, so protect the file accordingly.

Chilkat Visual FoxPro Downloads

Download Chilkat for Visual FoxPro

Visual FoxPro

LOCAL lnSuccess
LOCAL loPrivKey

lnSuccess = 0

*  Load a private key to export.
loPrivKey = CreateObject('Chilkat.PrivateKey')
lnSuccess = loPrivKey.LoadPemFile("qa_data/private.pem")
IF (lnSuccess = 0) THEN
    ? loPrivKey.LastErrorText
    RELEASE loPrivKey
    CANCEL
ENDIF

*  Save using the traditional/preferred unencrypted DER representation.
lnSuccess = loPrivKey.SavePkcs1File("qa_output/private_pkcs1.der")
IF (lnSuccess = 0) THEN
    ? loPrivKey.LastErrorText
    RELEASE loPrivKey
    CANCEL
ENDIF

? "Saved."

RELEASE loPrivKey