如何将Outlook中的电子邮件发送到特定文件夹

Question

有没有人知道如何使用VB.NET将电子邮件发送到Outlook中的自定义文件夹？我希望Outlook邮件自动放在文件夹上，而不是在成功发送后放在收件箱文件夹中。我在下面尝试了这段代码，但没有运气。

Dim moApp = CreateObject（“Outlook.Application”）

Dim emailDefaultFolder = moApp.GetNameSpace（“MAPI”）。GetDefaultFolder（6）'收件箱文件夹

Dim emailCustomFolder = emailDefaultFolder.Folders（“Submission”）'自定义文件夹

Dim emailNotif = moApp.CreateItem（0）

使用emailNotif

.To =“myemail.mail.net”

.Subject =“这只是一个测试。”

.ReadReceiptRequested = True

。发送（）

.Move（emailCustomFolder）

结束

我们非常感激。

谢谢！

Answer 1

调用Send后，您无法调用任何属性或方法（这是异步的）。如果要将已发送的邮件保存在默认的“已发送邮件”文件夹以外的文件夹中，请在调用“发送”之前设置MailItem.SaveSentMessageFolder属性。