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标题”

回答

相关问题