>I like this approach. But, I receive a dialog tell me that an attempt to access outlook is being done, and if I wish to allow it to occur. Do you know any way around this dialog? (it coming from Outlook 2003, and not my anti-virus application).
>
In addition to Peter's response you may try free utility called ClickYes. Just search on google for it.

>>would this do? you wil have to modify the code slightly
>>

>>CREATE CURSOR emaillist ;
>> (Firstname C(30), Lastname C(30), email C(30))
>>
>>
>>#define olFolderContacts 10
>>
>>outlook = CreateObject("Outlook.Application")
>>namesp = outlook.GetNamespace("MAPI")
>>folder = namesp.GetDefaultFolder(olFolderContacts)
>>contacts = folder.Items
>>cnt = contacts.Count
>>
>>SELECT 0
>>SELECT emaillist
>>
>>For i = 1 To cnt
>>	contact = contacts.Item(i)
>>	
>>	IF contact->FirstName = ' ' OR contact->LastName = ' ' OR contact->Email1Address = ' '
>>		* do nothing
>>	ELSE
>>		APPEND BLANK
>>		REPLACE Firstname WITH contact->FirstName
>>		REPLACE Lastname WITH contact->LastName
>>		REPLACE email WITH contact->Email1Address
>>	ENDIF
>>	****? contact->FirstName, contact->LastName, contact->Email1Address
>>Next i
>>
>>BROWSE TITLE 'Contact list'
>>outlook.Quit()
>>

>>~M
>>
>>>How can I call the outlook phonebook and get the email address ?
>>>thanks a lot