Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Outlook Object Filtering
Message
De
04/04/2010 12:14:52
 
 
Information générale
Forum:
Visual FoxPro
Catégorie:
COM/DCOM et OLE Automation
Versions des environnements
Visual FoxPro:
VFP 9 SP2
OS:
Windows 7
Network:
Windows 2003 Server
Database:
MS SQL Server
Application:
Desktop
Divers
Thread ID:
01458635
Message ID:
01458644
Vues:
40
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
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform