#8183
Support 3
Participant

You will need to add the message to destination folder messages collection, see the Object API Messages object for more information.

Code below link the selected message to “Archive” folder.

  
  dim oMsg
  dim oDestinationFolder

  set oDestinationFolder = GroupWise.Account.Cabinet.AllFolders.ItemByName("Archive")

  Set oMsg = Client.ClientState.CommandMessage

  oDestinationFolder.messages.add(oMsg)

  set oDestinationFolder = nothing
  set oMsg = nothing

Hope this helps.

Regards,
Advansys Support