Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Outlook Object Filtering
Message
 
 
À
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:
01458655
Vues:
31
I can not get this code to work for me at all. I'm using Exchange server and the Logon method returns NULL for me. I'm not sure how to make it work...

>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
If it's not broken, fix it until it is.


My Blog
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform