国产导航精品,国产乱子伦精品,亚洲美免无

MailBee.NET Objects發(fā)送電子郵件（SMTP）教程四：發(fā)送包含文本和html的電子郵件

原創(chuàng)|使用教程|編輯：黃竹雯|2017-05-03 17:41:00.000|閱讀 442 次

概述：該文主要介紹了MailBee.NET Objects中發(fā)送包含純文本和HTML格式主體的郵件，并添加.xls文檔附加。歡迎您下載試用版進(jìn)行運(yùn)用！

# 界面/圖表報(bào)表/文檔/IDE等千款熱門(mén)軟控件火熱銷(xiāo)售中 >>

相關(guān)鏈接：

在單行代碼中快速發(fā)送電子郵件的最簡(jiǎn)單的方法是使用SMTP對(duì)象的QuickSend方法。在這種情況下，開(kāi)發(fā)人員甚至不需要?jiǎng)?chuàng)建一個(gè)新的SMTP對(duì)象實(shí)例。只需要指定其基本屬性（如From、To、Subject、Body等）：

C#:
MailBee.SmtpMail.Smtp.QuickSend("from@me.com", "to@you.com", "Subject", "Message Body");

VB.NET:
MailBee.SmtpMail.Smtp.QuickSend("from@me.com", "to@you.com", "Subject", "Message Body")

開(kāi)發(fā)人員還可以使用QuickSend方法發(fā)送帶有附件的電子郵件，如下所示：

C#:
MailBee.SmtpMail.Smtp.QuickSend("From Me <me@domain.com> (Company Info)",
"To you <you@company.com>",
"Subject", "Plain text body",
"<html>HTML-formatted body</html>",
  null, @"C:\My Documents\report.doc");

VB.NET:
MailBee.SmtpMail.Smtp.QuickSend("From Me <me@domain.com> (Company Info)", _
"To you <you@company.com>", _
"Subject", "Plain text body", _
"«html»HTML-formatted body«/html»", _
  Nothing, "C:\My Documents\report.doc")

開(kāi)發(fā)人員可以直接使用一個(gè)SMTP對(duì)象的實(shí)例，該實(shí)例提供了廣泛的方法和屬性來(lái)調(diào)整消息發(fā)送的過(guò)程。C＃應(yīng)用程序中的SMTP對(duì)象的新實(shí)例可以創(chuàng)建如下：

C#:
Smtp oMailer = new Smtp();

VB.NET:
Dim oMailer As New Smtp()

如果SMTP服務(wù)器不需要任何身份驗(yàn)證，那么指定的主機(jī)名或相同的IP地址就可以連接到此SMTP服務(wù)器，如下所示：

C#:
oMailer.SmtpServers.Add("smtp.domain.com"); ;

VB.NET:
oMailer.SmtpServers.Add("smtp.domain.com")

或者

C#:
oMailer.SmtpServers.Add("127.0.0.1");

VB.NET:
oMailer.SmtpServers.Add("127.0.0.1")

另一方面，如果SMTP服務(wù)器需要身份驗(yàn)證，開(kāi)發(fā)人員應(yīng)該確定該服務(wù)器上的帳戶(hù)名稱(chēng)和相應(yīng)的密碼：

C#:
oMailer.SmtpServers.Add("smtp.domain.com","login","password");

VB.NET:
oMailer.SmtpServers.Add("smtp.domain.com","login","password")

或者

C#:
oMailer.SmtpServers.Add("127.0.0.1","login","password");  

VB.NET:
oMailer.SmtpServers.Add("127.0.0.1","login","password")

然后，開(kāi)發(fā)人員應(yīng)確定郵件發(fā)件人的電子郵件地址，如下所示：

C#:
oMailer.From.AsString = "Dan Brown <dan@domain.com> (Company Info)";

VB.NET:
oMailer.From.AsString = "Dan Brown <dan@domain.com> (Company Info)"

或者

C#:
oMailer.From.AsString = "Dan Brown <dan@domain.com>";

VB.NET:
oMailer.From.AsString = "Dan Brown <dan@domain.com>"

或者

C#:
oMailer.From.AsString = "dan@domain.com";

VB.NET:
oMailer.From.AsString = "dan@domain.com"

添加To、Cc、Bcc或Reply-To，開(kāi)發(fā)人員應(yīng)使用SMTP對(duì)象的相應(yīng)屬性，如下所示：

C#:
oMailer.To.AsString = "Bill Smith <b.smith@domain.com> (Remarks), Kathy@mail.com ";
oMailer.Cc.AsString = "Joe Black <j.black@domain.com>, Joseph <joseph@domain.com>";
oMailer.Bcc.AsString = "t.jay@domain.com, s.connor@domain.com";
oMailer.ReplyTo.AsString = "john@domain.com, Barbara Jones <b.jones@mail.com>";

VB.NET:
oMailer.To.AsString = "Bill Smith <b.smith@domain.com> (Remarks), Kathy@mail.com "
oMailer.Cc.AsString = "Joe Black <j.black@domain.com>, Joseph <joseph@domain.com>"
oMailer.Bcc.AsString = "t.jay@domain.com, s.connor@domain.com"
oMailer.ReplyTo.AsString = "john@domain.com, Barbara Jones <b.jones@mail.com>"

要指定郵件主題，開(kāi)發(fā)人員應(yīng)使用SMTP對(duì)象的Subject屬性，如下所示：

C#:
oMailer.Subject = "Test message";  

VB.NET:
oMailer.Subject = "Test message"

此外，郵件可能沒(méi)有主題。
開(kāi)發(fā)人員還應(yīng)該確定信息的正文。如果是純文本，開(kāi)發(fā)人員應(yīng)該使用BodyPlainText屬性：

C#:
oMailer.BodyPlainText = "This is a test e-mail message.";

VB.NET:
oMailer.BodyPlainText = "This is a test e-mail message."

如果開(kāi)發(fā)人員要使用HTML格式的正文，那么應(yīng)該設(shè)置BodyHtmlText屬性：

C#:
oMailer.BodyHtmlText = @"<DIV>Test HTML message.</DIV> 
 
 
 This is a test HTML mes-sage.
 
 <hr size=1>
 <a href=""//www.afterlogic.com"">www.afterlogic.com</a>";?

VB.NET:

oMailer.BodyHtmlText = "<DIV>Test HTML message.</DIV> " & vbCrLf & _

"" & vbCrLf & _
 "" & vbCrLf & _
 "This is a test HTML mes-sage." & vbCrLf & _
 "" & vbCrLf & _
 "<hr size=1>" & vbCrLf & _
 "<a href=""//www.afterlogic.com"">www.afterlogic.com</a>"

開(kāi)發(fā)人員也可以將這兩種類(lèi)型同時(shí)使用。在這種情況下，郵件客戶(hù)端的設(shè)置會(huì)影響顯示哪個(gè)正文。
要將任何文件附加到電子郵件中，開(kāi)發(fā)人員應(yīng)使用AddAttachment方法，該方法只需要開(kāi)發(fā)人員指定此文件的完整路徑。要添加多個(gè)附件，開(kāi)發(fā)人員應(yīng)重復(fù)調(diào)用AddAttachment方法，如下所示：

C#:
oMailer.AddAttachment(@"C:\annual_reoprt.xls");
oMailer.AddAttachment(@"C:\deposits.doc");

VB.NET:
oMailer.AddAttachment("C:\annual_reoprt.xls")
oMailer.AddAttachment("C:\deposits.doc")

要發(fā)送信息，開(kāi)發(fā)人員應(yīng)調(diào)用SMTP對(duì)象的Send方法。由于此方法可能會(huì)引發(fā)異常，開(kāi)發(fā)人員可以按如下方式處理這些異常：

C#:
try
{
oMailer.Send();
Console.WriteLine("The message has been successfully sent.");
}
catch (MailBeeSmtpRefusedRecipientException e)
{
Console.WriteLine("The following recipient was refused by SMTP server: " + e.RefusedRecipientEmail);
}

VB.NET:
Try
oMailer.Send()
Console.WriteLine("The message has been successfully sent.")
Catch e As MailBeeSmtpRefusedRecipientException
Console.WriteLine("The following recipient was refused by SMTP server: " + e.RefusedRecipientEmail)
End Try

示例代碼：

摘要：以下示例創(chuàng)建一個(gè)包含純文本和HTML格式主體的郵件，并添加.xls文檔附加。然后將郵件發(fā)送給兩個(gè)指定的收件人。
在使用MailBee.NET Objects之前，請(qǐng)確保它已解鎖。

C#:

using System;
using MailBee;
using MailBee.SmtpMail;

namespace EmailApp
{
class Class1
{
[STAThread]
static void Main(string[] args)
{
Smtp oMailer = new Smtp();

oMailer.From.AsString = "John Doe <j.doe@domain.com> (Company Info)";

oMailer.To.AsString = "Bill Smith <b.smith@domain.com>, Kathy Ritchie <kr@compay.com> (Company Info)";

  oMailer.Subject = "Test e-mail";

oMailer.BodyPlainText = "This is a test e-mail message.";

oMailer.BodyHtmlText = @"<DIV>Test HTML message.</DIV> 


This is a test HTML mes-sage.

<hr size=1>
<a href=""//www.afterlogic.com"">www.afterlogic.com</a>";;

oMailer.AddAttachment(@"C:\annual_reoprt.xls");

oMailer.SmtpServers.Add("127.0.0.1", "login", "password");

oMailer.SmtpServers[0].AllowRefusedRecipients = false;

try
{
oMailer.Send();
Console.WriteLine("The message has been successfully sent.");
}
catch (MailBeeSmtpRefusedRecipientException e)
{
Console.WriteLine("The following recipient was refused by SMTP server: "+
e.RefusedRecipientEmail);
}
}
}
}

VB.NET:
Imports System
Imports MailBee
Imports MailBee.SmtpMail

Namespace EmailApp
Class Class1
_
Shared Sub Main(ByVal args() As String)
Dim oMailer As New Smtp()

oMailer.From.AsString = "John Doe <j.doe@domain.com> (Company Info)"

oMailer.To.AsString = "Bill Smith <b.smith@domain.com>, Kathy Ritchie <kr@compay.com> (Company Info)"

oMailer.Subject = "Test e-mail"

oMailer.BodyPlainText = "This is a test e-mail message."

oMailer.BodyHtmlText = "<DIV>Test HTML message.</DIV> " & vbCrLf & _
"" & vbCrLf & _
"" & vbCrLf & _
"This is a test HTML mes-sage." & vbCrLf & _
"" & vbCrLf & _
"<hr size=1>" & vbCrLf & _
"<a href=""//www.afterlogic.com"">www.afterlogic.com</a>"

oMailer.AddAttachment("C:\annual_reoprt.xls")

oMailer.SmtpServers.Add("127.0.0.1", "login", "password")

oMailer.SmtpServers(0).AllowRefusedRecipients = False

Try
oMailer.Send()
Console.WriteLine("The message has been successfully sent.")
Catch e As MailBeeSmtpRefusedRecipientException
Console.WriteLine("The following recipient was refused by SMTP server: "+
e.RefusedRecipientEmail)
End Try
End Sub
End Class
End Namespace

試用、下載、了解更多產(chǎn)品信息請(qǐng)點(diǎn)擊""