保存前景。的MailItem。附件（doc文件）作为文本文件（sample.txt）

Question

我的问题是我有一个带有sample.doc文件作为附件的邮件。我可以使用以下语句将邮件保存为“abc.msg”文件，甚至可以保存为“abc.txt”格式。

Dim msg As MailItem

Dim res1

Dim res2

res1 =“C：\ temp \ abc.msg”

res1 =“C：\ temp \ abc.txt”

msg.SaveAs（res1，Microsoft.Office.Interop.Outlook.OlSaveAsType.olMSGUnicode）

msg.SaveAs（res2，Microsoft.Office.Interop.Outlook.OlSaveAsType.olTXT）

这里我的问题是我也希望对邮件附件做同样的事情。我希望将sample.doc文件保存为sample.txt文件格式而不是“.doc”。这意味着我想将文档保存为纯文本文件。

任何人都可以帮助我。

提前感谢你。 Haritha

Answer 1

doc进入richtextbox，然后将该框的内容保存为.txt，你将有一个.doc的txt文件

我会尽快为您发布一些代码，但现在正在工作。

Answer 2

将文件另存为RTF文件，然后使用Word对象模型加载文件并将其另存为txt文件。