如何更改 Outlook 中的默认垃圾邮件文件夹?

如何更改 Outlook 中的默认垃圾邮件文件夹?

我使用的是 IMAP 邮件服务 (fastmail.fm),该服务会将垃圾邮件移动到名为“垃圾邮件”的 IMAP 文件夹。Outlook 将垃圾邮件归档到“垃圾邮件”。
如何更改 Outlook,使其使用“垃圾邮件”文件夹来存放垃圾邮件,而不是默认文件夹?

答案1

更容易配置 fastmail.fm将可能的垃圾邮件保存在Junk E-MailOutlook 创建的文件夹中,然后建立自定义 Outlook 配置。

  • 登录 fastmail
  • Options > Spam/Virus Protection
  • 点击Custom旁边Spam Protection
  • 更改可能垃圾邮件的目标文件夹Junk MailJunk E-Mail并保存。 自定义垃圾邮件防护设置

答案2

第一的,删除如果 fastmail 的“垃圾邮件”文件夹目前存在,请将其删除。然后使用以下说明:


安装协作数据对象。(请注意,它不会直接安装 - 您下载的文件只是解压了真正的安装程序。很烦人。)

在 Outlook 中,打开 Visual Basic 编辑器:Alt+F11工具--Visual Basic 编辑器

在 VB 窗口中,转到工具-参考,然后CDO 1.2.1在列表中启用。

在左侧的树上,打开项目1-微软Office Outlook-此 Outlook 会话,并粘贴此脚本(原始来源)到打开的窗口:

Sub CDORenameFolder()
    Dim outlookApp As Outlook.Application
    Dim cdoSession As MAPI.Session
    Dim folder As Outlook.MAPIFolder
    Dim cdoFolder As MAPI.folder
    Dim newName As String

    Set outlookApp = New Outlook.Application
    Set cdoSession = New MAPI.Session
    cdoSession.Logon ShowDialog:=False, NewSession:=False

    Set folder = outlookApp.Session.PickFolder()
    Set cdoFolder = cdoSession.GetFolder(folder.EntryID, folder.StoreID)

    newName = InputBox("Rename '" + cdoFolder.Name + "' to:", "Rename folder", cdoFolder.Name)
    If newName <> "" Then
        cdoFolder.Name = newName
        cdoFolder.Update
    End If

    cdoSession.Logoff
    Set cdoSession = Nothing
    Set outlookApp = Nothing
End Sub

F5(或跑步-运行子程序),然后运行ThisOutlookSession.CDORenameFolder宏。将弹出一个文件夹选择窗口。在您的 IMAP 帐户下,选择“垃圾邮件”文件夹(由 Outlook 创建的文件夹),然后单击“确定”。

(如果您收到“用户定义类型未定义”,则您忘记安装和/或激活 CDO。)


是的,这正是我现在讨厌 Outlook 的原因。

答案3

你没有办法做到这一点,但你可以创建一个规则,将垃圾邮件从放置垃圾邮件的文件夹移至默认的垃圾邮件文件夹。

相关内容