oOutlook = CREATEOBJECT( [Outlook.Application] ) oNameSpace = oOutlook.GetNamespace( [MAPI] ) oAddressList = oNameSpace.AddressLists( [LMC Address Book] ) FOR EACH oContact = oAddressList.AddressEntries ?oContact.Class ?oContact.Address ?oContact.Name ENDFORDoes that help?