「メールを送信する」の編集履歴（バックアップ）一覧に戻る

メールを送信する - (2008/01/28 (月) 11:49:05) のソース

// 現在のページ名
*&this_page()　

**概要
SmtpClient クラスを使用して、メールを送信する。

参照：
-[[.NET Framework クラス ライブラリ SmtpClient クラス>>http://msdn2.microsoft.com/ja-jp/library/system.net.mail.smtpclient(VS.80).aspx]]
-[[SQLの窓 / イマドキの Multi Language / VB.NET よりメール送信>>http://winofsql.jp/VA003334/PROc080121161845.htm]]
-[[DOBON.NET / プログラミング道 / .NET Tips / インターネット / SmtpClientクラスを使ってメールを送信する>>http://dobon.net/vb/dotnet/internet/smtpclient.html]]

元ネタ：
-[[http://ufcpp.net/study/aspx/mailform.html>>http://ufcpp.net/study/aspx/mailform.html]]

**前提条件

-[[新しいwebサイトの作成]]

**手順
defalut.aspx.vbを以下のようにする。
メールサーバの設定等、適宜変更する。
#highlight(vb.net){
Imports System.Net
Imports System.Net.Mail

Partial Class _Default
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

       Dim Message As New MailMessage("from", "to", "subject", "body")
       Dim Client As New SmtpClient("server", "port")
       Client.Credentials = New NetworkCredential("user", "password")
       Client.EnableSsl = False  
       Client.Timeout = 100000 
       Client.Send(Message)

    End Sub
End Class
}

実行しても何も写らないので、動作確認はメールの受信にて行う。

&img(167.jpg)