Send S/MIME Signed and Encrypted Email

Sending a signed and encrypted email is as easy as setting both the SendEncrypted and SendSigned properties. The email is signed using the private key of the sender's certificate, and encrypted using the public key of the recipient's certificate.

Download Chilkat .NET for 2.0 Framework

Download Chilkat .NET for 1.0 / 1.1 Framework

' The mailman object is used for sending and receiving email.
Dim mailman As New Chilkat.MailMan()

' Any string argument automatically begins the 30-day trial.
Dim success As Boolean
success = mailman.UnlockComponent("30-day trial")
If (success <> true) Then
    MsgBox("Component unlock failed")
    Exit Sub
End If


' Set the SMTP server.
mailman.SmtpHost = "smtp.comcast.net"

' Create a new email object
Dim email As New Chilkat.Email()

email.Subject = "This email is signed and encrypted"
email.Body = "This is a digitally signed and encrypted mail"
email.From = "Chilkat Support <admin@chilkatsoft.com>"
email.AddTo("TagTooga","admin@tagtooga.com")

' To send signed and encrypted email, set both
' SendSigned and SendEncrypted:
email.SendSigned = true
email.SendEncrypted = true

success = mailman.SendEmail(email)
If (success <> true) Then
    MsgBox(mailman.LastErrorText)
Else
    MsgBox("Mail Sent!")
End If