>>>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.