MailMessageオブジェクトをディスクに保存するにはどうすればよいですか? MailMessageオブジェクトはSave()メソッドを公開しません。
* .emlまたは* .msgの形式で保存しても問題はありません。これを行う方法はありますか?
簡単にするために、 接続項目 からの説明を引用します。
実際には、ネットワークではなくファイルシステムに電子メールを送信するようにSmtpClientを構成できます。次のコードを使用して、プログラムでこれを行うことができます。
SmtpClient client = new SmtpClient("mysmtphost"); client.DeliveryMethod = SmtpDeliveryMethod.SpecifiedPickupDirectory; client.PickupDirectoryLocation = @"C:\somedirectory"; client.Send(message);
これは、次のようにアプリケーション構成ファイルで設定することもできます。
<configuration>
<system.net>
<mailSettings>
<smtp deliveryMethod="SpecifiedPickupDirectory">
<specifiedPickupDirectory pickupDirectoryLocation="C:\somedirectory" />
</smtp>
</mailSettings>
</system.net>
</configuration>
メールを送信すると、指定したディレクトリにメールファイルが追加されます。その後、別のプロセスでバッチモードで電子メールメッセージを送信できます。
とにかくそれを送信しないので、リストされているものの代わりに空のコンストラクタを使用できるはずです。
以下は、MailMessageをEMLデータを含むストリームに変換する拡張メソッドです。ファイルシステムを使用するため、明らかにハッキングのようなものですが、動作します。
public static void SaveMailMessage(this MailMessage msg, string filePath)
{
using (var fs = new FileStream(filePath, FileMode.Create))
{
msg.ToEMLStream(fs);
}
}
/// <summary>
/// Converts a MailMessage to an EML file stream.
/// </summary>
/// <param name="msg"></param>
/// <returns></returns>
public static void ToEMLStream(this MailMessage msg, Stream str)
{
using (var client = new SmtpClient())
{
var id = Guid.NewGuid();
var tempFolder = Path.Combine(Path.GetTempPath(), Assembly.GetExecutingAssembly().GetName().Name);
tempFolder = Path.Combine(tempFolder, "MailMessageToEMLTemp");
// create a temp folder to hold just this .eml file so that we can find it easily.
tempFolder = Path.Combine(tempFolder, id.ToString());
if (!Directory.Exists(tempFolder))
{
Directory.CreateDirectory(tempFolder);
}
client.UseDefaultCredentials = true;
client.DeliveryMethod = SmtpDeliveryMethod.SpecifiedPickupDirectory;
client.PickupDirectoryLocation = tempFolder;
client.Send(msg);
// tempFolder should contain 1 eml file
var filePath = Directory.GetFiles(tempFolder).Single();
// stream out the contents
using (var fs = new FileStream(filePath, FileMode.Open))
{
fs.CopyTo(str);
}
if (Directory.Exists(tempFolder))
{
Directory.Delete(tempFolder, true);
}
}
}
その後、返されたストリームを使用して、ディスク上の別の場所に保存したり、データベースフィールドに保存したり、添付ファイルとして電子メールで送信したりすることもできます。
Mailkitを使用している場合。以下のコードを書くだけです
string fileName = "your filename full path";
MimeKit.MimeMessage message = CreateMyMessage ();
message.WriteTo(fileName);
何らかの理由でclient.sendが失敗しました(そのメソッドを使用して実際に送信した直後)ので、適切な 'ole CDOおよびADODBストリームをプラグインしました。また、.Message値を設定する前に、CDO.messageにtemplate.emlをロードする必要がありました。しかし、それは機能します。
上記はCなので、ここはVB用です
MyMessage.From = New Net.Mail.MailAddress(mEmailAddress)
MyMessage.To.Add(mToAddress)
MyMessage.Subject = mSubject
MyMessage.Body = mBody
Smtp.Host = "------"
Smtp.Port = "2525"
Smtp.Credentials = New NetworkCredential(------)
Smtp.Send(MyMessage) ' Actual Send
Dim oldCDO As CDO.Message
oldCDO = MyLoadEmlFromFile("template.eml") ' just put from, to, subject blank. leave first line blank
oldCDO.To = mToAddress
oldCDO.From = mEmailAddress
oldCDO.Subject = mSubject
oldCDO.TextBody = mBody
oldCDO.HTMLBody = mBody
oldCDO.GetStream.Flush()
oldCDO.GetStream.SaveToFile(yourPath)