メールを送信する .NET では、もともとOSに組み込まれているCDOSYS（Collaboration Data Objects for Windows 2000）メッセージ コンポーネントを使用して簡単にメール送信させることが可能です。この機能を使えば、メールクライアントアプリケーションなども作成することが可能です。ここでは、簡単に、「送信者、送信先、件名、本文」を指定してメール送信する場合での説明をしています。フォームに次の様なコードを記述します-----------VB.NETコーディングここから-------------------１．メニューバーの中に、「プロジェクト」→「参照の追加」 から、「.NET」タブが選択されていることを確認して、 コンポーネント一覧の中から、 System.Web.dllを１つ選んで「選択」を押し、 「ＯＫ」を押します。 ※この操作で、参照が追加されます。２．フォームに、テキストボックスコントロールと ラベルコントロールを配置します。 下記は、デフォルトのオブジェクトの名前と配置を示しています。 ┏━━━━┓ ┏━━━━┓ ┃Labale1 ┃ ┃TextBox1┃ ┗━━━━┛ ┗━━━━┛ ┏━━━━┓ ┏━━━━┓ ┃Labale2 ┃ ┃TextBox2┃ ┗━━━━┛ ┗━━━━┛ ┏━━━━┓ ┏━━━━┓ ┃Labale3 ┃ ┃TextBox3┃ ┗━━━━┛ ┗━━━━┛ ┏━━━━┓ ┏━━━━┓ ┃Labale4 ┃ ┃TextBox4┃ ┗━━━━┛ ┃※複数行┃ ┃ ┃ ┗━━━━┛３．テキストボックスコントロール TextBox4は、 複数行の入力とするため、 Multiline プロパティを True にします。（複数行） ScrollBars プロパティを Vertical にします。（スクロールバー）４．配置したコントロールの ラベルのテキストを入力項目にあわせて変更します。 ┏━━━━┓ ┏━━━━┓ ┃From ┃ ┃TextBox1┃ ┗━━━━┛ ┗━━━━┛ ┏━━━━┓ ┏━━━━┓ ┃To ┃ ┃TextBox2┃ ┗━━━━┛ ┗━━━━┛ ┏━━━━┓ ┏━━━━┓ ┃Subject ┃ ┃TextBox3┃ ┗━━━━┛ ┗━━━━┛ ┏━━━━┓ ┏━━━━┓ ┃Body ┃ ┃TextBox4┃ ┗━━━━┛ ┃ ┃ ┃ ┃ ┗━━━━┛５．フォームの一番下に、ボタンコントロールを配置します。 （デフォルトのオブジェクトの名前 Button1） ┏━━━━┓ ┏━━━━┓ ┃From ┃ ┃TextBox1┃ ┗━━━━┛ ┗━━━━┛ ┏━━━━┓ ┏━━━━┓ ┃To ┃ ┃TextBox2┃ ┗━━━━┛ ┗━━━━┛ ┏━━━━┓ ┏━━━━┓ ┃Subject ┃ ┃TextBox3┃ ┗━━━━┛ ┗━━━━┛ ┏━━━━┓ ┏━━━━┓ ┃Body ┃ ┃TextBox4┃ ┗━━━━┛ ┃ ┃ ┃ ┃ ┗━━━━┛ ┏━━━━┓ ┃Button1 ┃ ┗━━━━┛６．ボタンコントロールの text プロパティに「送信」と記述します。 ※説明用のためです。必須ではありません。 ┏━━━━┓ ┏━━━━┓ ┃From ┃ ┃TextBox1┃ ┗━━━━┛ ┗━━━━┛ ┏━━━━┓ ┏━━━━┓ ┃To ┃ ┃TextBox2┃ ┗━━━━┛ ┗━━━━┛ ┏━━━━┓ ┏━━━━┓ ┃Subject ┃ ┃TextBox3┃ ┗━━━━┛ ┗━━━━┛ ┏━━━━┓ ┏━━━━┓ ┃Body ┃ ┃TextBox4┃ ┗━━━━┛ ┃ ┃ ┃ ┃ ┗━━━━┛ ┏━━━━┓ ┃送信 ┃ ┗━━━━┛７．ボタンコントロールをダブルクリックして、 ボタンのクリックイベントの編集を開始して、 フォームの宣言部に、次のコードを記述します。 'プロジェクトで参照されていることを確認して、インポート Imports System.Web.Mail さらに、次のコードを記述します。 Private Sub Button1_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Button1.Click Dim MyMail As MailMessage = New MailMessage 'メール '送信者 MyMail.From = TextBox1.Text '送信先 MyMail.To = TextBox2.Text '件名 MyMail.Subject = TextBox3.Text '本文 MyMail.Body = TextBox4.Text 'メールを送信する System.Web.Mail.SmtpMail.Send(MyMail) End Sub８．ビルドして実行します。９．フォームに表示された 「From」欄に、送信者のメールアドレスを入力します。１０．フォームに表示された 「To」欄に、送信先のメールアドレスを入力します。１１．フォームに表示された 「Subject」欄に、メールの件名を入力します。１２．フォームに表示された 「Body」欄に、メールの本文を入力します。１３．フォームに表示された「送信」を押すと、 メールが送信されます。-----------VB.NETコーディングここまで-------------------MailMessage には、 BCC や CC 、添付ファイルや、エンコードなど、プロパティとメソッドが用意されています。さらに、詳細な設定を行えます。
Copyright(c)2001-2004 Ai Net Makoto 記事・情報の無断転載を禁止します。
