【】Top

【】VB.NET
【】VB6.0

【】メールマガジンの購読
【】メールマガジンの解除






【】会社概要

【】お問い合わせ


姉妹サイト「バーチャルコネクション!」はこちらです。

姉妹サイト「七福神のメールでビンゴ!」はこちらです。

アイネットマコト

●24時間365日の安心をあなたにAT-LINK専用サーバ・サービスお勧めのサーバです。






メールを送信する

.NET では、もともとOSに組み込まれている
CDOSYS(Collaboration Data Objects for Windows 2000)
メッセージ コンポーネントを使用して
簡単にメール送信させることが可能です。


この機能を使えば、メールクライアントアプリケーションなども
作成することが可能です。
ここでは、簡単に、「送信者、送信先、件名、本文」を指定して
メール送信する場合での説明をしています。

フォームに次の様なコードを記述します


-----------VB.NETコーディングここから-------------------

1.メニューバーの中に、「プロジェクト」→「参照の追加」
 から、「.NET」タブが選択されていることを確認して、
   コンポーネント一覧の中から、
   System.Web.dllを1つ選んで「選択」を押し、
 「OK」を押します。

    ※この操作で、参照が追加されます。


2.フォームに、テキストボックスコントロールと
  ラベルコントロールを配置します。
    下記は、デフォルトのオブジェクトの名前と配置を示しています。

  ┏━━━━┓   ┏━━━━┓
  ┃Labale1 ┃   ┃TextBox1┃
  ┗━━━━┛   ┗━━━━┛
  ┏━━━━┓   ┏━━━━┓
  ┃Labale2 ┃   ┃TextBox2┃
  ┗━━━━┛   ┗━━━━┛
  ┏━━━━┓   ┏━━━━┓
  ┃Labale3 ┃   ┃TextBox3┃
  ┗━━━━┛   ┗━━━━┛
  ┏━━━━┓   ┏━━━━┓
  ┃Labale4 ┃   ┃TextBox4┃
  ┗━━━━┛   ┃※複数行┃
                 ┃        ┃
                 ┗━━━━┛


3.テキストボックスコントロール TextBox4は、
    複数行の入力とするため、
    Multiline プロパティを True にします。(複数行)
    ScrollBars プロパティを Vertical にします。(スクロールバー)


4.配置したコントロールの
    ラベルのテキストを入力項目にあわせて変更します。

  ┏━━━━┓   ┏━━━━┓
  ┃From    ┃   ┃TextBox1┃
  ┗━━━━┛   ┗━━━━┛
  ┏━━━━┓   ┏━━━━┓
  ┃To      ┃   ┃TextBox2┃
  ┗━━━━┛   ┗━━━━┛
  ┏━━━━┓   ┏━━━━┓
  ┃Subject ┃   ┃TextBox3┃
  ┗━━━━┛   ┗━━━━┛
  ┏━━━━┓   ┏━━━━┓
  ┃Body    ┃   ┃TextBox4┃
  ┗━━━━┛   ┃        ┃
                 ┃        ┃
                 ┗━━━━┛


5.フォームの一番下に、ボタンコントロールを配置します。
     (デフォルトのオブジェクトの名前 Button1)

  ┏━━━━┓   ┏━━━━┓
  ┃From    ┃   ┃TextBox1┃
  ┗━━━━┛   ┗━━━━┛
  ┏━━━━┓   ┏━━━━┓
  ┃To      ┃   ┃TextBox2┃
  ┗━━━━┛   ┗━━━━┛
  ┏━━━━┓   ┏━━━━┓
  ┃Subject ┃   ┃TextBox3┃
  ┗━━━━┛   ┗━━━━┛
  ┏━━━━┓   ┏━━━━┓
  ┃Body    ┃   ┃TextBox4┃
  ┗━━━━┛   ┃        ┃
                 ┃        ┃
                 ┗━━━━┛


           ┏━━━━┓
           ┃Button1 ┃
           ┗━━━━┛



6.ボタンコントロールの
    text プロパティに「送信」と記述します。
  ※説明用のためです。必須ではありません。


  ┏━━━━┓   ┏━━━━┓
  ┃From    ┃   ┃TextBox1┃
  ┗━━━━┛   ┗━━━━┛
  ┏━━━━┓   ┏━━━━┓
  ┃To      ┃   ┃TextBox2┃
  ┗━━━━┛   ┗━━━━┛
  ┏━━━━┓   ┏━━━━┓
  ┃Subject ┃   ┃TextBox3┃
  ┗━━━━┛   ┗━━━━┛
  ┏━━━━┓   ┏━━━━┓
  ┃Body    ┃   ┃TextBox4┃
  ┗━━━━┛   ┃        ┃
                 ┃        ┃
                 ┗━━━━┛


           ┏━━━━┓
           ┃送信    ┃
           ┗━━━━┛


7.ボタンコントロールをダブルクリックして、
    ボタンのクリックイベントの編集を開始して、
    フォームの宣言部に、次のコードを記述します。

    'プロジェクトで参照されていることを確認して、インポート
    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




8.ビルドして実行します。

9.フォームに表示された
    「From」欄に、送信者のメールアドレスを入力します。

10.フォームに表示された
    「To」欄に、送信先のメールアドレスを入力します。

11.フォームに表示された
    「Subject」欄に、メールの件名を入力します。

12.フォームに表示された
    「Body」欄に、メールの本文を入力します。


13.フォームに表示された「送信」を押すと、
    メールが送信されます。



-----------VB.NETコーディングここまで-------------------

MailMessage には、 BCC や CC 、添付ファイルや、エンコード
など、プロパティとメソッドが用意されています。

さらに、詳細な設定を行えます。






 

http://anetm.com/dev/d.cgi?SC=DTDTL&o=OOu

Copyright(c)2001-2004 Ai Net Makoto 記事・情報の無断転載を禁止します。

「これがほしかった!厳選サンプルツール集」の注意点
●当サイトはリンクフリーです。
2005/10/06(木)00:05 更新