ネット関連：メール送信エラー

VB2008でSendを使いメール送信した場合のエラー処理の使用例サンプルです。

メールをSmtpClientクラスのSendメソッドを使用し、送信した場合のエラーを調べてみます。

エラーを調べるには、Try ～ Catch ～ End Try　を使用します。
又、Sendメソッドによるメール送信のエラー内容を調べる為、ソースの先頭に、Imports System.Net.Mail 文を入力します。

■実行画面
送信者メールアドレス、受信者メールアドレス、SMTPサーバー、件名、本文を入力し、「送信」ボタンをクリックします。
メール送信ソフト

■送信者メールアドレスが間違った場合のエラーメッセージ
メールアドレスエラー

■SMTPサーバーが間違った場合のエラーメッセージ
エラーメールメッセージ

■実行コード

Imports System.Net.Mail

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim sc As New System.Net.Mail.SmtpClient()
Dim fromMail As String
Dim toMail As String
Dim subject As String
Dim body As String

'送信者
fromMail = TextBox1.Text
'宛先
toMail = TextBox2.Text
'SMTPサーバー()
sc.Host = TextBox3.Text
'件名()
subject = TextBox4.Text
'本文()
body = TextBox5.Text

Try
'メール送信()
sc.Send(fromMail, toMail, subject, body)
Catch ex As smtpexception
'エラーメッセージを表示
MsgBox(ex.Message)
End Try
End Sub

End Class

Visual Basic 2008 Express Edition実践入門