Generate an RSA public/private key pair and save as two key files.
Public Function rsaMakeKeys ( _ szPubKeyFile As String, _ szPriKeyFile As String, _ szPassword As String, _ nBits As Long, _ Optional nExpFermat As Long = PKI_RSAEXP_EQ_65537, _ Optional szParams As String = "", _ Optional nOptions As Long = 0 _ ) As Long
PKI_PBE_SHA_3DES (0) for "pbeWithSHAAnd3-KeyTripleDES-CBC" from PKCS12 (default) PKI_PBE_PBKDF2_DESEDE3 for PBKDF2 using des-EDE3-CBC PKI_PBE_PBKDF2_AES128 for PBKDF2 using aes128-CBC PKI_PBE_PBKDF2_AES192 for PBKDF2 using aes192-CBC PKI_PBE_PBKDF2_AES256 for PBKDF2 using aes256-CBCplus optionally one of the following to output in textual PEM format [default format=DER binary]
PKI_KEY_FORMAT_PEM PKI_KEY_FORMAT_SSLand, optionally, add
PKI_KEYGEN_INDICATE
to indicate progress in a console window.szParams
are:"count=5000;"
[default=2048]."prf=hmacWithSHA256;"
[default=hmacWithSHA1
]."rngseed=pqrrr1234xyz;"
.{hmacWithSHA1|hmacWithSHA224|hmacWithSHA256|hmacWithSHA384|hmacWithSHA512}
.' Create a 2048-bit RSA key pair using defaults r = rsaMakeKeys("myrsa2048.pub", "myrsa2048.p8e", "password", 2048) ' Same but using stronger security and in PEM format r = rsaMakeKeys("myrsa2048ex.pub", "myrsa2048ex.p8e", "password1", 2048,,"count=6000;prf=hmacWithSHA256", PKI_PBE_PBKDF2_AES128 Or PKI_KEY_FORMAT_PEM)