Outlook VBA教程:Filter属性

DASL 语句用来将搜索限制到指定的数据子集。该属性由Application对象的AdvancedSearch方法设置。String 类型,只读。

expression.Filter

expression  必选。该表达式返回Search对象。

说明

当初次创建 Search对象时,Filter属性由 Filter参数设置。

VBA示例

以下示例新建 Search对象。搜索完成后触发事件子例程,显示 Search对象的Tag 和 Filter属性以及搜索结果。


Sub SearchInboxFolder()
'Searches the Inbox
    Dim objSch As Search
    Const strF As String = _
        "urn:schemas:mailheader:subject = 'Office Christmas Party'"
    Const strS As String = "Inbox"
    Const strTag As String = "SubjectSearch"
    Set objSch = _
        Application.AdvancedSearch(Scope:=strS, Filter:=strF, Tag:=strTag)
End Sub

使用 AdvancedSearchComplete事件子例程来确保存储在 Search对象中的数据的完整性。


Private Sub Application_AdvancedSearchComplete(ByVal SearchObject As Search)
    Dim objRsts As Results
    MsgBox "The search " & SearchObject.Tag & "has completed. The filter used was " & _
        SearchObject.Filter & "."
    Set objRsts = SearchObject.Results
    'Print out number in results collection
    Debug.Print objRsts.Count
    'Print out each member of results collection
    For Each Item In objRsts
        Debug.Print Item
    Next
End Sub

上页:Outlook VBA教程:FileName属性 下页:Outlook VBA教程:FirstName属性

Outlook VBA教程:Filter属性:相关链接

Outlook VBA教程:FirstName属性 Outlook VBA教程:FlagDueBy属性
Outlook VBA教程:FlagRequest属性 Outlook VBA教程:FlagStatus属性
Outlook VBA教程:FolderPath属性 Outlook VBA教程:Folders属性
Outlook VBA教程:FormDescription属性 Outlook VBA教程:Formula属性
Outlook VBA教程:FTPSite属性 Outlook VBA教程:FullName属性
Outlook VBA教程:FullNameAndCompany属性 Outlook VBA教程:Gender属性
Outlook VBA教程:GetInspector属性 Outlook VBA教程:GovernmentIDNumber属性
Outlook VBA教程:Groups属性 Outlook VBA教程:HasAttachment属性
Outlook VBA教程:Height属性 Outlook VBA教程:Hidden属性
Outlook VBA教程:Hobby属性 Outlook VBA教程:Home2TelephoneNumber属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号