Accessing Outlook Global Address list | The Bereznikers

Accessing Outlook Global Address list

By Sergey - Posted on January 1st, 2008

Tagged:

Code is based on http://msdn2.microsoft.com/en-us/library/Aa155615

This is sample code. Add error handling and adjust to your requirements as necessary.

oOA = CREATEOBJECT("Outlook.Application")
oNS = oOA.GetNamespace("MAPI")
&& Get all available address lists
oALs = oNS.AddressLists()
&& Get Global Address List
oGAL = oALs.Item("Global Address List")
&& Get AddressEntries collection object
oAEs = oGAL.AddressEntries
? oAEs.Count
? oAEs.Item(1).Name