Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Creating an appointment in Outlook 98
Message
General information
Forum:
Visual FoxPro
Category:
Third party products
Miscellaneous
Thread ID:
00246400
Message ID:
00246717
Views:
14
>>>>Does anybody have an example on how to create an appointment in Outlook 98 ?
>>>>
>>>>Regards,
>>>
>>>Here's one way:
>>>
>>>ox = CREATEOBJECT( "Outlook.Application" )
>>>on = ox.GetNameSpace( "MAPI" )
>>>oFolder = on.GetDefaultFolder( 9 ) && Default folder, might need to get a different folder
>>>oEvent = oFolder.Items.Add( 1 )
>>>oEvent.Subject = "My subject text"
>>>oEvent.Start = {mm/dd/yy}
>>>oEvent.End = {mm/dd/yy}
>>>oEvent.Display
>>>
>>>Bill
>>
>>Done. Thank you very much.
>
>No problem. BTW, probably should have indicated "9" in GetDefaultFolder( 9 ) indicates a "Calendar" type folder and "1" in Items.Add( 1 ) indicates a "Appointment" type item. I ususally use the Outlook constant designations but I didn't know if you knew them. If you automate Outlook very much, would probably good to look them up.
>
>Bill

I bookmarked "Outlook constants" in the help file. So it´s easy to check them out.
José Augusto Cavalcanti
Global Connection
jose.cavalcanti@globalconnection.com.br
Previous
Reply
Map
View

Click here to load this message in the networking platform