Retrieve task manager folders and iterate task objects, serialising to JSON.
Key Objects Used
finTaskManagerFolder
finTask
finBL.TaskManagerFunctions
Code
Dim Folder As finTaskManagerFolder
Dim Tasks As List(Of finTask)
Dim jsonResult As String
' Get the default task folder for the current user
Folder = finBL.TaskManagerFunctions.GetDefaultFolder()
' Retrieve tasks from the folder
Tasks = finBL.TaskManagerFunctions.GetTasks(Folder)
' Iterate tasksFor Each task As finTask In Tasks
Dim subject As String = task.Subject
Dim dueDate As Date = task.DueDate
Dim isComplete As Boolean = task.IsComplete
Next' Serialise the collection to JSON for use in an HTML Widget
finBL.Runtime.WebUtilities.SerialiseObjectToJsonString(Tasks, jsonResult)