用于下载嵌入在.msg文件中的xls文件的脚本

Question

我的驱动器上有1000个.MSG文件，每个文件都包含一个XLS文件，作为附件。

有没有办法使用ssis脚本或vb或vba从这些.msg文件下载这些xls文件？ 这样我就不必打开每个msg文件并下载xls文件

Answer 1

我还有另一个解决方案，然后将附件从Outlook中删除，并在邮件正文中输入一条注释，其中保存的是附件;如果您感兴趣，请告诉我。

但是对于你的需要，这里应该这样做：

http://www.brainre.org/outlook-vba-macro-to-save-all-attachments-of-marked-emails-including-progress-bar/

Answer 2

您可以使用Application.CreateItemFromTemplate Outlook对象模型功能，也可以使用Redemption及其RDOSession.GetMessageFromMsgFile（http://www.dimastr.com/redemption/rdosession.htm） - 然后您可以使用RDOMail.Attachments集合遍历所有附件并调用RDOAttachment.SaveAsFile