Harriet666 | OurJS

未发布 MailBee.NET Objects发送电子邮件（SMTP）教程四：发送包含文本和html的电子邮件

by Harriet666 keys 分享 1493805065916

在单行代码中快速发送电子邮件的最简单的方法是使用SMTP对象的QuickSend方法。在这种情况下，开发人员甚至不需要创建一个新的SMTP对象实例。只需要指定其基本属性（如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")

开发人员还可以使用QuickSend方法发送带有附件的电子邮件，如下所示：

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

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

开发人员可以直接使用一个SMTP对象的实例，该实例提供了广泛的方法和属性来调整消息发送的过程。C＃应用程序中的SMTP对象的新实例可以创建如下：

C#:
Smtp oMailer = new Smtp();

VB.NET:
Dim oMailer As New Smtp()

如果SMTP服务器不需要任何身份验证，那么指定的主机名或相同的IP地址就可以连接到此SMTP服务器，如下所示：

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服务器需要身份验证，开发人员应该确定该服务器上的帐户名称和相应的密码：

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")

然后，开发人员应确定邮件发件人的电子邮件地址，如下所示：

C#:
oMailer.From.AsString = "Dan Brown (Company Info)";

VB.NET:
oMailer.From.AsString = "Dan Brown (Company Info)"

或者

C#:
oMailer.From.AsString = "Dan Brown ";

VB.NET:
oMailer.From.AsString = "Dan Brown "

或者

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

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

添加To、Cc、Bcc或Reply-To，开发人员应使用SMTP对象的相应属性，如下所示：

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

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

要指定邮件主题，开发人员应使用SMTP对象的Subject属性，如下所示：

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

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

此外，邮件可能没有主题。
开发人员还应该确定信息的正文。如果是纯文本，开发人员应该使用BodyPlainText属性：

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

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

如果开发人员要使用HTML格式的正文，那么应该设置BodyHtmlText属性：

C#:
oMailer.BodyHtmlText = @"

Test HTML message.

This is a test HTML mes-sage.

www.afterlogic.com";

VB.NET:

oMailer.BodyHtmlText = "

Test HTML message.

" & vbCrLf & _

"" & vbCrLf & _
"

" & vbCrLf & _
"This is a test HTML mes-sage." & vbCrLf & _
"

" & vbCrLf & _
"

" & vbCrLf & _
"www.afterlogic.com"

开发人员也可以将这两种类型同时使用。在这种情况下，邮件客户端的设置会影响显示哪个正文。
要将任何文件附加到电子邮件中，开发人员应使用AddAttachment方法，该方法只需要开发人员指定此文件的完整路径。要添加多个附件，开发人员应重复调用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")

要发送信息，开发人员应调用SMTP对象的Send方法。由于此方法可能会引发异常，开发人员可以按如下方式处理这些异常：

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

示例代码：
摘要：以下示例创建一个包含纯文本和HTML格式主体的邮件，并添加.xls文档附加。然后将邮件发送给两个指定的收件人。
在使用MailBee.NET Objects之前，请确保它已解锁。

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 (Company Info)";

oMailer.To.AsString = "Bill Smith , Kathy Ritchie (Company Info)";

oMailer.Subject = "Test e-mail";

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

oMailer.BodyHtmlText = @"

Test HTML message.

This is a test HTML mes-sage.

www.afterlogic.com";

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 (Company Info)"

oMailer.To.AsString = "Bill Smith , Kathy Ritchie (Company Info)"

oMailer.Subject = "Test e-mail"

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

oMailer.BodyHtmlText = "

Test HTML message.

" & vbCrLf & _
"" & vbCrLf & _
"

" & vbCrLf & _
"This is a test HTML mes-sage." & vbCrLf & _
"

" & vbCrLf & _
"

" & vbCrLf & _
"www.afterlogic.com"

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

未发布图表编辑器TMS Diagram Studio更新至v4.14，支持RAD Studio 10.2 Tokyo

by Harriet666 keys 分享 1508403820628

TMS Diagram Studio是一款功能强大的图表控件，专为您的应用程序添加示意图和流程图表。

TMS Diagram Studio点击下载>>>

v4.14