I don't think it would be any different for the user Contacts. For Outlook Global Address list see http://www.berezniker.com/content/pages/visual-foxpro/accessing-outlook-global-address-list

>I have a function that can import/export data from our Database into Outlook Contacts. In my function I create a connection to Outlook and add Items directly to the Contact Folder: For Example the following code gets the folder in Outlook desired, i.e., usually (Personal Folders\Contacts):

>		m.Outlook = CREATEOBJECT("_outlook")
>
>		m.nLevels = OCCURS("\",THIS.contactfolder)+1
>		DIMENSION aTemp[m.nLevels]
>		=FILLARRAY(@aTemp,THIS.contactfolder,"\")
>
>		m.oSpace = OutLook.oOutlook.getNameSpace("MAPI")
>		m.oContactFolder = m.oSpace.GetDefaultFolder(10)
>
>		m.oFolder = m.oSpace.Folders(aTemp[1])
>
>		FOR m.j = 2 TO m.nLevels
>			m.oFolder = m.oFolder.Folders(aTemp[m.j])
>		NEXT

>Once I get the Correct folder (m.oFolder) I add a contact with the following code:
>
>m.oContact = m.oFolder.items.add()
>
>And then fill in the appropriate "contact" properties with my data.
>
>Anyway, here is my question: How do I translate the above (or can I) to a user whose Outlook is connected to Exchange? How are the folders named in exchange, and how can I traverse them like I am doing above with a stand-alone Outlook PST file?
>
>Thanks!!
>
>bob