vb.net - VB 中的电子邮件函数

Question

我需要一个简单的电子邮件功能，它只发送一封电子邮件(我保证不会向任何人发送垃圾邮件!)。

有人吗？使用 VB 2008

Answer 1

使用 SmtpClient类来做到这一点。文档页面上有一个异步发送电子邮件的示例，但这是执行此操作的基本方法:

Dim client As New SmtpClient("mail.myisp.com")

Dim fromAddr As New MailAddress("jane@contoso.com")
Dim toAddr As New MailAddress("ben@contoso.com")
Dim message As New MailMessage(fromAddr, toAddr)
message.Body = "This is a test e-mail message sent by an application. "
message.Subject = "test message 1"

client.Send(message)