メール送信

Last-modified: 2024-03-06 (水) 16:07:43

System.Net.Mail.SmtpClientクラスは廃止(.NET Framework 4.8は有効)

amazon.gif

VB2005でメール送信 IIS不要 版

  • サンプルプログラム
Imports System.Net.Mail
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
 Try
  Dim message As New System.Net.Mail.MailMessage([送信元メールアドレス], [宛先メールアドレス])
  ’ タイトル
  message.Subject = [メールタイトル]
  message.SubjectEncoding = Encoding.GetEncoding("Shift-JIS")
    ' エンコードをISO2022JP(携帯用)
    'message.SubjectEncoding = System.Text.Encoding.GetEncoding(50221)
  ’ 本文
  message.Body = [メール本文]
  message.BodyEncoding = Encoding.GetEncoding("Shift-JIS")
    ' エンコードをISO2022JP(携帯用)
  message.BodyEncoding = System.Text.Encoding.GetEncoding(50221)
  ' 添付ファイル
  message.Add(New Attachment(ファイル名))
  Dim client As New System.Net.Mail.SmtpClient("smtpサーバ", 587)
  ' 基本認証(必要な場合)
  client.Credentials = New System.Net.NetworkCredential("アカウント", "パスワード")
  client.Send(message)
  MessageBox.Show("メールを送信しました。", "送信終了")
 Catch ex As Exception
  MessageBox.Show("送信できませんでした。", "エラー")
  MessageBox.Show(ex.Message & vbCrLf & ex.StackTrace, "エラー")
 End Try
 End Sub
End Class

参考

http://msdn.microsoft.com/ja-jp/library/cc720828.aspx
http://cervi.jp/contents/2005/01/_c.html

サイト内リンク

開発系

OS系