Visual Basic 6.0

Example: Crypt2.AddPfxSourceFile method

Demonstrates how to call the AddPfxSourceFile method. Visual Basic 6.0

Dim success As Long
success = 0

Dim crypt As New ChilkatCrypt2
success = 0

' Do public-key decryption (RSA)
crypt.CryptAlgorithm = "pki"

' ...
' ...
' ...

Dim pfxPath As String
pfxPath = "c:/my_pfx_files/a.pfx"
Dim pfxPassword As String
pfxPassword = "secret1"
success = crypt.AddPfxSourceFile(pfxPath,pfxPassword)
If (success = 0) Then
    Debug.Print crypt.LastErrorText
    Exit Sub
End If

' Add as many as PFX sources as desired...
pfxPath = "c:/my_pfx_files/b.pfx"
pfxPassword = "secret2"
success = crypt.AddPfxSourceFile(pfxPath,pfxPassword)
If (success = 0) Then
    Debug.Print crypt.LastErrorText
    Exit Sub
End If

' ...
' ...