Как сохранить почту в Отправленных элементах в MS Outlook, используя VB.Net

Question

Я настроил свою почтовую учетную запись в Microsoft Outlook, если я отправляю почту из outlook, она идёт отлично и копия сохраняется в отправленных элементах, но когда я пытаюсь отправить ее из моего приложения Windows vb.net, письма отправляются вхорошо, но копия письма не сохраняется в отправленных отправлениях, как я могу добиться этого заранее, спасибо

мой код выглядит следующим образом

 Dim mail As New MailMessage()
    mail.From = New MailAddress("mail1@test.in")
    mail.To.Add("mail2@test.in")
    mail.Subject = "test"
    mail.Body = "test"
    Dim smtp As New System.Net.Mail.SmtpClient("smtp.rediffmailpro.com", 25)
    smtp.EnableSsl = False
    smtp.Credentials = New System.Net.NetworkCredential("mail1@test.in", "xyz123")
    smtp.Send(mail)
    MsgBox("email sent")

Answer 1

Вы используете библиотеку System.Net.Mail , отдельную от Outlook. Outlook ничего не знает о почте до, во время или после ее отправки. Именно поэтому в папке «Отправленные» нет сообщений.

Если вы хотите, чтобы сообщение отображалось в Отправленные, вам нужно использовать Outlook саму библиотеку объектов для отправки почты. Код не так сильно отличается от того, что вы опубликовали. Это будет примерно так:

Dim o As New Outlook.Application
Dim item As Outlook.MailItem
item = o.CreateItem(Outlook.OlItemType.olMailItem)
item.Subject = "subject etc"
item.Body = "blah blah"
item.To = "test@test.com"

'to preview to user, for him to manually hit send
item.Display()

или

'to send
item.Send()

Вам, конечно, придется обращаться к библиотеке Outlook.

Также, в зависимости от вашей версии и конфигурации Outlook, он может выдавать различные предупреждения о том, что «стороннее приложение пытается отправить почту».