Condividi tramite


Results Property

Returns a **Results**collection that specifies the results of the search.

expression.Results

*expression   * Required. An expression that returns a **Search**object.

Example

The following Visual Basic for Applications (VBA) example searches the Inbox for items with a subject that equals "Test" and displays the names of the senders of the e-mail items returned by the search. The AdvanceSearchComplete event procedure sets the boolean blnSearchComp to True when the search is complete. This boolean variable is used by the TestAdvancedSearchComplete() procedure to determine when the search is complete. The sample code must be placed in a class module, such as ThisOutlookSession, and the TestAdvancedSearchComplete() procedure must be called before the event procedure can be called by Microsoft Outlook.

Public blnSearchComp As Boolean

Private Sub Application_AdvancedSearchComplete(ByVal SearchObject As Search)
    MsgBox "The AdvancedSearchComplete Event fired"
    blnSearchComp = True
End Sub

Sub TestAdvancedSearchComplete()
    Dim sch As Outlook.Search
    Dim rsts As Outlook.Results
    Dim i As Integer
    blnSearchComp = False
    Const strF As String = "urn:schemas:mailheader:subject = 'Test'"
    Const strS As String = "Inbox"   
    Set sch = Application.AdvancedSearch(strS, strF) 
    While blnSearchComp = False
        DoEvents
    Wend 
    Set rsts = sch.Results
    For i = 1 To rsts.Count
        MsgBox rsts.Item(i).SenderName
    Next
End Sub

Applies to | Search Object

See Also | AdvancedSearch Method | AdvancedSearchComplete Event | AdvancedSearchStopped Event | Search Object | SearchSubFolders Property