কিভাবে টেক্সট প্লেইন একটি নির্দিষ্ট যোগাযোগ থেকে ইমেইল প্রদর্শন করতে

আমি একটি নির্দিষ্ট পরিচিতি থেকে এইচটিএমএল ইমেল গ্রহণ করছি, কিন্তু আমি কেবল তার থেকে সহজ পাঠ্য মেইল পেতে চাই।

আমি টুল & gt; বাক্সে চেক করেছি বিশ্বস্ত কেন্দ্র & gt; ইমেল নিরাপত্তা & gt; [] প্লেইন টেক্সটে সকল মান মেইল পড়ুন, তবে আমি সকল মেইল থেকে বিন্যাসটি সরাতে চাই না।

আমি কিভাবে এই অর্জন করতে পারি?

আমি এক্সচেঞ্জ মেইল সার্ভারের সাথে মাইক্রোসফ্ট আউটলুক 2007 ব্যবহার করছি।
উইন্ডোজ এক্সপি পেশাদার (আমি এটা অপ্রচলিত জানি)

windows-xp microsoft-outlook-2007 email-client

— Francisco Tapia
সূত্র

কিছু ফোরাম এই ফোরামে এই থ্রেডে পাওয়া যাবে:
আসন্ন ইমেলকে প্লেইন-পাঠ্য রূপে রূপান্তরিত করার জন্য দৃশ্যমান নিয়ম ।

সমাধান 1: একটি নিয়ম মাধ্যমে প্লেইন টেক্সট বার্তা বিন্যাস পরিবর্তন

কল করার জন্য "একটি স্ক্রিপ্ট চালান" ব্যবহার করে একটি নিয়ম তৈরি করতে বিধি উইজার্ডটি ব্যবহার করুন এই ভিবিএ পদ্ধতি:

Sub ConvertToPlain(MyMail As MailItem)
Dim strID As String
Dim objMail As Outlook.MailItem

strID = MyMail.EntryID
Set objMail = Application.Session.GetItemFromID(strID)
objMail.BodyFormat = olFormatPlain
objMail.Save

Set objMail = Nothing
End Sub

ItemAdd এবং NewMailEx সমাধানগুলির জন্য আপনি প্রেরক নাম বা SenderEmailAddress এর জন্য পরীক্ষার মাধ্যমে রূপান্তর সীমাবদ্ধ করতে পারেন।

If objMail.SenderName = "Mailer, HTML" Then
    objMail.BodyFormat = olFormatPlain
    objMail.Save
End if

আপনি এই সঙ্গে প্রেরক নাম খুঁজে পেতে পারেন:

Sub Addresses_CurrentItem()

Dim olMail As Object

On Error Resume Next
Set olMail = ActiveInspector.currentItem

If olMail Is Nothing Then
' might be in the explorer window
    If (ActiveExplorer.selection.Count = 1) And _
     (ActiveExplorer.selection.Item(1).Class = olMail) Then
        Set olMail = ActiveExplorer.selection.Item(1)
    End If
End If
On Error GoTo 0

If olMail Is Nothing Then

MsgBox "Problem." & vbCr & vbCr & "Try again " & _
"under one of the following conditions:" & vbCr & _
    "-- You are viewing a single email message." & vbCr & _
    "-- You have only one message selected.", _
vbInformation
Exit Sub
End If

If TypeOf olMail Is MailItem Then

Debug.Print "  Sender    : " & olMail.SenderName   
Debug.Print "  SenderEmailAddress: " & olMail.SenderEmailAddress & vbCr

End If

End Sub

আরো তথ্য নিবন্ধ পাওয়া যাবে কিভাবে মাইক্রোসফট আউটলুক ইনকামিং বার্তা প্রক্রিয়া ।

সমাধান 2: মেইল সরানোর জন্য একটি নিয়ম ব্যবহার করুন "জাঙ্ক"

জাঙ্ক মধ্যে, সব ইমেল প্লেইন টেক্সট রূপান্তর করা হয়।

— harrymc
সূত্র

অসুস্থ পরীক্ষা এখন, যে বড় গবেষণা জন্য অসুস্থ আপত্ত্বেও।

— Francisco Tapia