Как изменить папку нежелательной почты по умолчанию в Outlook?

Я использую почтовый сервис IMAP (fastmail.fm), который перемещает сообщения нежелательной почты в папку IMAP под названием "нежелательная почта". Outlook архивирует старье "нежелательная почта".


Как изменить Outlook, чтобы он использовал папку" нежелательная почта " для нежелательной почты вместо папки по умолчанию?

5
задан kinokijuf
02.12.2022 19:03 Количество просмотров материала 3437
Распечатать страницу

3 ответа

это гораздо проще настроить fastmail.fm, чтобы сохранить вероятный спам в Junk E-Mail папка Outlook создает, чем построить пользовательскую конфигурацию Outlook.

  • войти в fastmail
  • на Options > Spam/Virus Protection
  • нажать на кнопку Custom возле Spam Protection
  • изменить папка назначения для вероятного спама С Junk Mail to Junk E-Mail и сохранить. Custom Spam Protection Settings
2
отвечен Jeremy W 2022-12-04 02:51

первый, удалить папка "нежелательная почта" fastmail, если она существует. Тогда воспользуйтесь инструкцией ниже:


установить Объекты Данных Совместной Работы. (Обратите внимание, что он не будет устанавливать напрямую - загруженный файл просто распаковывает реальный установщик. Раздражающий.)

в Outlook откройте редактор Visual Basic: либо Alt+F11 или Tools -макрос - Редактор Visual Basic

в окне VB перейдите к Tools -ссылки и включения CDO 1.2.1 в списке.

в дереве слева откройте Project1 -Microsoft Office Outlook -ThisOutlookSession и вставить этот скрипт (первоисточник) в открывшемся окне:

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 (или Run -Запустить Sub), и запустить ThisOutlookSession.CDORenameFolder макрос. Должно появиться окно выбора папки. Под учетной записью IMAP выберите папку" нежелательная почта " (созданную Outlook) и нажмите кнопку ОК.

(Если вы получаете "определяемый пользователем тип не определен", то вы забыли установить и/или активировать CDO.)


Да, именно поэтому я ненавижу теперь Outlook.

1
отвечен grawity 2022-12-04 05:08

вы не можете этого сделать, но вы можете создать правило для перемещения нежелательной почты из папки, в которую они помещены, в папку нежелательной почты по умолчанию.

0
отвечен alex 2022-12-04 07:25

Постоянная ссылка на данную страницу: [ Скопировать ссылку | Сгенерировать QR-код ]

Ваш ответ

Опубликуйте как Гость или авторизуйтесь

Имя
Вверх