Sample code for 30+ languages & platforms
Visual Basic 6.0

Remove All S/MIME Security Layers (UnwrapSecurity)

See more MIME Examples

Demonstrates the Chilkat Mime.UnwrapSecurity method, which removes supported S/MIME security layers and restores the underlying MIME content. It takes no arguments and handles both layer orders: signed-then-encrypted and encrypted-then-signed.

Note: The file paths are relative to the application's current working directory. Absolute paths may also be used. Supply the paths appropriate to your own environment.

Background: A message can be both signed and encrypted, in either order, producing nested S/MIME wrappers. UnwrapSecurity peels them all off in one call — verifying signatures and decrypting as it goes — so you do not have to detect the layering and call Verify and Decrypt in the right sequence yourself. Decryption still requires the recipient's certificate and private key to be configured.

Chilkat Visual Basic 6.0 Downloads

Visual Basic 6.0
Dim success As Long
success = 0

'  Demonstrates the Mime.UnwrapSecurity method, which removes supported S/MIME security layers and
'  restores the underlying MIME content.  It takes no arguments and handles both layer orders
'  (signed-then-encrypted and encrypted-then-signed).

Dim mime As New ChilkatMime
success = mime.LoadMimeFile("qa_data/secured.eml")
If (success = 0) Then
    Debug.Print mime.LastErrorText
    Exit Sub
End If

'  A single call peels off the signature and/or encryption layers.  (Decryption requires the
'  appropriate certificate/private key to be configured first.)
success = mime.UnwrapSecurity()
If (success = 0) Then
    Debug.Print mime.LastErrorText
    Exit Sub
End If

Debug.Print "Security layers removed. Content-Type is now: " & mime.ContentType