(Lianja) Convert RSA Private Key to Public Key

Demonstrates how to get a public RSA key from a private RSA key.

Chilkat Lianja Extension Download Chilkat Lianja Extension

loKey = createobject("CkPrivateKey")

// Step 1: Load the private key from a source.
// (Chilkat can load private keys from all types of formats, and from in-memory bytes or encoded strings.
// see the online reference documentation for more options.)
llSuccess = loKey.LoadPemFile("qa_data/pem/VP_Private.pem")
if (llSuccess <> .T.) then
    ? loKey.LastErrorText
    release loKey
    return
endif

// Step 2: Get the public key object from the private key object.
loPubKey = loKey.GetPublicKey()
if (loKey.LastMethodSuccess <> .T.) then
    ? loKey.LastErrorText
    release loKey
    return
endif

// Step 3: Save the public key in a desired format. 
// (Chilkat can load or save public and private keys in many different formats.  See
// the online reference documentation for more options.)

// Saves to a PKCS8 PEM file.
llBPreferPkcs1 = .F.
llSuccess = loPubKey.SavePemFile(llBPreferPkcs1,"qa_data/pem/VP_Public.pem")
if (loPubKey.LastMethodSuccess <> .T.) then
    ? loPubKey.LastErrorText
    release loKey
    return
endif

release loPubKey

? "Extracted and saved public key from private key."


release loKey