Here is the basic format for creating an appointment:


  LOCAL oOutlook, oNameSpace, oFolder, oAppointment

  oOutlook = CREATEOBJECT("Outlook.Application")
  cSubject= "Outlook Appointment Subject"

  ** Create an instance of the namespace object
  oNameSpace = oOutlook.GetNameSpace("MAPI")

  ** Get a reference to the inbox
  oFolder = oNameSpace.GetDefaultFolder(OL_FOLDERCALENDAR)

  ** Add a new eAppointment to the folder
  oAppointment = oFolder.Items.Add(OL_APPOINTMENTITEM)

  ** Set up the appointment properties and save it
  WITH oAppointment

    .Subject = cSubject
    .Save()

  ENDWITH

RETURN


Here are the available properties for an appointment object:

** Object
Actions
Application
Attachments
FormDescription
GetInspector
Links
Parent
Recipients
Session
UserProperties

** Character
BillingInformation
Body
Categories
Companies
ConversationTopic
EntryID
Location
MessageClass
Mileage
NetMeetingDocPathName
NetMeetingOrganizerAlias
NetMeetingServer
NetMeetingType
NetShowURL
OptionalAttendees
Organizer
OutlookVersion
ReminderSoundFile
RequiredAttendees
Resources
Subject

** Numeric
Class
BusyStatus
ConversationIndex
Duration
Importance
MeetingStatus
OutlookInternalVersion
RecurrenceState
ReminderMinutesBeforeStart
ResponseStatus
Sensitivity
Size

** Logical
AllDayEvent
IsOnlineMeeting
IsRecurring
NetMeetingAutoStart
NoAging
ReminderOverrideDefault
ReminderPlaySound
ReminderSet
ResponseRequested
Saved

UnRead

** DateTime
CreationTime
End
LastModificationTime
ReplyTime
Start