Hi Matt,

You and Tamar were on the right track: The reason that your code acted so flaky was that Outlook couldn't tell where to put the Task when it was not explicitly open. This is why you need the Namespace and the default MAPI folders to automate Tasks (and other stuff too). Try the code below (I modified your code):

*// Folder Constants
#DEFINE olFolderCalendar 9
#DEFINE olFolderContacts 10
#DEFINE olFolderDeletedItems 3
#DEFINE olFolderInBox 6
#DEFINE olFolderJournal 11
#DEFINE olFolderNotes 12
#DEFINE olFolderOutBox 4
#DEFINE olFolderSentMail 5
#DEFINE olFolderTask 13
#DEFINE olBusy 2
#DEFINE True .T.
#DEFINE False .F.
#DEFINE olPrivate 2

*/ Importance Constants
#DEFINE olImportanceLow 0
#DEFINE olImportanceNormal 1
#DEFINE olImportanceHigh 2


*// Item Constants
#DEFINE olMailItem 0
#DEFINE olAppointmentItem 1
#DEFINE olContactItem 2
#DEFINE olTaskItem 3
#DEFINE olJournalItem 4
#DEFINE olNoteItem 5
#DEFINE olPostItem 6

*// Added a Folder Constant

#DEFINE olFolderTasks 13

*// Create the Outlook Object
Public oOutLookObject
oOutLookObject = CreateObject("Outlook.Application")

*// Added code for alternate creating of Task

oNameSpace=oOutlookObject.GetNameSpace("MAPI")
oTaskFolder=oNameSpace.GetDefaultFolder(olFolderTasks)
oTaskItem=oTaskFolder.Items.Add

WITH oTaskItem
 .Subject = "My Subject"
 .Body = "My Body"
 .StartDate = date()
 .DueDate = date() + 10
 .ReminderSet = True
 .ReminderTime = datetime() + 3600
 .Categories = "Personal"
 .Save
EndWith

release oTaskItem
release oOutLookObject