如何从outlook.addressentry获取发件人详细信息，从邮件项目获取详细信息

I have wrriten program which will take attcahments from the outlook 2010 folder and placed into the local mechine folder. i am able to read the folders
and caanot get full details from it like To,CC etc

dim Objmitem as outlook.mailitem
dim objfolder as outlook.folder
dim objAE as outlook.addressentry

Here i am getting folder details from other function 

objfolder = assign the folder details getting from the other function

Objmitem = objfolder.items.getfirst

objAE=Objmitem.sender

By performing this experssion most of the fileds are showing "Operation Aborted" error message 

using objAE i have to get the detail like SMTP,SenderMilAddress etc to go to next the  level the. 

i dont know what could be the exact reason.

Please help me if any of you faced the sameissue

我尝试过：



outlook.mailitem = outlook.folder.item.getfirst

outlook.addressentry = outlook.mailitem.sender

What I have tried:

outlook.mailitem=outlook.folder.item.getfirst
outlook.addressentry=outlook.mailitem.sender