Xojo Plugin

Get Base64 Public Key from Private Key

See more ECC Examples

Demonstrates how to get the public key in base64 format from a private key. Xojo Plugin

Dim success As Boolean
success = False

// Load a private key from base64.
Dim bd As New Chilkat.BinData
success = bd.AppendEncoded("MHQCA....n0Q==","base64")

Dim privKey As New Chilkat.PrivateKey
success = privKey.LoadAnyFormat(bd,"")
If (success = False) Then
    System.DebugLog(privKey.LastErrorText)
    Return
End If

Dim pubKey As New Chilkat.PublicKey
success = privKey.ToPublicKey(pubKey)

Dim pubKeyBase64 As String
pubKeyBase64 = pubKey.GetEncoded(True,"base64")
System.DebugLog(pubKeyBase64)