Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Send Outlook Mail via VFP
Message
 
À
01/05/2000 17:59:29
Information générale
Forum:
Visual FoxPro
Catégorie:
COM/DCOM et OLE Automation
Divers
Thread ID:
00364632
Message ID:
00364934
Vues:
26
>>Sooo... Does this mean we have to buy your next book or lunch or something?

No... In fact, often has been the case where I have lifted code out of the book and have posted it up here. I dunno...seems like the right thing to do. Then again, I am just evil person who is always at odds with public opinion..< bg >

>John,
>
>Sooo... Does this mean we have to buy your next book or lunch or something?
>
>I dunno about this business of just helping a fellow developer out. Something fishy here... <g>
>
>Best,
>
>DD
>
>PS - Thanks John..
>
>>Or, they can go to my website and get the same info for free...< bg >....
>>
>>Hawk your book if want to.. However, I think the right thing to do is directly answer the question as opposed to just just pushing folks off to buy your book..< s >
>>
>>For the benefit of those lurking, here is code that adds Outlook Contacts to a VFP cursor. For brevity, I only included 2 fields. I have a complete set of classlibraries that encapsulates this process. If you want them, just send me an email. I will also upload them here and will post a link to my web site.
>>
>>Sorry folks, I have a problem with folks who could, or at least should be able to answer a question without forcing somebody to buy one's book...< s >.. Don't get me wrong... I encourage folks to purchase the books they believe they need to do their jobs. However, when somebody steers you to a website to buy their book as opposed to answering the question, this IMO, goes over the line. This is after all, a VOLUNTEER SUPPORT FORUM.
>>
>>Again, this and many more samples like it are available for free on my web site.
>>
>>
>>
>>
>>#Define olFolderContacts	10
>>oOutlook = createobject("outlook.application")
>>oNameSpace = oOutlook.GetNameSpace("MAPI")
>>oContacts = oNameSpace.GetDefaultFolder(olFolderContacts).Items
>>count = 0
>>create cursor contacts ;
>>   (fullname c(50),email1address c(50))
>>For Each Contact In oContacts
>>   m.fullname      = contact.fullname
>>   m.email1address = contact.email1address
>>   Insert Into Contacts From Memvar
>>Next Contact
>>
>>
>>
>>
>>>>
>>In addition, you can write code that reads the Outlook address book. The new book that Della Martin and I have coming out this month (Microsoft Office Automation with Visual FoxPro) includes an example that reads the Contacts folder from Outlook and creates a VFP cursor. You can check the book out at www.hentzenwerke.com. (PUTM members also get a discount. Go through the link on the main UT page.)
>><<
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform