[求助] 请老师指导下读取 outlook msg 文件的代码 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

老师好：

我想使用代码操作.msg文件，把它另存为doc，请老师帮忙改下代码，请原谅我VB知识不熟，代码如下：

Dim myolapp = CreateObject("outlook.application")

Dim olNS = myolapp.GetNamespace("MAPI")

OutLook.MailItem olMail = default(OutLook.MailItem) '这句有错误,该如何改?

olMail = olNS.OpenSharedItem(sourcePath)

bool cancelled = False

Dim sourcePath As String = "c:\xx.msg"

Dim targetPath As String = "c:\xx.doc" '另存为doc文件

olMail.SaveAs(targetPath, OutLook.OlSaveAsType.olDoc)'指定 save As 的类型

'以下4条语句用来释放文件,对吗?

olMail.Close(cancelled)

myolapp.Quit

olMail = Nothing

myolapp = Nothing

另我想请教下，怎么利用代码把EML文件转成msg文件？

感谢老师！

主题：[求助] 请老师指导下读取 outlook msg 文件的 代码