☰

Kann ich nicht-nationale TLDs in Outlook blockieren?

tag-icon • tag-icon microsoft-outlook-2016
Kann ich nicht-nationale TLDs in Outlook blockieren?

Ich bekomme ziemlich viel Spam aus französischen Quellen in mein Postfach. Den Absender unter Junk-Optionen zu blockieren, ist sinnlos, da er jedes Mal eine andere E-Mail-Adresse verwendet. Ich weiß, dass ich Top-Level-Domains (TLDs) blockieren kann, aber ein Großteil des Spams kommt von der ovhTLD (OVH ist ein französischer ISP) und Outlook scheint nur nationale TLDs zu kennen.

Gibt es eine Möglichkeit, nicht-nationale TLDs zu blockieren?

Antwort1

Ich denke, die beste Option ist die Verwendung von Regeln. Gehen Sie zum Regel-Assistenten (Regeln verwalten) und wählen Sie

  1. Neue Regel
  2. Beginnen Sie mit einer leeren Regel -> Wenden Sie die Regel auf die Nachricht an, die ich erhalte
  3. Weiter klicken
  4. Dann aktivieren with specific words in the sender's addressund klicken Sie auf den blauen Text (im Feld unter Schritt 2)
  5. Geben Sie den zu suchenden Text ein
  6. Weiter klicken
  7. Wählen Sie, was zu tun ist – Löschen, dauerhaft löschen oder verschieben (oder etwas anderes!)
  8. Nächste
  9. Weiter (es sei denn, Sie müssen eine Ausnahme hinzufügen
  10. Geben Sie ihm einen Namen und führen Sie es aus! Klicken Sie auf „Fertig stellen“

Ich denke, das oben genannte ist gefährlich, weil es blockieren würde[email geschützt]aber es könnte genügen!

Sie können versuchen, mit der rechten Maustaste auf eine beliebige E-Mail zu klicken und „Junk -> Junk-E-Mail-Optionen“ auszuwählen. Gehen Sie von hier aus zur Registerkarte „Blockierte Absender“ und fügen Sie .ovh hinzu. Dies hat dasselbe Problem wie die obige Regel.

Ich bin sicher, dass die oben genannte Regel funktionieren würde, aber falls nicht, müssten Sie ein VBa-Skript schreiben ... DAS WURDE NICHT GETESTET. Sichern Sie vorsichtshalber zuerst Ihre E-Mails!

Private Sub Application_NewMailEx _
                     (ByVal EntryIDCollection As String)
    Dim arr() As String
    Dim i As Integer
    Dim ns As Outlook.NameSpace
    Dim itm As MailItem
    Dim m As Outlook.MailItem
    On Error Resume Next
    Set ns = Application.Session
    arr = Split(EntryIDCollection, ",")
    For i = 0 To UBound(arr)
        Set itm = ns.GetItemFromID(arr(i))
        If itm.Class = olMail Then
             Set m = itm
             If InStr(0, m.SenderEmailAddress, ".ovh", 1) Then
                 m.Delete
             End If
        End If
    Next
    Set ns = Nothing
    Set itm = Nothing
    Set m = Nothing
End Sub

verwandte Informationen