使用 AdvancedSearchMethod 通过 dav 查询查找附件

Question

我正在尝试使用高级搜索方法来过滤大量电子邮件。我正在考虑最终创建一个过滤器，例如：

filter = "(urn:schemas:mailheader:subject like '%project%' or " _ 
& "urn:schemas:httpmail:textdescription like '%project%') and " _
& "urn:schemas:mailheader:date > 'now - 1:00:00' and " _
& "urn:schemas:httpmail:hasattachment > 0 and " _
**& "urn:schemas:httpmail:attachmentfilename like '%tonnage%'"**

问题是附件文件名部分（粗体行）不起作用。我相信这是因为它正在寻找类似 olmailitem 的东西，而不是该对象的附件。无论如何，我需要一个简单的过滤器来查看附件的工作情况，然后我可以将其放大。这是我目前所拥有的：

scope = "'Fakeexample123@outlook.com'"
    
'this is a dumbed down version of my filter,
'but I want it to search for 3 instances of '%attachment%':
    'attachment
    'Attachment
    'ATTACHMENT
    'for any .xls, .xlsm, or .xlsx files
    
    'I was thinking something like:
    'filter = "ucase(urn:schemas:httpmail:attachmentfilename) like '%ATTACHMENT%xls%'"
    'but I don't believe that works... ideas?
    
    filter = "urn:schemas:httpmail:hasattachment > 0 and " _ 
'***************** This is the line that is giving me trouble *****************
    "urn:schemas:httpmail:attachmentfilename like '%attachment%xls%'"
'***************** End trouble *****************
    Set AdvancedSearch = myOlApp.AdvancedSearch(scope, filter, True, "test")

如果您有任何想法，请告诉我。

Answer 1

您需要先找到带附件的项目，例如您可以使用以下条件：

  "urn:schemas:httpmail:hasattachment" = 1

请注意，应使用 SQL 语法使其在 Outlook 中正常工作。

  filter = "@SQL=""urn:schemas:httpmail:hasattachment"" = 1"

使用 AdvancedSearchMethod 通过 dav 查询查找附件

Finding attachments with dav queries using AdvancedSearchMethod

vba

filter

outlook

webdav

advanced-search