Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Find Outlook Contacts
Message
 
To
16/03/2007 12:52:41
General information
Forum:
Visual FoxPro
Category:
COM/DCOM and OLE Automation
Miscellaneous
Thread ID:
01204673
Message ID:
01204679
Views:
29
#DEFINE olFolderContacts 10
CREATE CURSOR myCursor (Name c(40),email c(50))
LOCAL oOutlook,oNameSpace,oDefaultFolder
oOutlook = CREATEOBJECT('outlook.application') 
oNameSpace = oOutlook.getnamespace('MAPI')
oDefaultFolder=oNameSpace.GetDefaultFolder(olFolderContacts) 
oItems = oDefaultFolder.items
FOR EACH oItem IN oItems
 INSERT INTO myCursor (name,email) VALUES (oItem.fullname,oItem.email1address)
ENDFOR
SELECT myCursor 
BROWSE
>Hi folks,
>
>a simple question:
>
>Is there a way to find an outlook contact from VFP by FirstName, LastName and Email1Address without searching the contacts sequentially?
>
>Thanks for any idea!
>
>Best regards from Berlin, Germany
>Manfred Rätzmann
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform