How do you refresh an outline in the 8.X standard client ?

I've tried uiworkspace.outlineReload, and uiworkspace.reloadWindow() but nothing works.

For example:

Dim session As New NotesSession

Dim db As NotesDatabase

Dim outline As NotesOutline

Dim entryA As NotesOutlineEntry

Dim entryB As NotesOutlineEntry

Dim workspace As New NotesUIWorkspace

Set db = session.CurrentDatabase

Set outline = db.GetOutline("mailOutlineH")

Set entryA = outline.GetFirst()

Set entryB = outline.Createentry("My New Entry",entryA,True)

Call outline.save()

Call workspace.OutlineReload("mailOutlineH","")

Call workspace.reloadWindow()

But nothing happens.. btw it works in the Basic client.

Anyone got any ideas.

Cheers