共用方式為


Outlook) (Search.SearchSubFolders 屬性

會傳回 Boolean,指出所指定搜尋的範圍是否包含所搜尋之任何資料夾的子資料夾。 唯讀。

語法

expressionSearchSubFolders

表達 代表 Search 物件的變數。

註解

這個屬性是由AdvancedSearch方法的SearchSubfolders引數決定,並在起始搜尋時指定。 如果本屬性值為 True,則 Search 物件會搜尋所指定篩選路徑中的任何子資料夾。

範例

下列 Microsoft Visual Basic for Applications (VBA) 範例會建立 Search 物件。 使用者的 [收件匣 ] 會指定為搜尋範圍,並將 SearchSubFolders 屬性設定為 True。 當搜尋完成時,就會引發事件副程式,並顯示新物件的 TagScope 屬性,以及搜尋的結果。

Public blnSearchComp As Boolean 
 
 
 
Private Sub Application_AdvancedSearchComplete(ByVal SearchObject As Search) 
 
 MsgBox "The AdvancedSearchComplete Event fired for " & SearchObject.Tag & _ 
 
 " and the scope was " & SearchObject.Scope 
 
 blnSearchComp = True 
 
End Sub 
 
 
 
Sub TestAdvancedSearchComplete() 
 
 'List all items in the Inbox that do NOT have a flag: 
 
 Dim objSch As Outlook.Search 
 
 Const strF As String = "urn:schemas:httpmail:messageflag IS NULL" 
 
 Const strS As String = "Inbox" 
 
 Dim rsts As Outlook.Results 
 
 Dim i As Integer 
 
 blnSearchComp = False 
 
 Const strF1 As String = "urn:schemas:mailheader:subject = 'Test'" 
 
 Const strS1 As String = "Inbox" 
 
 Set objSch = _ 
 
 Application.AdvancedSearch(Scope:=strS1, Filter:=strF1, _ 
 
 SearchSubFolders:=True, Tag:="FlagSearch") 
 
 While blnSearchComp = False 
 
 DoEvents 
 
 Wend 
 
 Set rsts = objSch.Results 
 
 For i = 1 To rsts.Count 
 
 MsgBox rsts.Item(i).SenderName 
 
 Next 
 
End Sub

另請參閱

Search 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應