hello I need to display AddressBook for OL 2003 ,OL 2007 & let the user select the entries listed in addressbook.From the selected entry I need to retrive the contactItem & retrieve its properties(ENtryID,Phone numbers etc.) I'm using below code - Dim objMAPIUtils As Redemption.MAPIUtils 'Object Dim objRecipients As Redemption.SafeRecipients Dim objRecipient As Redemption.SafeRecipient Dim ObjContact As Outlook.ContactItem objMAPIUtils = CreateObject("Redemption.MAPIUtils") objRecipients = objMAPIUtils.AddressBook(, "Address Book", False, False, 1, "&To", "&Cc", "&Bcc") If objRecipients.Count > 0 Then For Each objRecipient In objRecipients ' get contactitem from ObjRecepient & retrieve its EntryID Next If Not objRecipients Is Nothing Then objRecipients = Nothing If Not objMAPIUtils Is Nothing Then objMAPIUtils = Nothing How to get the contactitem & retrive its EntryID.For OL 2007 I can get contact in OL 2007 by addentry.GetContact But for OL2003 I'm not able to get contactitem. Thanks -sd