Decode SenderEmailAddress

Add-in Express™ Support Service
That's what is more important than anything else

Decode SenderEmailAddress
Decode SenderEmailAddress 
kmsoft kmsoft




Posts: 170
 Joined: 2006-01-02
Hi,

I want to decode SenderEmailAddress like :
Fabien DURAND [/O=SERVEUR/OU=PREMIER GROUPE D'ADMINISTRATION/CN=RECIPIENTS/CN=F.DURAND]

Do you have and exemple with DELPHI code.

Thanks.
Posted 11 Sep, 2006 04:43:17 Top
Dmitry Kostochko


Add-in Express team


Posts: 2875
 Joined: 2004-04-05
Hi,

This can be done using Extended MAPI only. You need to get the PR_EMS_AB_PROXY_ADDRESSES property.

Posted 11 Sep, 2006 09:58:44 Top
kmsoft kmsoft




Posts: 170
 Joined: 2006-01-02
Hi,

I try this code for get SmtpSenderEmailAddress but my code
don't work.

Do you have and exemple in delphi for use PR_EMS_AB_PROXY_ADDRESSES.


procedure TAddInModule.GetSmtpSenderEmailAddress;
var
strEMailAddress : string;
objAddressEntry,objFields,objSession,objMailAddresses : Variant;
Const
PR_EMS_AB_PROXY_ADDRESSES = '&H39FE001E';
begin
objSession := OutlookApp.GetNamespace('MAPI');
objAddressEntry := objSession.CurrentUser;
objFields := objAddressEntry.Fields;
objMailAddresses := objFields.Item(PR_EMS_AB_PROXY_ADDRESSES);
strEMailAddress := objMailAddresses.value;
showmessage(strEMailAddress);
end;
Posted 18 Sep, 2006 09:23:13 Top
Dmitry Kostochko


Add-in Express team


Posts: 2875
 Joined: 2004-04-05
Hi, 

const
  PR_EMS_AB_PROXY_ADDRESSES: Cardinal = (PT_MV_TSTRING) or (Cardinal($800F) shl 16);


See the following link for more details:
http://support.microsoft.com/?kbid=196507

Please note that we provide consulting on such questions for Premium Support service subscribers only.

Posted 19 Sep, 2006 07:27:59 Top