Chilkat HOME ASP Visual Basic VB.NET C# Visual C++ C MFC Delphi FoxPro Java Perl PHP Python Ruby SQL Server VBScript
|
Send Multipart/Alternative Mail This example program shows how to send a multiplart/alternative mail. ' Create a mailman object for sending email.
Dim mailman As New Chilkat.MailMan()
' Any string argument automatically begins the 30-day trial.
mailman.UnlockComponent("30-day trial")
' Set the SMTP server host.
mailman.SmtpHost = "smtp.earthlink.net"
' Create a simple multipart/alternative email.
Dim email As New Chilkat.Email()
email.Body = "This is the plain-text alternative"
email.AddHtmlAlternativeBody("<html><body><b><font color='red' size='+1'>This is the HTML alternative body</font></b></html>")
email.Subject = "This is a simple multipart/alternative email"
email.AddTo("Chilkat Support", "support@chilkatsoft.com")
email.From = "Buddahead <buddahead@chilkatsoft.com>"
' If you're curious, show the MIME text of the email to be sent..
MessageBox.Show(email.GetMime())
' Send email.
Dim success As Boolean
success = mailman.SendEmail(email)
If success Then
MessageBox.Show("Sent multipart/alternative mail!")
Else
MessageBox.Show(mailman.LastErrorText)
End If
Important: The download for this
example does not contain the ChilkatDotNet.dll which |
Need a specific example? Send a request to support@chilkatsoft.com
© 2000-2007 Chilkat Software, Inc. All Rights Reserved.