>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