CDO significa " Collaboration Data Objects ". Desenvolvido pela Microsoft , essa tecnologia é projetada para tornar mais fácil para criar aplicativos de mensagens. O objeto "Mensagem" em CDO fornece mecanismos para copiar, remover e mover mensagens de e-mail . O objeto de mensagem tem um método chamado " MoveTo " que lhe permite mover uma mensagem de e-mail de uma pasta para outra . Note que você deve ter direitos administrativos no computador para executar esta tarefa . Instruções
1

Entrar para o seu computador usando o nome de usuário ea senha do administrador .
2

Clique no menu Iniciar (o botão de logotipo do Windows no canto inferior esquerdo , lado da tela) e selecione "Todos os Programas". Clique em " . Microsoft Visual Basic"
3

Digite o seguinte comando :

Set CdoMessage2 = CdoMessage.MoveTo ( FolderID [ StoreID ] )

o " FolderID " é uma string que identifica a pasta na qual a mensagem está a ser movido enquanto o " StoreID " é uma cadeia de caracteres que identifica o armazenamento de mensagens contendo a pasta de destino .
4

Pressione "Enter "para executar o comando.
5

Fechar Visual Basic após a mensagem de e-mail tenha sido movido .