I am logged in as Admin and executing ItemSaveMessageDraft. The token
always returns false with "Token failed execution". Example:
ItemSaveMessageDraft("AdminWork In Progress")

I create a new email. I have filled in "To", Subject and email text.

The VB code is:
Dim oCommander As GroupWiseCommander.GWCommander
Dim sCmd$, sTmp$
Dim v as Variant
dim sRoot$, sWorkFolder$
Set tmpgwApp = CreateObject("NovellGroupwareSession")
Set tmpgwAccount = tmpgwApp.Login

Set oCommander = CreateObject("GroupWiseCommander")
sRoot$ = tmpgwAccount.Owner.DisplayName
sWorkFolder$ = tmpgwAccount.WorkFolder.Name
sCmd$ = "ItemSaveMessageDraft(""" & sRoot$ & "" & sWorkFolder$ & """)"

v = oCommander.Execute(sCmd$, sTmp$)

Debug.print v, sTmp$, tmpgwAccount.WorkFolder.Messages.Count

The variable v comes back as False, sTmp$ = "Token failed execution" and
the message count is 0.

I have even tried hardwiring and passing ItemSaveMessageDraft("AdminWork
In Progress") but even that doesn't work.

I have also tried these variations:
ItemSaveMessageDraft("AdminWork In Progress")
ItemSaveMessageDraft("AdminWork In Progress")
ItemSaveMessageDraft("AdminWork In Progress")
ItemSaveMessageDraft("AdminMailbox")

None of them succeeds.

I would appreciate any help.

Tim