Frequently Asked Questions
Load private key from string?
Loading private key from string allows you to keep the key in your application, rather than external file.
Here is example:
Dim key As Keys
Dim KeyData As String
KeyData = "-----BEGIN RSA PRIVATE KEY-----" & vbCrLf & _
"Proc-Type: 4,ENCRYPTED" & vbCrLf & _
"DEK-Info: DES-EDE3-CFB,1430A7BCBCE760DF" & vbCrLf & _
"" & vbCrLf & _
"//evYJWu2DiUMWEnOvhCaBcT2nP76LxsUqpfegdEeu3PFcBIRxC0WW47UMlVu/Ac" & vbCrLf & _
"+A1iw3dCplN6rHW3cjZc7N7KvmcFJ7pXtQ5h5ItnNFu2/dLvq2hLRynHmkomZ9vQ" & vbCrLf & _
"Xo7bX8A7onRPf2c2yygxM+1sOZcN/teTaa+hM2CwoU97lQH4fed6eYMdflmPQZfc" & vbCrLf & _
"F4b9bFdBJo9nq+iBEmaQXewZPzJ0fNXOk/ePrNBxaRbMs3Ky3hynK7M7DyuKzxDJ" & vbCrLf & _
"qXFN8Ule+KnFpFd0EL02r621LFeRiFBB9kfi8FnvWTjx9JPizpOaFKyMFHNNojgO" & vbCrLf & _
"eQF0jn2XSeekbZPKRGmla7nQALb1Sxl7+1KX+gIACGlREAXPhwru2aSdvRXKhmEg" & vbCrLf & _
"ZZCJvEjnkJCBujnrfguYPj1jyY3AI3ySGBlMvJZoU7o48/H904lGnbQNjUJ5WSoI" & vbCrLf & _
"3wYRHXImvA3pywuI/dfLEHW+Zg5ojFu2Cz3S2b2GxZGabppEfIH8dYq2FXe2w5Rg" & vbCrLf & _
"G7qWjQhUrPOytl0NTRwpciGqMZKCiLcq01z4+FtB7Rau8xT3cJqLBPdBZR4nKdm5" & vbCrLf & _
"V/R1XWtxZhrYGEfRfPROanzQ6f2Yd4ISMekNYIDXVDjddWfGw1oDQYZ1KklEjP9i" & vbCrLf & _
"MerH3UM8RpQDNtmDmV0o3Y0sYImpoHhaYJePuei+jRZAUjWKZvFYoClJDUu9PO4x" & vbCrLf & _
"vc0l2NOGK0DVma6FbU5mPuCir5lYsChGEbIDMqD+uVunqwcdDlxlqYzeIOD8ujrF" & vbCrLf & _
"ssnK6vFSCMm5smZZ2i3v2q32EvtJDqpe3b30QZmP" & vbCrLf & _
"-----END RSA PRIVATE KEY-----"
Set key = New Keys
key.Load KeyData, "weonlydo"
Debug.Print key.PublicKeyOpenSSH(RSAkey)
Last updated Fri, Nov 8 2013 12:00am