Chilkat
HOME
Android™
ASP
Visual Basic
VB.NET
C#
iOS (IPhone)
Objective-C
C++
C
MFC
Delphi
FoxPro
Java
Perl
PHP Extension
PHP ActiveX
Python
PowerShell
Ruby
SQL Server
VBScript
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. ' 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 |
© 2000-2012 Chilkat Software, Inc. All Rights Reserved.