Chilkat HOME ASP Visual Basic VB.NET C# Visual C++ C MFC Delphi FoxPro Java Perl PHP Python Ruby SQL Server VBScript
|
Select Cert for Encrypted EmailDemonstrates how to search for a specific certificate from Current User and Local Machine certificate stores, and then use it for encrypting an email. require 'chilkat' # The mailman object is used for sending and receiving email. mailman = Chilkat::CkMailMan.new() # Any string argument automatically begins the 30-day trial. success = mailman.UnlockComponent("30-day trial") if (success != true) print "Component unlock failed" + "\n" exit end # Set the SMTP server. mailman.put_SmtpHost("smtp.comcast.net") # Search the Local Machine and Current User certificate # stores for a certificate -- by common name or by email address. cert = Chilkat::CkCert.new() success = cert.LoadByCommonName("Chilkat Software") if (success != true) # Try loading it by email address. success = cert.LoadByEmailAddress("comodo@chilkatsoft.com") if (success != true) print cert.lastErrorText() + "\n" exit end end # Create a new email object email = Chilkat::CkEmail.new() email.put_Subject("This email is encrypted") email.put_Body("This is a digitally encrypted mail") email.put_From("Chilkat Support <support@chilkatsoft.com>") email.AddTo("Comodo Test","comodo@chilkatsoft.com") # Indicate that the email is to be sent encrypted. email.put_SendEncrypted(true) # Specify the certificate: success = email.SetEncryptCert(cert) if (success != true) print email.lastErrorText() + "\n" exit end success = mailman.SendEmail(email) if (success != true) print mailman.lastErrorText() + "\n" else print "Mail Sent!" + "\n" end |
Need a specific example? Send a request to support@chilkatsoft.com
© 2000-2008 Chilkat Software, Inc. All Rights Reserved.