Jak zmienić domyślny folder wiadomości-śmieci w Outlooku?

9

Korzystam z usługi pocztowej IMAP (fastmail.fm), która przenosi wiadomości-śmieci do folderu IMAP o nazwie „Wiadomości-śmieci”. Program Outlook archiwizuje wiadomości-śmieci w „Wiadomości-śmieci”.
Jak zmienić program Outlook, aby zamiast folderu domyślnego używał folderu „Wiadomości-śmieci”?

seanyboy
źródło

Odpowiedzi:

2

O wiele łatwiej jest skonfigurować fastmail.fm, aby zapisać prawdopodobny spam w Junk E-Mailfolderze utworzonym przez program Outlook, niż zbudować niestandardową konfigurację programu Outlook.

  • Zaloguj się do fastmaila
  • Iść do Options > Spam/Virus Protection
  • Kliknij CustomobokSpam Protection
  • Zmień folder docelowy dla prawdopodobnego spamu z Junk Mailna Junk E-Maili zapisz. Niestandardowe ustawienia ochrony przed spamem
Jeremy W.
źródło
1

Najpierw usuń folder „Junk Mail” fastmaila, jeśli istnieje. Następnie skorzystaj z poniższych instrukcji:


Zainstaluj obiekty danych współpracy . (Pamiętaj, że nie zostanie zainstalowany bezpośrednio - pobrany plik po prostu rozpakowuje prawdziwy instalator. Irytujące).

W programie Outlook otwórz edytor Visual Basic: albo Alt+ F11, albo Narzędzia - Makro - Visual Basic Editor

W oknie VB przejdź do Narzędzia - Referencje i włącz CDO 1.2.1na liście.

W drzewie po lewej stronie otwórz Project1 - Microsoft Office Outlook - ThisOutlookSession i wklej ten skrypt ( oryginalne źródło ) do okna, które zostanie otwarte:

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

Naciśnij F5(lub Uruchom - Uruchom Sub ) i uruchom ThisOutlookSession.CDORenameFoldermakro. Powinno pojawić się okno wyboru folderu. Na koncie IMAP wybierz folder „Wiadomości-śmieci” (utworzony przez program Outlook) i kliknij przycisk OK.

(Jeśli pojawi się komunikat „Nie zdefiniowano typu zdefiniowanego przez użytkownika”, oznacza to, że zapomniałeś zainstalować i / lub aktywować CDO.)


Tak, właśnie dlatego teraz nienawidzę programu Outlook.

użytkownik1686
źródło
Jeśli czytam to poprawnie - zapisujesz na stałe nazwę folderu docelowego w skrypcie, a następnie uruchamiasz skrypt, aby wybrać źródło ?
afrazier
@afrazier: Moje umiejętności posługiwania się VBScript są ... słabe. W momencie pisania tego właśnie miałem - copypasta z Microsoft KB. (Wygląda na to, że przepisałem skrypt później; zaktualizowałem post.)
user1686
Ach, to ma więcej sensu. Szczerze mówiąc, jeśli tak było w MS KB, to też jest dość smutne.
afrazier
@afrazier: Nie, nie było - KB ma rozsądny skrypt ze wszystkim na stałe - do szybkiej zmiany nazw wszystkich specjalnych folderów na ich oryginalne nazwy. (Patrz link „oryginalne źródło”.)
user1686,
0

Nie ma takiej możliwości, ale możesz utworzyć regułę, aby przenieść śmieciową wiadomość z folderu, w którym są one umieszczone do domyślnego folderu Wiadomości-śmieci.

alex
źródło