#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