Outlook拖放：如何從郵件中獲取「Internet標題」

即使在任何良好的垃圾郵件/病毒過濾器之後，仍會收到經常不受歡迎的郵件。Outlook拖放：如何從郵件中獲取「Internet標題」

作爲輔助牆，我們建議我們的用戶檢查可疑的郵件屬性（'internet headers'）以驗證真實的來源。這項行動對於非技術人員來說並不容易。

我寫了一個簡單的應用程序將消息拖入它和分析頭定位IP地址及產地：很明顯，如果消息是從你的母親，你知道她是不是在中國...

如何我們可以從消息中獲得「互聯網標題」嗎？那裏有隱藏的財產嗎？

Private Sub MainForm_DragDrop(sender As Object, e As DragEventArgs) Handles Me.DragDrop 
    Dim myOlApp As New Outlook.Application 
    Dim myExp As Outlook.Explorer = myOlApp.ActiveExplorer 
    Dim myMailItem As Outlook.MailItem = DirectCast(myExp.Selection.Item(1), Outlook.MailItem) 
    Dim x = myMailItem.Body 
    myExp = Nothing 
    myMailItem = Nothing 
    myOlApp = Nothing 
End Sub

這工作正常，以獲得身體和其他數據，如To，從等，但沒有財產暴露'互聯網標題'。

來源

2016-04-25 fcm

這應有助於：http://stackoverflow.com/questions/36133383/how-to-add-custom-internet-headers-to-emails –

該鏈接用於**添加**新的MIME頭，不檢索現有的頭， –

你需要閱讀PR_TRANSPORT_MESSAGE_HEADERS MAPI屬性：

Dim headers As String = myMailItem.PropertyAccessor.GetProperty("http://schemas.microsoft.com/mapi/proptag/0x007D001F")

來源

2016-04-25 22:30:04

如果內部內部對內部永遠不會出去互聯網，則沒有互聯網頭。 – Sun

是的，但OP特別要求互聯網（MIME）標頭。 –

即使有互聯網標題，如果您訂閱Office 365託管交換，您實際上也無法追溯到任何有意義的IP，因爲它們都屬於Microsoft Azure內部。出於這個原因，我無法將實時黑名單提交給我們的工作電子郵件，例如垃圾郵件。答案是正確的，但在實踐中有許多情況下，它不可用/有用。 – Sun

Outlook拖放：如何從郵件中獲取「Internet標題」

回答

相關問題