Compartir a través de


Propiedad Search.SearchSubFolders (Outlook)

Devuelve un valor Boolean que indica si el ámbito de la búsqueda especificada incluye las subcarpetas de las carpetas examinadas. Solo lectura.

Sintaxis

expresión. SearchSubFolders

Expresión Variable que representa un objeto Search .

Comentarios

Esta propiedad viene determinada por el argumento SearchSubfolders del método AdvancedSearch y se especifica cuando se inicia la búsqueda. Si es True, la búsqueda de objetos búsquedas a través de todas las subcarpetas de la ruta de acceso del filtro especificado.

Ejemplo:

El siguiente ejemplo de Microsoft Visual Basic para aplicaciones (VBA) se crea un objeto Search. Bandeja de entrada del usuario se especifica como el ámbito de la búsqueda y la propiedad SearchSubFolders se establece en True. La subrutina del evento se desencadena cuando finaliza la búsqueda y muestra las propiedades Tag y Scope para el nuevo objeto, así como los resultados de la búsqueda.

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

Consulte también

Objeto de búsqueda

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.