添付ファイルを付けたメールを作成する
C#.NET
VB.NET
VB.NETのコードはC#.NETを元に「C#.NET to VB.NET Translator」によって作成したものです
//送信メールの作成クラスを定義 TKMP.Writer.MailWriter writer = new TKMP.Writer.MailWriter(); //メールの実際の差出人 writer.FromAddress = "from@mail.example.jp"; //メールヘッダの差出人情報 writer.Headers.Add("From" , "from@mail.example.jp"); //メールの実際の宛先 writer.ToAddressList.Add("to@mail.example.jp"); //メールヘッダの宛先情報 writer.Headers.Add("To" , "to@mail.example.jp"); //件名 writer.Headers.Add("Subject" , "送信メールテスト"); //本文のパートを作成 TKMP.Writer.TextPart part1 = new TKMP.Writer.TextPart("メールの本文です。"); //添付ファイルのパートを作成 TKMP.Writer.FilePart part2 = new TKMP.Writer.FilePart("c:\\data.txt"); //本文と添付ファイルを持つ、マルチパートクラスを作成 TKMP.Writer.MultiPart mainpart = new TKMP.Writer.MultiPart(part1 , part2); //送信メール作成クラスに本文としてマルチパートを登録 writer.MainPart = mainpart;
'送信メールの作成クラスを定義 Dim writer As New TKMP.Writer.MailWriter 'メールの実際の差出人 writer.FromAddress = "from@mail.example.jp" 'メールヘッダの差出人情報 writer.Headers.Add("From", "from@mail.example.jp") 'メールの実際の宛先 writer.ToAddressList.Add("to@mail.example.jp") 'メールヘッダの宛先情報 writer.Headers.Add("To", "to@mail.example.jp") '件名 writer.Headers.Add("Subject", "送信メールテスト") '本文のパートを作成 Dim part1 As New TKMP.Writer.TextPart("メールの本文です。") '添付ファイルのパートを作成 Dim part2 As New TKMP.Writer.FilePart("c:\data.txt") '本文と添付ファイルを持つ、マルチパートクラスを作成 Dim mainpart As New TKMP.Writer.MultiPart(part1, part2) '送信メール作成クラスに本文としてマルチパートを登録 writer.MainPart = mainpart
TextPart、FilePart、MultiPartの各クラスは共通のTKMP.Writer.IPartインターフェイスで扱われるので、 各組み合わせにより柔軟にマルチパートのメールを作成することが可能です。 MultiPartクラス内にさらにMultiPartクラスを登録することも可能ですが、 実際にそれを受け取り先のメーラーが解析できるかを考慮する必要があります。
次のサンプルでは、本文にファイル「c:\data.txt」添付したメールクラスを作成しています。 メールの実際の送信はサンプルの「メールを送信する」を参考にしてください