.NET中使用Exchange 2007 Webservice来读取邮件

很久没有更新过博客了，这几个月比较忙，人也比较懒散，今天已经是八月份，新的一个月希望要换一个状态。今天要写的文章是我四月份写的一个功能，一直拖到现在才发表。在企业内部我们一般都是使用微软的Exchange服务器来进行邮件的存储及发送，我们一般在客户端用outlook来收发邮件。工作中遇到了一个需求，需要写一个程序来抓取邮件服务器的邮件，并将抓取下来的邮件存储到数据库中。之前已经发表过一篇文章，是利用Jmail组件来抓取，可以抓取我们常用的一些邮箱的邮件，比如说163，gmail等，但是不能抓取exchange服务器中的邮件，所以需要重新写，最后决定使用Exchange 2007 中提供的webservice来抓取邮件。网络上这方面的资料很少，所以大部分的参考是来自MSDN：

http://msdn.microsoft.com/en-us/library/exchangewebservices(EXCHG.80).aspx

2007版的Exchange服务器提供了webservice，我们可以方便的在.NET程序中添加该引用，然后就可以方便的实现邮件的抓取，发送，删除等功能。我测试是在控制台程序中使用该webservice，步骤如下：

1 新建一个站点，然后添加exchange webservice 的引用，输入邮件服务器的OWA地址：http://yourmailserver/EWS/Services.wsdl,如果是在公司的内部域中，添加的过程中要求输入你的域帐号和密码。

 

 

 

2 添加成功以后再项目中导入该命名空间以其他必须的命名空间;

 

3 下面就是具体的代码，具体的请看注释：

发送邮件：

 

 1        public static void CreateEmail(string userName, string passWord, string domain, string url, string mailFrom, string mailTo)
 2        {
 3            // Create service binding.
 4            // 建立service绑定
 5            ExchangeServiceBinding esb = new ExchangeServiceBinding();
 6            esb.Credentials = new NetworkCredential(userName, passWord, domain);
 7            esb.Url = url;
 8
 9            // Create the CreateItem request.
            CreateItemType createItemRequest = new CreateItemType();

            // Specifiy how the created items are handled
            // 如何处理邮件
            createItemRequest.MessageDisposition = MessageDispositionType.SendAndSaveCopy;
            createItemRequest.MessageDispositionSpecified = true;

            // Specify the location of sent items. 
            createItemRequest.SavedItemFolderId = new TargetFolderIdType();
            DistinguishedFolderIdType sentitems = new DistinguishedFolderIdType();
            sentitems.Id = DistinguishedFolderIdNameType.sentitems;
            createItemRequest.SavedItemFolderId.Item = sentitems;

            // Create the array of items.
            createItemRequest.Items = new NonEmptyArrayOfAllItemsType();

            // Create a single e-mail message.
            // 新建一封邮件message对象
            MessageType message = new MessageType();
            message.Subject = "Tommy Test";
            message.Body = new BodyType();
            message.Body.BodyType1 = BodyTypeType.Text;
            message.Body.Value = "This is tommy's test use exchange webservice";
            message.ItemClass = "IPM.Note";
            message.Sender = new SingleRecipientType();
            message.Sender.Item = new EmailAddressType();
            message.Sender.Item.EmailAddress = mailFrom;
            message.ToRecipients = new EmailAddressType[1];
            message.ToRecipients[0] = new EmailAddressType();
            message.ToRecipients[0].EmailAddress = mailTo;
            message.Sensitivity = SensitivityChoicesType.Normal;

            // Add the message to the array of items to be created.
            createItemRequest.Items.Items = new ItemType[1];
            createItemRequest.Items.Items[0] = message;

            try
            {
                // Send the request to create and send the e-mail item, and get the response.
                CreateItemResponseType createItemResponse = esb.CreateItem(createItemRequest);

                // Determine whether the request was a success.
                if (createItemResponse.ResponseMessages.Items[0].ResponseClass == ResponseClassType.Error)
                {
                    throw new Exception(createItemResponse.ResponseMessages.Items[0].MessageText);
                }
                else
                {
                    Console.WriteLine("Item was created");
                    Console.ReadLine();
                }
            }
            catch (Exception e)
            {
                Console.WriteLine(e.Message);
                Console.ReadLine();
            }
        }

 

