VB.net 发送邮件 Email

最新推荐文章于 2025-05-30 16:50:43 发布

原创

最新推荐文章于 2025-05-30 16:50:43 发布 · 1.7w 阅读

3 ·

CC 4.0 BY-SA版权

文章标签：

#vb.net #email #exception #string #asp.net #报表

这篇博客介绍了如何在VB.NET中发送电子邮件，包括设置SMTP服务器、进行身份验证、添加附件以及处理异常。示例代码涵盖了不同方式的邮件发送，如通过163邮箱和自定义SMTP服务器。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

================================================================================

这个是在开发自动发报表程序中使用到的，下面的内容有几段，来自不同的地方，有网上的，也有日本人提供给我的样式（其实是敷衍）

================================================================================
首先添加引用

Imports System.Net.Mail

Dim client As New System.Net.Mail.SmtpClient()
client.Host = "smtp.163.com"
client.UseDefaultCredentials = False
client.Credentials = New System.Net.NetworkCredential("自已的163邮件地址", "密码")
client.DeliveryMethod = System.Net.Mail.SmtpDeliveryMethod.Network
Dim message As New System.Net.Mail.MailMessage("自已的163邮件地址", "收件人邮件地址")
message.Subject = "主题测试"
message.Body = "asp.net发送邮件"
message.BodyEncoding = System.Text.Encoding.UTF8
message.IsBodyHtml = True
'添加附件需将(附件先上传到服务器)
Dim data As New System.Net.Mail.Attachment("Upload/File1.rar", System.Net.Mime.MediaTypeNames.Application.Octet)
message.Attachments.Add(data)
Try
client.Send(