Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Outlook phone book
Message
 
To
22/11/2006 06:06:49
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
01171640
Message ID:
01172045
Views:
17
i actually use the table.field syntax myself, this was just a code snippet i have in a text file that i keep handy, i copy in useful code snippets from UT when ever i see them. i just copied and pasted the code into the message without reading it.
~M

>Hi Mark,
>
>you're free to choose, of course, but the general opinion is that the table->field syntax is somewhat outdated. Most programmers prefer the newer table.field syntax. Personally I only use the aa->bb "syntax" to indicate a menu->submenu cpnstruct.
>
>>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
Go raibh maith agat

~M
Previous
Reply
Map
View

Click here to load this message in the networking platform