VB.NETで添付ファイル付きメールを送信する方法

2年 ago
蓮, 翼
1 minute

VB.NETでは、電子メールを送信するためにSystem.Net.Mailの名前空間内のMailMessageクラスを使用できます。以下は、添付ファイルを付けて電子メールを送信する方法を示すサンプルコードです。

Imports System.Net
Imports System.Net.Mail
Public Class Form1
Private Sub btnSendEmail_Click(sender As Object, e As EventArgs) Handles btnSendEmail.Click
Try
Dim fromAddress As New MailAddress("your_email@example.com", "Your Name")
Dim toAddress As New MailAddress("recipient@example.com", "Recipient Name")
Dim subject As String = "Email with Attachment"
Dim body As String = "This email contains an attachment."
Dim smtpClient As New SmtpClient()
smtpClient.Host = "smtp.example.com"
smtpClient.Port = 587
smtpClient.EnableSsl = True
smtpClient.UseDefaultCredentials = False
smtpClient.Credentials = New NetworkCredential("your_email@example.com", "your_password")
Dim message As New MailMessage(fromAddress, toAddress)
message.Subject = subject
message.Body = body
' 添加附件
Dim attachment As New Attachment("C:\path\to\attachment.txt")
message.Attachments.Add(attachment)
smtpClient.Send(message)
MessageBox.Show("Email sent successfully.")
Catch ex As Exception
MessageBox.Show("An error occurred: " & ex.Message)
End Try
End Sub
End Class

上記コードの中で、以下の部分を変更してください。

  1. 「your_email@example.com」：メールを送信するメールアドレス
  2. 「君の名は」: 送信者の名前
  3. 「recipient@example.com」：メールを受信するメールアドレス
  4. 「宛先」：受け取り人の名前
  5. 「smtp.example.com」：SMTPサーバーのホスト名
  6. 587：SMTPサーバーのポート番号
  7. 「your_password」：メール送信の際のメールパスワード
  8. 「C:\パス\添付ファイル.txt」：添付ファイルのパス

これらのパラメータを変更することで、VB.NETで添付ファイルを格納したメールを送信できます。

bannerAds