将消息保存到硬盘Outlook 2007

Question

我需要使用outlook 2007将消息保存到硬盘驱动器，我需要将最新消息发布到.msg格式的文件夹中，你可以帮帮我吗？

ty！

概率pd。用vba！ C：

Answer 1

Sub saveIt()
    Dim m As MailItem
    Set m = Application.ActiveExplorer.CurrentFolder.Items.GetLast
    m.SaveAs "c:\temp\" & m.Subject & ".msg", olMSG
End Sub