Create a todo with notify with VB6

HCL Domino Domino Forum
1

Hello,I want to create a ToDo Entry with VB 6 who notify me.

The Problem is, that there is no notification. Can someone say me, why???

Thanks for your help.

Thomas

Here is my code

Dim notesSession As Object

Dim notesDB As Object

Dim doc As Object

Set notesSession = CreateObject(“Notes.NotesSession”)

Set notesDB = notesSession.GetDatabase(“”, “”)

Call notesDB.OPENMAIL

Set doc = notesDB.CreateDocument

'Ich bin ein Todo

Call doc.AppendItemValue(“Form”, “Task”)

'------------------

'See document properties for possible values

'------------------

Call doc.AppendItemValue(“Subject”, Betreff)

Call doc.AppendItemValue(“Body”, Inhalt)

Call doc.AppendItemValue(“StartDate”, Datum)

Call doc.AppendItemValue(“Alarms”, “1”)

Call doc.AppendItemValue(“Categories”, “Revos”)

Call doc.Save(True, False)