Solved

Exchange Web Services (EWS) VB.NET

Posted on 2014-11-05
2
526 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

Is Your AD Toolbox Looking More Like a Toybox?

Managing Active Directory can get complicated.  Often, the native tools for managing AD are just not up to the task.  The largest Active Directory installations in the world have relied on one tool to manage their day-to-day administration tasks: Hyena. Start your trial today.

Question has a verified solution.

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

Suggested Solutions

Title # Comments Views Activity
Exchange 2003 to Office 365 8 54
Exchange 2010 SP1 to SP3 + RU16 8 40
cannot connect to sqlserver 8 25
outlook 6 35
We are happy to announce a brand new addition to our line of acclaimed email signature management products – CodeTwo Email Signatures for Office 365.
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 video discusses moving either the default database or any database to a new volume.
This video demonstrates how to sync Microsoft Exchange Public Folders with smartphones using CodeTwo Exchange Sync and Exchange ActiveSync. To learn more about CodeTwo Exchange Sync and download the free trial, go to: http://www.codetwo.com/excha…

813 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

14 Experts available now in Live!

Get 1:1 Help Now