C# と VB.NET の質問掲示板

わんくま同盟

ASP.NET、C++/CLI、Java 何でもどうぞ

C# と VB.NET の入門サイト

■90464 / 親階層)  メールの下書き保存について
□投稿者/ きょん (1回)-(2019/03/12(Tue) 20:14:14)

分類:[VB.NET/VB2005 以降] 

開発環境:visual studio2015、.NETFramework,Version=v4.5.2
使用言語:VB

お世話になります。きょんと申します。

現在visual studio2015で、メール送信をしないで、「下書き」フォルダに保存するプログラムを作成しています。
下記プログラムを実行すると、メールが送信され、下書きに保存されません。

下記ソースをどのように修正すれば、下書きに保存されるようになるでしょうか。

※下書きフォルダは、メールソフト(outlook)内で確認できるフォルダのことです。




Private Sub MailTest()

Dim oMail As New SmtpMail("TryIt")
Dim oSmtp As New SmtpClient()
Dim oServer As New SmtpServer("test.com")

oMail.From = "test@test.co.jp"
oMail.To = "test@test.co.jp"
oMail.Subject = "メール送信テスト"
oMail.TextBody = "メール送信テストです"
oMail.AddAttachment("C:\Temp\メールテスト.txt")

oServer.Protocol = ServerProtocol.ExchangeEWS
oServer.User = "test"
oServer.Password = "test_password"
oServer.ConnectType = SmtpConnectType.ConnectSSLAuto
oServer.Alias = "test"
oServer.Drafts = "下書き"

Try
oSmtp.SendMail(oServer, oMail)

Catch ex As Exception
Throw New Exception(ex.Message)
End Try
編集キー/

前の記事(元になった記事) 次の記事(この記事の返信)
親記事 →Re[1]: メールの下書き保存について /魔界の仮面弁士
 
上記関連ツリー

メールの下書き保存について / きょん (19/03/12(Tue) 20:14) #90464 ←Now
Re[1]: メールの下書き保存について / 魔界の仮面弁士 (19/03/13(Wed) 09:15) #90467
  └ Re[2]: メールの下書き保存について / きょん (19/03/13(Wed) 10:17) #90470
    └ Re[3]: メールの下書き保存について / きょん (19/03/14(Thu) 09:30) #90482

上記ツリーを一括表示 / 上記ツリーをトピック表示
 
上記の記事へ返信