老师好： 我想使用代码操作.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文件？
感谢老师！
加好友 
发短信
Post By：2017/12/11 10:20:00 [只看该作者]
