Bagaimana cara mengubah folder Email Sampah default di Outlook?

9

Saya menggunakan layanan email IMAP (fastmail.fm) yang memindahkan pesan email sampah ke folder IMAP yang disebut "Junk Mail". Arsip Outlook Sampah ke "Sampah E-Mail".
Bagaimana cara mengubah Outlook sehingga menggunakan folder "Junk Mail" untuk Junk alih-alih default?

seanyboy
sumber

Jawaban:

2

Jauh lebih mudah untuk Mengkonfigurasi fastmail.fm untuk menyimpan kemungkinan spam di Junk E-Mailfolder yang dibuat Outlook daripada membangun konfigurasi Outlook khusus.

  • Masuk ke fastmail
  • Pergi ke Options > Spam/Virus Protection
  • Klik di CustomsebelahSpam Protection
  • Ubah folder tujuan untuk Kemungkinan Spam dari Junk Mailmenjadi Junk E-Maildan simpan. Pengaturan Perlindungan Spam Kustom
Jeremy W
sumber
1

Pertama, hapus folder fastmail "Junk Mail" jika saat ini ada. Kemudian gunakan instruksi di bawah ini:


Instal Objek Data Kolaborasi . (Perhatikan bahwa itu tidak akan menginstal secara langsung - file yang Anda unduh hanya membongkar installer yang sebenarnya. Mengganggu.)

Di Outlook, buka editor Visual Basic: Alt+ F11, atau Tools - Macro - Visual Basic Editor

Di jendela VB, pergi ke Alat - Referensi , dan aktifkan CDO 1.2.1dalam daftar.

Di pohon di sebelah kiri, buka Project1 - Microsoft Office Outlook - ThisOutlookSession , dan tempel skrip ini ( sumber asli ) ke jendela yang terbuka:

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

Tekan F5(atau Run - Jalankan Sub ), dan jalankan ThisOutlookSession.CDORenameFoldermakro. Jendela pemilihan folder akan muncul. Di bawah akun IMAP Anda, pilih folder "Junk E-mail" (yang dibuat oleh Outlook) dan klik OK.

(Jika Anda mendapatkan "Jenis yang ditentukan pengguna tidak didefinisikan", maka Anda lupa menginstal dan / atau mengaktifkan CDO.)


Ya, itulah mengapa saya membenci Outlook sekarang.

pengguna1686
sumber
Jika saya membaca ini dengan benar - Anda sulit mengkodekan nama folder tujuan ke dalam skrip, kemudian menjalankan skrip untuk memilih sumbernya ?
panas
@afrazier: Keterampilan VBScript saya ... buruk. Pada saat memposting, inilah yang saya miliki - copypasta dari Microsoft KB. (Sepertinya saya memang menulis ulang skrip nanti; Saya memperbarui posting.)
user1686
Ah, itu lebih masuk akal. Agar adil bagi Anda, jika itu yang ada di MS KB, itu juga cukup menyedihkan.
Afrazier
@afrazier: Tidak, bukan - KB memiliki skrip yang waras dengan semua yang di-kodekan - untuk mengganti nama semua folder khusus dengan cepat ke nama aslinya. (Lihat tautan "sumber asli".)
user1686
0

Tidak mungkin Anda bisa melakukannya, tetapi Anda bisa membuat aturan untuk memindahkan junk mail dari folder tempat mereka ditempatkan ke folder Junk Mail default.

alex
sumber