Outlook VBA教程:SearchSubFolders属性

返回 Boolean 类型值,指出指定搜索的搜索范围是否包括所有文件夹的子文件夹。该属性由AdvancedSearch方法的 SearchSubfolders参数决定,在初始化搜索时指定。只读。

expression.SearchSubFolders

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

说明

如果值为 True,则 Search对象搜索指定筛选路径的所有子文件夹。

VBA示例

以下示例所创建的 Search对象包含用户“收件箱”中所有主题为“Office Christmas Party”的项目。参数 SearchSubFolders 指定为 True。


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, SearchSubFolders:=True, Tag:=strTag)
End Sub

使用AdvancedSearchComplete事件过程显示搜索的结果。


Private Sub Application_AdvancedSearchComplete(ByVal SearchObject As Search)
    Dim objRsts As Results
    MsgBox "The search " & SearchObject.Tag & "has completed. The SearchSubFolders property " & _
        "was set to " & SearchObject.SearchSubFolders & "."
    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教程:ScriptText属性 下页:Outlook VBA教程:SelectedMailingAddress属性

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

Outlook VBA教程:SelectedMailingAddress属性 Outlook VBA教程:Selection属性
Outlook VBA教程:SenderName属性 Outlook VBA教程:Sensitivity属性
Outlook VBA教程:Sent属性 Outlook VBA教程:SentOn属性
Outlook VBA教程:SentOnBehalfOfName属性 Outlook VBA教程:Session属性
Outlook VBA教程:Shortcuts属性 Outlook VBA教程:ShowAsOutlookAB属性
Outlook VBA教程:ShowOn属性 Outlook VBA教程:Size属性
Outlook VBA教程:Spouse属性 Outlook VBA教程:Standard属性
Outlook VBA教程:Start属性 Outlook VBA教程:StartDate属性
Outlook VBA教程:StartTime属性 Outlook VBA教程:Status属性
Outlook VBA教程:StatusOnCompletionRecipients属性 Outlook VBA教程:StatusUpdateRecipients属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号