将特定传入消息保存到硬盘驱动器

Question

如何以编程方式将特定传入邮件保存到本地硬盘驱动器 要么 如何以编程方式将outlook文件夹保存到本地硬盘

或者为我工作

Answer 1

保存电子邮件的最简单方法是使用 Outlook规则+简单的vba脚本

实施例

Option Explicit
Public Sub Save_Example(Item As Outlook.MailItem)
    Dim Path As String
    Dim FileName As String

    Path = "C:\Temp\"

    If Item.Subject = "Hello" Then
        FileName = "Bla Bla" & ".msg"
        Item.SaveAs Path & FileName, olMsg
    End If

End Sub