抓取以及删除邮件：

 

  1 public static void GetMailMessage(string userName, string passWord, string domain, string url)
  2        {
  3            // 绑定exchange服务器
  4            ExchangeServiceBinding exchangeServer = new ExchangeServiceBinding();
  5            ICredentials creds = new NetworkCredential(userName, passWord, domain);
  6
  7            // 建立信任连接
  8            exchangeServer.Credentials = creds;
  9            exchangeServer.Url = url;
 10
 11            // 定义邮件的收件箱
 12            DistinguishedFolderIdType[] folderIDArray = new DistinguishedFolderIdType[1];
 13            folderIDArray[0] = new DistinguishedFolderIdType();
 14            folderIDArray[0].Id = DistinguishedFolderIdNameType.inbox;
 15
 16            PathToUnindexedFieldType ptuftDisplayName = new PathToUnindexedFieldType();
 17            ptuftDisplayName.FieldURI = UnindexedFieldURIType.folderDisplayName;
 18
 19            PathToExtendedFieldType pteftComment = new PathToExtendedFieldType();
 20            pteftComment.PropertyTag = "0x3004"; // PR_COMMENT
 21            pteftComment.PropertyType = MapiPropertyTypeType.String;
 22
 23            // 定义GetFolderType对象，设置相应属性
 24            GetFolderType myfoldertype = new GetFolderType();
 25            myfoldertype.FolderIds = folderIDArray;
 26            myfoldertype.FolderShape = new FolderResponseShapeType();
 27            myfoldertype.FolderShape.BaseShape = DefaultShapeNamesType.IdOnly;
 28            myfoldertype.FolderShape.AdditionalProperties = new BasePathToElementType[2];
 29            myfoldertype.FolderShape.AdditionalProperties[0] = ptuftDisplayName;
 30            myfoldertype.FolderShape.AdditionalProperties[1] = pteftComment;
 31
 32            // 获取服务器中的文件夹的集合
 33            GetFolderResponseType myFolder = exchangeServer.GetFolder(myfoldertype);
 34
 35            // 获取收件箱
 36            FolderInfoResponseMessageType firmtInbox =
 37                (FolderInfoResponseMessageType)myFolder.ResponseMessages.Items[0];
 38
 39            // 显示收件箱
 40            Console.WriteLine(string.Format("got folder: {0}", firmtInbox.Folders[0].DisplayName));
 41
 42
 43            PathToUnindexedFieldType ptuftSubject = new PathToUnindexedFieldType();
 44            ptuftSubject.FieldURI = UnindexedFieldURIType.itemSubject;
 45
 46            PathToUnindexedFieldType ptuftBody = new PathToUnindexedFieldType();
 47            ptuftBody.FieldURI = UnindexedFieldURIType.itemAttachments;
 48
 49            PathToExtendedFieldType pteftFlagStatus = new PathToExtendedFieldType();
 50            pteftFlagStatus.PropertyTag = "0x1090"; // PR_FLAG_STATUS
 51            pteftFlagStatus.PropertyType = MapiPropertyTypeType.Integer;
 52
 53            // 定义FindItemType对象，准备获取收件箱中的集合
 54            FindItemType findItemRequest = new FindItemType();
 55            findItemRequest.Traversal = ItemQueryTraversalType.Shallow;
 56            findItemRequest.ItemShape = new ItemResponseShapeType();
 57            findItemRequest.ItemShape.BaseShape = DefaultShapeNamesType.AllProperties;
 58
 59
 60            findItemRequest.ParentFolderIds = new FolderIdType[1];
 61            findItemRequest.ParentFolderIds[0] = firmtInbox.Folders[0].FolderId;
 62
 63            // 获取邮件
 64            FindItemResponseType firt = exchangeServer.FindItem(findItemRequest);
 65
 66            // 循环迭代每一封邮件
 67            foreach (FindItemResponseMessageType firmtMessage in firt.ResponseMessages.Items)
 68            {
 69                // 如果包含邮件，显示出来
 70                if (firmtMessage.RootFolder.TotalItemsInView > 0)
 71                {
 72                    // 循环迭代每一封邮件详细信息
 73                    foreach (ItemType it in ((ArrayOfRealItemsType)firmtMessage.RootFolder.Item).Items)
 74                    {
 75                        Console.WriteLine(string.Format("邮件标题: {0} ", it.Subject));
 76                        Console.WriteLine(string.Format("发件人: {0} ",((MessageType)(it)).From.Item.Name));
 77                        Console.WriteLine(string.Format("收件人: {0} ", it.DisplayTo));
 78                        Console.WriteLine(string.Format("抄送: {0} ", it.DisplayCc));
 79                        Console.WriteLine(string.Format("大小: {0} ", it.Size.ToString()));
 80                        Console.WriteLine(string.Format("重要性: {0} ", it.Importance.ToString()));
 81                        Console.WriteLine(string.Format("是否已读: {0} ", ((MessageType)(it)).IsRead.ToString()));
 82                        Console.WriteLine(string.Format("是否有附件: {0} ", it.HasAttachments.ToString()));
 83                        //Console.WriteLine(string.Format("发送时间：{0}", it.DateTimeSent.ToString()));
 84                        Console.WriteLine(string.Format("接收时间: {0} ", it.DateTimeReceived.ToString()));
 85                        
 86                        
 87                        // 通过GetItemType对象来得到邮件的正文
 88                        GetItemType getItemRequest = new GetItemType();
 89                        // 设置必要的属性
 90                        getItemRequest.ItemIds = new BaseItemIdType[1];
 91                        getItemRequest.ItemIds[0] = (BaseItemIdType)it.ItemId;
 92                        getItemRequest.ItemShape = new ItemResponseShapeType();
 93                        getItemRequest.ItemShape.BaseShape = DefaultShapeNamesType.AllProperties;
 94                        getItemRequest.ItemShape.IncludeMimeContent = true;
 95
 96                        // 获得服务器的相应
 97                        GetItemResponseType getItemResponse = exchangeServer.GetItem(getItemRequest);
 98
 99                        // 得到邮件体
                        ItemInfoResponseMessageType getItemResponseMessage =
                                              getItemResponse.ResponseMessages.Items[0] as
                                              ItemInfoResponseMessageType;

                        // 显示邮件正文
                        Console.WriteLine("邮件格式：{0}", getItemResponseMessage.Items.Items[0].Body.BodyType1);
                        Console.WriteLine(string.Format("正文：{0}", getItemResponseMessage.Items.Items[0].Body.Value));

                        // 获取当前邮件的附件集合
                        if (getItemResponseMessage.Items.Items[0].HasAttachments)
                        {
                            AttachmentType[] attachments = getItemResponseMessage.Items.Items[0].Attachments;

                            // 循环获取当前邮件的每一个附件
                            for (int i = 0; i <= attachments.Length - 1;i++ )
                            {
                                // 定义GetAttachmentType，设置相应的属性，进行模式验证来获取附件
                                GetAttachmentType getAttachment = new GetAttachmentType();
                                RequestAttachmentIdType[] attachmentIDArry = new RequestAttachmentIdType[1];
                                attachmentIDArry[0] = new RequestAttachmentIdType();
                                attachmentIDArry[0].Id = attachments[i].AttachmentId.Id;
                                getAttachment.AttachmentIds = attachmentIDArry;
                                getAttachment.AttachmentShape = new AttachmentResponseShapeType();
                                
                                // 获取附件
                                GetAttachmentResponseType getAttachmentResponse = exchangeServer.GetAttachment(getAttachment);

                                // 返回服务器的响应对象
                                AttachmentInfoResponseMessageType responseMessage = getAttachmentResponse.ResponseMessages.Items[0] as AttachmentInfoResponseMessageType;
                                if (responseMessage != null)
                                {
                                    // 没有异常，显示附件信息
                                    if (responseMessage.ResponseClass == ResponseClassType.Success && responseMessage.Attachments != null
                                                           && responseMessage.Attachments.Length > 0)
                                    {
                                        AttachmentType attachment = responseMessage.Attachments[0];
                                        Console.WriteLine("附件名：{0}\n", attachment.Name);
                                        //Console.WriteLine("附件类型：{0}\n", attachment.ContentId);                                                    
                                    }
                                }
                            }
                        }

                        // 删除当前邮件
                        DeleteItemType deleteItem = new DeleteItemType();
                        deleteItem.ItemIds = new BaseItemIdType[1];

                        // 将要删除邮件的ID,changekey赋值给ItemIdType对象
                        ItemIdType itemIDType = new ItemIdType();
                        itemIDType.Id = it.ItemId.Id;
                        itemIDType.ChangeKey = it.ItemId.ChangeKey;

                        deleteItem.ItemIds[0] = itemIDType;

                        // 执行删除
                        DeleteItemResponseType deleteResponse = exchangeServer.DeleteItem(deleteItem);

                        // 删除成功
                        if (deleteResponse.ResponseMessages.Items.Length > 0 && deleteResponse.ResponseMessages.Items[0].ResponseClass == ResponseClassType.Success)
                        {
                            Console.WriteLine("删除成功");
                        }
                        
                    }
                }

            }
        }