OutlineEntry aus der Bookmark.NSf entfernen

[Zsolt_Hermann]

Hallo Leute,

ich möchte ein Mail generieren, in dem ein Button enthalten ist, welcher bestimmte Einträge in der Bookmark.nsf enthalten sind entfernt.

Ich habe dazu folgendes Script geschrieben:

 Dim session as NewNotessession
 Dim db as Notesdatabase
 Dim outline as Notesoutline
 Dim entry as Notesoutlineentry

 Set db = session.GetDatabase( "", "Bookmark.NSF")
 Set outline = db.GetOutline("outinename")
 Set entry = outline.GetFirst()
 While not(entry is Nothing)
    Select Case entry.Label
        Case "Label1"
            Call outline.RemoveEntry(entry)
        Case "Label2"
            Call outline.RemoveEntry(entry)
    End Select
 Wend

Leider funktioniert das aber nicht. Hat Jemand von Euch eine bessere Idee?

Gruß

Zsolt Hermann

[Zsolt_Hermann]

Nachtrag:

Es fehlt noch:  

            .
            .
            .
            .

           End Select
     Set entry = outline.GetNext(entry)
     
Wend