ইনকামিং মেইলগুলিতে উপস্থিত হলে আউটলুক স্বয়ংক্রিয়ভাবে বিদ্যমান বিভাগগুলি কীভাবে বরাদ্দ করবেন?

Question

আমি কয়েকটি মেইল ​​বিভাগ তৈরি করেছি যা কীওয়ার্ডগুলির অনুরূপ যা সম্পর্কিত ইমেলগুলিতে উপস্থিত রয়েছে এবং বিভাগগুলি তাদের কাছে স্বয়ংক্রিয়ভাবে প্রয়োগ করতে চান। অবশ্যই আমি নিজে নিজে প্রতিটি বিভাগের জন্য ফিল্টার তৈরি করতে পারি, কিন্তু এটি একটি বরং ক্লান্তিকর কাজ যা আমি একটি নতুন বিভাগ তৈরি করার সময় প্রতিবার পুনরাবৃত্তি মনে রাখতে চাই।

অতএব, আমি জানতে চাই যে Outlook কীভাবে সেট আপ করতে হবে (বর্তমানে 2007, যদিও 2010 এর একটি আপডেট শীঘ্রই ঘটতে অনুমিত হয়) যেমন

for each incoming mail:
    for each category:
        if the mail (header or body) contains the category:
            assign that category to the mail

Answer 1

নিম্নলিখিত ম্যাক্রোটি তৈরি করুন এবং যে সকল ইনকামিং মেইল ​​ফিল্টার হিসাবে ব্যবহার করুন:

Sub CategorizeByKeywords(Item As Outlook.MailItem)
    Dim objCats As Categories
    Dim objCat As Category

    Set objCats = Application.GetNamespace("MAPI").Categories

    If objCats.Count > 0 Then
        For Each objCat In objCats
            If (InStr(Item.Subject, objCat.Name) > 0) Or _
              (InStr(Item.Body, objCat.Name) > 0) Then
                If Item.Categories = Null Then
                    Item.Categories = objCat.Name
                Else
                    Item.Categories = objCat.Name & "," & Item.Categories
                End If
            End If
        Next
    End If

    Item.Save
End Sub

Sub CategorizeSelectedMessages()
    Dim objItem As Outlook.MailItem
    For Each objItem In Application.ActiveExplorer.Selection
        Call CategorizeByKeywords(objItem)
    Next
End Sub