Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Outlook Object Filtering
Message
From
04/04/2010 12:14:52
 
General information
Forum:
Visual FoxPro
Category:
COM/DCOM and OLE Automation
Environment versions
Visual FoxPro:
VFP 9 SP2
OS:
Windows 7
Network:
Windows 2003 Server
Database:
MS SQL Server
Application:
Desktop
Miscellaneous
Thread ID:
01458635
Message ID:
01458644
Views:
39
Hi

I've looked at that and whilst the myInbox.items.find(lcFilter) works, it only finds one item. My code looks like this:

loOutlook = createobject('Outlook.Application')
loNS = loOutlook.GetNameSpace('MAPI')
loInbox = loNS.GetDefaultFolder(6)
loItems = loInbox.Items

lcFilter = '[Sendername] = ' + '"' + 'Derek Chapman' + '"'
loSearch = loInbox.Items.Filter(lcFilter)

do while not isnull(loSearch)
? loSearch.receivedtime
loSearch = loItems.findnext()
enddo

There are 100's of emails from Derek Chapman, but this code only returns 1 item.

Regards
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform