VBScript

Load a Public Key from a String

Demonstrates the Chilkat PublicKey.LoadFromString method, which loads a public key from a string. The only argument is the string. Chilkat examines the content and recognizes PEM public keys, unencrypted PEM private keys (taking only the public portion), XML, JWK, and more.

Background: This is the forgiving text loader: rather than requiring you to know the exact format, it inspects whatever string you provide and figures it out. A useful convenience is that it accepts an unencrypted private key too and keeps only the public half — handy when you have a key pair but need just the public key. Use it whenever the textual format is uncertain or varies by source.

Chilkat VBScript Downloads

Download Chilkat for VBScript

VBScript

Dim fso, outFile
Set fso = CreateObject("Scripting.FileSystemObject")
'Create a Unicode (utf-16) output text file.
Set outFile = fso.CreateTextFile("output.txt", True, True)

success = 0

'  Demonstrates the PublicKey.LoadFromString method, which loads a public key from a string.  The
'  only argument is the string.  Chilkat examines the content and recognizes PEM public keys,
'  unencrypted PEM private keys (using only the public portion), XML, JWK, and more.

set pubKey = CreateObject("Chilkat.PublicKey")

'  The PEM text of a public key.
keyText = "-----BEGIN PUBLIC KEY-----" & vbLf & "MIIBIjANBgkq...IDAQAB" & vbLf & "-----END PUBLIC KEY-----"

success = pubKey.LoadFromString(keyText)
If (success = 0) Then
    outFile.WriteLine(pubKey.LastErrorText)
    WScript.Quit
End If

outFile.WriteLine("Loaded a " & pubKey.KeyType & " public key.")

outFile.Close