როგორ სწრაფად შევქმნათ Outlook-ის წესი მრავალი ელ.ფოსტის გამგზავნის დასაბლოკად

გააზიარე ახლა:

თუ გსურთ შექმნათ წესი მრავალი შერჩეული ელ.ფოსტის გამგზავნის დაბლოკვის მიზნით, ჩვეულებრივ, ჯერ უნდა ჩაწეროთ გამომგზავნი და შემდეგ შექმნათ წესი ხელით. საკმაოდ პრობლემურია. ამრიგად, აქ ჩვენ გაგიზიარებთ ბევრად უფრო სწრაფ მეთოდს, რომ მიიღოთ იგი ერთი დაწკაპუნებით.

ზოგიერთი მომხმარებელი ფიქრობს, რომ Outlook-ში ჩაშენებული „ant-spam“ ფუნქცია არ არის ისეთი ეფექტური, როგორც მათ იმედი აქვთ. ამიტომ, ისინი მიჩვეულები არიან Outlook-ის წესების შექმნას გამგზავნის დასაბლოკად. ახლა, შემდეგში, ჩვენ შემოგთავაზებთ სწრაფ მეთოდს მრავალი ელ.ფოსტის გამგზავნის დაბლოკვის წესის შესაქმნელად.

სწრაფად შექმენით წესი მრავალი ელ.ფოსტის გამგზავნის დასაბლოკად

  1. როგორცtart, გაუშვით Outlook აპლიკაცია.
  2. შემდეგ, შედით VBA რედაქტორის ფანჯარაში მალსახმობის "Alt + F11" საშუალებით.
  3. შემდეგ, ახალ ფანჯარაში, ჩადეთ შემდეგი VBA კოდი გამოუყენებელ მოდულში.
Sub CreateRuleForBlockingMultipleSenders()
    Dim objRules As Outlook.Rules
    Dim objRule As Outlook.Rule
    Dim objMoveRuleAction As Outlook.MoveOrCopyRuleAction
    Dim objFromCondition As Outlook.ToOrFromRuleCondition
    Dim objSelection As Outlook.Selection
    Dim objMail As Outlook.MailItem
    Dim objJunkFolder As Outlook.Folder
 
    Set objRules = Application.Session.DefaultStore.GetRules()
    'Create a rule
    Set objRule = objRules.Create("Block Senders", olRuleReceive)
    Set objFromCondition = objRule.Conditions.From
 
    'Get the selected emails
    Set objSelection = Outlook.Application.ActiveExplorer.Selection
    'Get Junk Email folder
    Set objJunkFolder = Outlook.Application.Session.GetDefaultFolder(olFolderJunk)
 
    For i = objSelection.Count To 1 Step -1
        If objSelection.Item(i).Class = olMail Then
 
           Set objMail = objSelection.Item(i)
 
           'Add the email senders to rule condition
           With objFromCondition
                .Enabled = True
                .Recipients.Add objMail.SenderEmailAddress
                .Recipients.ResolveAll
           End With
 
           'Move the emails from blocked senders to Junk Email folder
           Set objMoveRuleAction = objRule.Actions.MoveToFolder
           With objMoveRuleAction
                .Enabled = True
                .Folder = objJunkFolder
           End With
         End If
    Next
 
    objRules.Save
End Sub

VBA კოდი - სწრაფად შექმენით წესი მრავალი ელ.ფოსტის გამგზავნის დასაბლოკად

  1. ამის შემდეგ, შესაბამისად "როგორ გაუშვათ VBA კოდი თქვენს Outlook-ში“, დაამატეთ ეს მაკრო სწრაფი წვდომის ხელსაწყოთა ზოლს ან ლენტს.
  2. შემდეგ, ჩვეულებრივად გამოდით VBA რედაქტორიდან.
  3. და ბოლოს, გადადგით შემდეგი ნაბიჯები, რომ სცადოთ.
  • უპირველეს ყოვლისა, აირჩიეთ წერილები, რომელთა გამომგზავნის დაბლოკვა გსურთ.
  • შემდეგ დააჭირეთ ახალ მაკრო ღილაკს.გაუშვით მაკრო შერჩეულ წერილებზე
  • მაკრო დასრულების შემდეგ, შეგიძლიათ გადახვიდეთ "ფაილი" მენიუში და დააწკაპუნოთ ღილაკზე "წესებისა და გაფრთხილებების მართვა" ახლად დამატებული წესის შესამოწმებლად, როგორც ეს ნაჩვენებია ქვემოთ მოცემულ სურათზე.ახალი წესი

შეინახეთ მავნე ელ.წერილები Bay-ში

არ აქვს მნიშვნელობა რომელ ელ.ფოსტის კლიენტს იყენებთ, ხშირად უნდა მიიღოთ წერილები უცნობი გამგზავნისგან. მost წერილებიდან შეიძლება იყოს სარეკლამო სპამი და შეიცავდეს მავნე მაკროებსაც კი. მათ შეუძლიათ დააზიანოს თქვენი Outlook ფაილი ცოტა ხანში. ამრიგად, Outlook-ში თქვენ უნდა მიიღოთ ეფექტური ზომები უცნობი ელფოსტის დაბლოკვის მიზნით. გარდა ამისა, თუ ამის საშუალება გაქვთ, მიზანშეწონილია მოამზადოთ ძლიერი PST აღდგენის ინსტრუმენტი, როგორიცაა DataNumen Outlook Repair. Მას შეუძლია Outlook-ის შეკეთება შეინახეთ ოფლის გაფუჭების გარეშე, რაც არ უნდა სერიოზულად იყოს დაზიანებული.

ავტორი შესავალი:

შირლი ჟანგი არის მონაცემთა აღდგენის ექსპერტი DataNumen, Inc., რომელიც მსოფლიო ლიდერია მონაცემთა აღდგენის ტექნოლოგიებში, მათ შორის sql აღდგენა და Outlook სარემონტო პროგრამული პროდუქტები. დამატებითი ინფორმაციისთვის ეწვიეთ www.datanumen. ერთად

გააზიარე ახლა:

კომენტარები დახურულია.