/ Forums / Advansys Formativ / Creating Solutions with Formativ / “Notify” user when shared message arrives / Reply To: “Notify” user when shared message arrives

Support 1

Here is an example applet to delete a message from a shared folder. The key to this solution is the Token GroupWise.Refresh, used instead of the Object API method Account.Refresh.

Sub Main(Client, GWEvent)
  dim oMsg
  if Client.ClientState.SelectedMessages.Count = 0 then
    exit sub
  end if
  set oMsg = Client.ClientState.SelectedMessages.Item(1)
  msgbox oMsg.Subject
  set oMsg = nothing

End Sub

I hope this helps.

Advansys Support

[This message was edited by Support 3 on February 17, 2004 at 03:10 PM.]