Solved

Exchange Web Services (EWS) VB.NET

Posted on 2014-11-05
2
520 Views
Last Modified: 2014-11-05
Morning,

I am creating a program that integrates with an Exchange Mailbox for Processing.

I wish to remove the part of the process that requires Outlook to be open a server and processing rules, so I have turned to using EWS.

The problem I have am having is return the 'FROM' field.

My code below I am able to connect to my Exchange Server and return the Category, To Field etc. perfectly fine, yet unable to return the From.

A lot of the documentation out there is written in C# of which i have NO experience.

Anyone pointing me in the right direction would be grand.

My Code:

        Dim exch As ExchangeService = New ExchangeService(ExchangeVersion.Exchange2007_SP1)
        Dim Uri As Uri

        Uri = New System.Uri("https://server/EWS/Exchange.asmx")
        exch.Url = Uri
        exch.UseDefaultCredentials = False
        exch.Credentials = New System.Net.NetworkCredential("ACCOUNT", "PASSWORD", "DOMAIN")

        exch.ImpersonatedUserId = New ImpersonatedUserId(ConnectingIdType.PrincipalName, "itprocessing@hq.freshinsurance.co.uk")

        ServicePointManager.ServerCertificateValidationCallback = AddressOf ValidateRemoteCertificate

        Dim iv As ItemView = New ItemView(10) ' return first 10 pages
        iv.Traversal = ItemTraversal.Shallow

        Dim InboxItems As FindItemsResults(Of Item) = Nothing

        InboxItems = exch.FindItems(WellKnownFolderName.Inbox, iv)

        For Each i As Item In InboxItems

            Console.WriteLine(i.Subject)
            Console.WriteLine(i.Categories)
            Console.WriteLine(i.DisplayTo)
            Console.WriteLine(i.HasAttachments)

            Dim strCat As String = i.Categories.ToString
        Next

Open in new window

0
Comment
Question by:Lynchie435
2 Comments
 
LVL 22

Accepted Solution

by:
Snarf0001 earned 500 total points
ID: 40423752
FindItems is a generic method that's used for various different actual objects, not just email.
When you're getting it from WellKnownFolderName.Inbox, it will actually return objects that are type "EmailMessage", which does have the From address, you just have to cast it first.

DirectCast(i, EmailMessage).From

Open in new window

0
 

Author Closing Comment

by:Lynchie435
ID: 40423828
Hi Snarf0001,

That doesn't appear to  the case as its Blank.

However you put me on the right track and it was

Console.WriteLine(DirectCast(i, EmailMessage).Sender.Name)

Open in new window


That i was looking for :)

Cheers,

James
0

Featured Post

Does Powershell have you tied up in knots?

Managing Active Directory does not always have to be complicated.  If you are spending more time trying instead of doing, then it's time to look at something else. For nearly 20 years, AD admins around the world have used one tool for day-to-day AD management: Hyena. Discover why

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Local Continuous Replication is a cost effective and quick way of backing up Exchange server data. The following article describes the steps required to configure Local Continuous Replication. Also, the article tells you how to restore from a backup…
This article explains in simple steps how to renew expiring Exchange Server Internal Transport Certificate.
In this video we show how to create a Resource Mailbox in Exchange 2013. We show this process by using the Exchange Admin Center. Log into Exchange Admin Center.: Navigate to the Recipients >> Resources tab.: "Recipients" is our default selection …
To show how to create a transport rule in Exchange 2013. We show this process by using the Exchange Admin Center. Log into Exchange Admin Center.: First we need to log into the Exchange Admin Center. Navigate to the Mail Flow >> Rules tab.:  To cr…

932 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

11 Experts available now in Live!

Get 1:1 Help Now