Como altero a pasta Lixo Eletrônico padrão no Outlook?


9

Estou usando um serviço de correio IMAP (fastmail.fm) que move as mensagens de lixo eletrônico para uma pasta IMAP chamada "Lixo Eletrônico". O Outlook arquiva Lixo Eletrônico para "Lixo Eletrônico".
Como altero o Outlook para que ele use a pasta "Lixo Eletrônico" para Lixo Eletrônico em vez do padrão?

Respostas:


2

É muito mais fácil configurar o fastmail.fm para salvar spam provável na Junk E-Mailpasta criada pelo Outlook do que criar uma configuração personalizada do Outlook.

  • Entre no fastmail
  • Vamos para Options > Spam/Virus Protection
  • Clique ao CustomladoSpam Protection
  • Altere a pasta de destino para spam provável de Junk Mailpara Junk E-Maile salve. Configurações personalizadas de proteção contra spam

1

Primeiro, exclua a pasta "Lixo Eletrônico" do fastmail, se ela existir atualmente. Em seguida, use as instruções abaixo:


Instale objetos de dados de colaboração . (Observe que ele não será instalado diretamente - o arquivo que você baixou descompacta o instalador real. Irritante.)

No Outlook, abra o editor do Visual Basic: Alt+ F11ou Ferramentas - Macro - Editor do Visual Basic

Na janela VB, vá para Ferramentas - Referências e ative CDO 1.2.1na lista.

Na árvore do lado esquerdo, abra Projeto1 - Microsoft Office Outlook - ThisOutlookSession e cole este script ( fonte original ) na janela que é aberta:

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

Pressione F5(ou Executar - Executar sub ) e execute a ThisOutlookSession.CDORenameFoldermacro. Uma janela de seleção de pasta deve aparecer. Na sua conta IMAP, escolha a pasta "Lixo eletrônico" (a criada pelo Outlook) e clique em OK.

(Se você obtiver "Tipo definido pelo usuário não definido", esqueceu de instalar e / ou ativar o CDO.)


Sim, é exatamente por isso que eu odeio o Outlook agora.


Se estou lendo isso corretamente - você está codificando o nome da pasta de destino no script e executando o script para escolher a fonte ?
afrazier

@afrazier: Minhas habilidades em VBScript são ... fracas. No momento da postagem, era isso que eu tinha - copypasta do Microsoft KB. (Parece que reescrevi o script mais tarde; atualizei a postagem.) #
User1686

Ah, isso faz mais sentido. Para ser justo com você, se é isso que estava no MS KB, isso também é muito triste.
afrazier

@afrazier: Não, não era - o KB tem um script sensato com tudo codificado - para renomear rapidamente todas as pastas especiais para seus nomes originais. (Consulte o link "fonte original".)
user1686

0

Não há como fazê-lo, mas você pode criar uma regra para mover as mensagens indesejadas da pasta em que elas são colocadas na pasta padrão de Mensagens Indesejadas.

Ao utilizar nosso site, você reconhece que leu e compreendeu nossa Política de Cookies e nossa Política de Privacidade.
Licensed under cc by-sa 3.0 with attribution required.