// Start a Lotus Notes session
SessionID is int
SessionID = EmailStartNotesSession("Password", "MarsServer", "email/julia.nsf", ...
				"C:\Users\Julia\AppData\Local\Lotus\Notes\Data\user.id")

// Initialize the variables of the Task structure
TaskReset()
// Fill the variables for the new appointment
mTask.Subject = "New task"
mTask.StartDate = "20070125100000"
mTask.NbParticipant = 3
mTask.Participant[1] = "Roman"
mTask.Participant[2] = "Lucas"
mTask.Participant[3] = "Stephen"
// Add the task
IF TaskAdd(SessionID) = True THEN
	Info("Task successfully added")
ELSE
	Error("Error during the addition", ErrorInfo())
END