Spire.Email 教程2：如何在C＃，VB.NET 中发送批量电子邮件

╰半夏微凉° 2022-06-12 06:45 232阅读 0赞

**工具：**[Spire.Email for .NET][]

**代码演示：**

**Step 1:**创建MailMessage类的实例并指定发件人和收件人。

**Step 2:**设置消息的主题和正文。

message1.Subject = message2.Subject = message3.Subject = "Subject";
    message1.BodyText = message2.BodyText = message3.BodyText = "This is body text.";

**Step 3:**初始化MailMessageCollection类的对象，并将MailMessage类的实例添加到对象中。

List msgs = new List();
    msgs.Add(message1);
    msgs.Add(message2);
    msgs.Add(message3);

**Step 4:**使用主机，端口，用户名和密码创建SmtpClient实例，并使用SendSome方法发送批量的电子邮件。

SmtpClient client = new SmtpClient();
    client.Host = "smtp.outlook.com";
    client.Port = 587;
    client.Username = "sender@e-iceblue.com";
    client.Password = "password";
    client.ConnectionProtocols = ConnectionProtocols.Ssl;
    client.SendSome(msgs);
    Console.WriteLine("Message sent");

**完整代码：**

**\[C\#\]**

MailMessage message1 = new MailMessage("sender@e-iceblue.com", "recipient1@e-iceblue.com");
    MailMessage message2 = new MailMessage("sender@e-iceblue.com", " recipient2@e-iceblue.com");
    MailMessage message3 = new MailMessage("sender@e-iceblue.com", " recipient3@e-iceblue.com");
    message1.Subject = message2.Subject = message3.Subject = "subject";
    message1.BodyText = message2.BodyText = message3.BodyText = "This is body text.";
    List msgs = new List();
    msgs.Add(message1);
    msgs.Add(message2);
    msgs.Add(message3);
    SmtpClient client = new SmtpClient();
    client.Host = "smtp.outlook.com";
    client.Port = 587;
    client.Username = "sender@e-iceblue.com";
    client.Password = "password";
    client.ConnectionProtocols = ConnectionProtocols.Ssl;
    client.SendSome(msgs);
    Console.WriteLine("Message sent");

**\[VB.NET\]**

Dim message1 As New MailMessage("sender@e-iceblue.com", "recipient1@e-iceblue.com")
    Dim message2 As New MailMessage("sender@e-iceblue.com", " recipient2@e-iceblue.com")
    Dim message3 As New MailMessage("sender@e-iceblue.com", " recipient3@e-iceblue.com")
    message1.Subject = InlineAssignHelper(message2.Subject, InlineAssignHelper(message3.Subject, "subject"))
    message1.BodyText = InlineAssignHelper(message2.BodyText, InlineAssignHelper(message3.BodyText, "This is body text."))
    Dim msgs As New List(Of MailMessage)()
    msgs.Add(message1)
    msgs.Add(message2)
    msgs.Add(message3)
    Dim client As New SmtpClient()
    client.Host = "smtp.outlook.com"
    client.Port = 587
    client.Username = "sender@e-iceblue.com"
    client.Password = "password"
    client.ConnectionProtocols = ConnectionProtocols.Ssl
    client.SendSome(msgs)
    Console.WriteLine("Message sent")

[慧都控件网][Link 1]

--------------------

[Spire.Email for .NET]: https://www.evget.com/product/3977
[Link 1]: https://www.evget.com/article/2017/7/18/26591.html