Examples: MoveEntry method

This example moves the last entry of the Products outline after the first entry as a child.

Dim session As New NotesSession
Dim db As NotesDatabase
Dim outline As NotesOutline
Dim entryA As NotesOutlineEntry
Dim entryB As NotesOutlineEntry
Set db = session.CurrentDatabase
Set outline = db.getOutline("Products")
Set entryA = outline.GetLast()
Set entryB = outline.GetFirst()
Call outline.MoveEntry(entryA,entryB,1,1)
Call outline.save()