¿Cómo cambio la carpeta predeterminada de correo basura en Outlook?

9

Estoy usando un servicio de correo IMAP (fastmail.fm) que mueve los mensajes de correo basura a una carpeta IMAP llamada "Correo basura". Outlook archiva basura en "Correo no deseado".
¿Cómo cambio Outlook para que use la carpeta "Correo basura" para correo basura en lugar del predeterminado?

microsoft-outlook spam-prevention

— seanyboy
fuente

2

Es mucho más fácil configurar fastmail.fm para guardar spam probable en la Junk E-Mailcarpeta que Outlook crea que crear una configuración personalizada de Outlook.

Inicie sesión en fastmail
Ir Options > Spam/Virus Protection
Haga clic en Customal ladoSpam Protection
Cambiar la carpeta de destino para probablemente indeseados de Junk Maila Junk E-Maily salvamento.

— Jeremy W
fuente

1

Primero, elimine la carpeta "Correo no deseado" de fastmail si existe actualmente. Luego use las instrucciones a continuación:

Instalar objetos de datos de colaboración . (Tenga en cuenta que no se instalará directamente; el archivo que descargó simplemente desempaqueta el instalador real. Molesto).

En Outlook, abra el editor de Visual Basic: Alt+ F11o Herramientas - Macro - Editor de Visual Basic

En la ventana de VB, vaya a Herramientas - Referencias , y habilite CDO 1.2.1en la lista.

En el árbol en el lado izquierdo, abra Project1 - Microsoft Office Outlook - ThisOutlookSession , y pegue este script ( fuente original ) en la ventana que se abre:

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

Presione F5(o Ejecutar - Ejecutar Sub ) y ejecute la ThisOutlookSession.CDORenameFoldermacro. Debería aparecer una ventana de selección de carpeta. Debajo de su cuenta IMAP, elija la carpeta "Correo electrónico no deseado" (la creada por Outlook) y haga clic en Aceptar.

(Si obtiene "Tipo definido por el usuario no definido", entonces olvidó instalar y / o activar CDO).

Sí, eso es exactamente por qué odio Outlook ahora.

— usuario1686
fuente

Si estoy leyendo esto correctamente, ¿está codificando el nombre de la carpeta de destino en el script y luego ejecuta el script para elegir la fuente ?

— Afrazier

@afrazier: Mis habilidades de VBScript son ... pobres. En el momento de la publicación, esto es lo que tenía: copypasta de Microsoft KB. (Parece que reescribí el script más tarde; actualicé la publicación)

— User1686

Ahh, eso tiene mas sentido. Para ser justos con usted, si eso es lo que estaba en el MS KB, eso también es bastante triste.

— Afrazier

@afrazier: No, no lo era, el KB tiene una secuencia de comandos sensata con todo codificado, para cambiar rápidamente el nombre de todas las carpetas especiales a sus nombres originales. (Consulte el enlace "fuente original")

— User1686

0

No hay forma de que pueda hacerlo, pero podría crear una regla para mover el correo basura de la carpeta donde están ubicadas a la carpeta predeterminada de correo basura.

— alex
fuente