LOCAL GWObj, RAObj, lcFilter, AddrBook, AddrBookEntries, lnI, AddrBookEntry GWobj = CreateObject('NovellGroupWareSession') RAobj = GWobj.Login('','') && login to post office AddrBook = RAObj.AddressBooks[1] lcFilter = [(Department CONTAINS "Information Technology")] AddrBookEntries = AddrBook.AddressBookEntries.Find(m.lcFilter) FOR lnI = 1 to AddrBookEntries.Count AddrBookEntry = AddrBookEntries.Item(m.lnI) =MESSAGEBOX(AddrBookEntry.DisplayName + " " + AddrBookEntry.EmailAddress) nextHowever, I'd like to actually invoke the Address Book, just filtered. I've checked ActiveX control and it doesn't have Filter or Find method. Should I abandon this idea and create my own list using listbox or grid or there is a method I overlook?