DSA Public Key PEM to DER Conversion

Converts a DSA public key from PEM format to DER.

Download Chilkat DSA ActiveX

LOCAL lnSuccess
LOCAL loDsa
LOCAL lcPemPublicKey



loDsa = CreateObject('Chilkat.Dsa')

lnSuccess = loDsa.UnlockComponent("Anything for 30-day trial")
IF (lnSuccess <> 1) THEN
    =MESSAGEBOX(loDsa.LastErrorText)
    QUIT
ENDIF

*  Load a PEM public key.

lcPemPublicKey = loDsa.LoadText("dsa_pub.pem")
*  Import the public key PEM into the DSA object.
lnSuccess = loDsa.FromPublicPem(lcPemPublicKey)
IF (lnSuccess <> 1) THEN
    =MESSAGEBOX(loDsa.LastErrorText)
    QUIT
ENDIF

*  Write it out as a DER file:
lnSuccess = loDsa.ToPublicDerFile("dsa_pub.der")
IF (lnSuccess <> 1) THEN
    =MESSAGEBOX(loDsa.LastErrorText)
    QUIT
ENDIF

=MESSAGEBOX("Finished!")