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:
00246635
Views:
13
>>>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
William A. Caton III
Software Engineer
MAXIMUS
Atlanta, Ga.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform