在vb.net中发送之前，如何将我撰写的电子邮件内容保存为(.eml)

Question

我在发送电子邮件时使用下面的示例代码。在vb.net 中以电子邮件形式发送之前，我如何先将其保存为eml文件

Dim SmtpServer As New SmtpClient("smtp.exampledomain.com", 25) 
Dim mails As New MailMessage("[e-mail]", "someuser", "TEST EMAIL", "Sample Message")    
SmtpServer.Credentials = New Net.NetworkCredential([e-mail], "password")
SmtpServer.Send(mails)

任何建议都将不胜感激。非常感谢。

Answer 1

对于在这个线程上建议我使用这种方法的人，如果我没有完全理解，很抱歉。。感谢您的努力！

这段代码解决了我当前使用vb.net电子邮件的问题。

SmtpClient.Credential=新建Net.NetworkCredential（"login@sample"，"user@123"）SmtpClient.DeliveryMethod=SmtpDeliveryMethod.SpecifiedPickupDirectorySmtpClient.PickupDirectoryLocation=Environ$（"USERPROFILE"）&"\本地设置\临时\文件夹\"SmtpClient.Send（邮件）SmtpClient.DeliveryMethod=SmtpDeliveryMethod.NetworkSmtpClient.Send（邮件）SmtpClient.Dispose（）

Answer 2

"*.EML"是一种Microsoft邮件格式（Outlook、Outlook express），其他一些客户端可以打开/保存它。您必须手动将电子邮件转换为这种格式并将其存储在磁盘上。net不提供任何方法将MailMessage转换为这种文件。我认为这不是一项容易的任务。我认为你做错了什么。

或者，您可以通过MAPI访问outlook-Than MAPI MailItem支持保存方法将此邮件存储在磁盘上。

编辑：有人这样做了：看这里：stackoverflow 1264672