Search mailboxes

The following example shows you how to search mailboxes for items that match a query string.

C# example

using System;
using System.Net;
using System.Collections.Generic;
using Independentsoft.Exchange;

namespace Sample
{
    class Program
    {
        static void Main(string[] args)
        {
            NetworkCredential credential = new NetworkCredential("username", "password");
            Service service = new Service("https://myserver/ews/Exchange.asmx", credential);

            service.RequestServerVersion = RequestServerVersion.Exchange2013;

            try
            {
                GetDiscoverySearchConfigurationResponse response = service.GetDiscoverySearchConfiguration("MyDiscoverySearchTest");

                IList<MailboxSearchScope> searchScope = new List<MailboxSearchScope>();

                foreach (DiscoverySearchConfiguration configuration in response.DiscoverySearchConfigurations)
                {
                    foreach (SearchableMailbox mailbox in configuration.SearchableMailboxes)
                    {
                        Console.WriteLine("DisplayName:" + mailbox.DisplayName);
                        Console.WriteLine("PrimarySmtpAddress:" + mailbox.PrimarySmtpAddress);
                        Console.WriteLine("ReferenceId:" + mailbox.ReferenceId);
                        Console.WriteLine("--------------------------------------------");

                        MailboxSearchScope scope = new MailboxSearchScope(mailbox.ReferenceId, MailboxSearchLocation.PrimaryOnly);
                        searchScope.Add(scope);
                    }
                }

                MailboxQuery query = new MailboxQuery("Test", searchScope);

                SearchMailboxesResponse searchResponse = service.SearchMailboxes(query);

                Console.WriteLine("ItemCount:" + searchResponse.ItemCount);

                //preview items
                foreach (PreviewItem item in searchResponse.Items)
                {
                    Console.WriteLine(item.Subject);
                    Console.WriteLine(item.Sender);
                    Console.WriteLine(item.SentTime);
                    Console.WriteLine(item.Preview);
                    Console.WriteLine("--------------------------------------------");
                }

                Console.Read();
            }
            catch (ServiceRequestException ex)
            {
                Console.WriteLine("Error: " + ex.Message);
                Console.WriteLine("Error: " + ex.XmlMessage);
                Console.Read();
            }
            catch (WebException ex)
            {
                Console.WriteLine("Error: " + ex.Message);
                Console.Read();
            }
        }
    }
}

VB example

Imports System
Imports System.Net
Imports System.Collections.Generic
Imports Independentsoft.Exchange

Namespace Sample
    Class Module1
        Shared Sub Main(ByVal args As String())

            Dim credential As New NetworkCredential("username", "password")
            Dim service As New Service("https://myserver/ews/Exchange.asmx", credential)

            service.RequestServerVersion = RequestServerVersion.Exchange2013

            Try

                Dim response As GetDiscoverySearchConfigurationResponse = service.GetDiscoverySearchConfiguration("MyDiscoverySearchTest")

                Dim searchScope As IList(Of MailboxSearchScope) = New List(Of MailboxSearchScope)()

                For Each configuration As DiscoverySearchConfiguration In response.DiscoverySearchConfigurations

                    For Each mailbox As SearchableMailbox In configuration.SearchableMailboxes

                        Console.WriteLine("DisplayName:" + mailbox.DisplayName)
                        Console.WriteLine("PrimarySmtpAddress:" + mailbox.PrimarySmtpAddress)
                        Console.WriteLine("ReferenceId:" + mailbox.ReferenceId)
                        Console.WriteLine("--------------------------------------------")

                        Dim scope As MailboxSearchScope = New MailboxSearchScope(mailbox.ReferenceId, MailboxSearchLocation.PrimaryOnly)
                        searchScope.Add(scope)
                    Next
                Next

                Dim query As MailboxQuery = New MailboxQuery("Test", searchScope)

                Dim searchResponse As SearchMailboxesResponse = service.SearchMailboxes(query)

                Console.WriteLine("ItemCount:" & searchResponse.ItemCount)

                ''preview items
                For Each Item As PreviewItem In searchResponse.Items

                    Console.WriteLine(Item.Subject)
                    Console.WriteLine(Item.Sender)
                    Console.WriteLine(Item.SentTime)
                    Console.WriteLine(Item.Preview)
                    Console.WriteLine("--------------------------------------------")
                Next

                Console.Read()

            Catch ex As ServiceRequestException
                Console.WriteLine("Error: " + ex.Message)
                Console.WriteLine("Error: " + ex.XmlMessage)
                Console.Read()
            Catch ex As WebException
                Console.WriteLine("Error: " + ex.Message)
                Console.Read()
            End Try

        End Sub
    End Class
End Namespace

Independentsoft - any library, any programming language

Exchange Web Services .NET > Tutorial > Search mailboxes

Need help? Ask our developers: