Kbase P10399: How to retrieve e-mail addresses from MAPI:SESSION OCX object
| Autor |
Progress Software Corporation - Progress |
| Acesso |
Público |
| Publicação |
05/08/2004 |
|
Status: Unverified
GOAL:
How to retrieve e-mail addresses from MAPI:SESSION OCX object
FIX:
DEF VAR vi AS INTEGER.
DEF VAR objItem AS COM-HANDLE.
DEFINE VAR objSession AS COM-HANDLE.
DEFINE VAR objRecip AS COM-HANDLE.
CREATE "MAPI.SESSION" objSession.
objSession:Logon().
objRecip = objSession:session:AddressBook( ).
DO vi = 1 TO objRecip:COUNT :
objItem = objRecip:ITEM( vi ).
MESSAGE vi SKIP objItem:Address VIEW-AS ALERT-BOX.
RELEASE OBJECT objItem.
END.
RELEASE OBJECT objRecip.
RELEASE OBJECT objSession.