COMPONENTE MAPI E SINTAXE

MOACIRPFAU 23/08/2007 22:16:19
#232465
Preciso muito de uma ajuda.
Estou querendo salvar 3 emails na caixa de entrada e usso o seguinte código.

MAPISession1.SignOn
For i = 0 To 2
MAPIMessages1.SessionID = MAPISession1.SessionID
MAPIMessages1.Compose
MAPIMessages1.RecipAddress = "email@email.com.br"
MAPIMessages1.MsgSubject = "Assunto" & i
MAPIMessages1.MsgNoteText = "Corpo do email"
MAPIMessages1.Save

Next
MAPISession1.SignOff

Com isso deveria ter na caixa de entrada o email com assunto0, assunto1 e assunto2.

Só que acontece que gera o 1º email e quando vai gerar o 2º ele sobrepoe o 1º
e assim por diante ficando somente o ultimo.
Não sei se deveria declarar algum indice.

Preciso de uma ajuda urgente.

Obrigado.
USUARIO.EXCLUIDOS 24/08/2007 07:26:24
#232482
Citação:



Como assim salvar na cx de Entrada
MOACIRPFAU 24/08/2007 07:42:32
#232483
uso dessa maneira pois existe muitos emails para ser enviados e o cliente gosta de verificar antes de enviar, assim é só arrastar os emails para a caixa de saida e esta resolvido.

Teria alguma outra solução?

ou melhor como poderia usar o save?
USUARIO.EXCLUIDOS 24/08/2007 07:50:04
#232484

Tipo: o certo seria mandar pra pasta Rascunho então né?

eu vou tentar mais tarde..pois n estou no escritório agora mas..

pelo que entendo do MAPI..vc deve começar e finalizar o processo completamente pra começar outro

tenta isso coloando o processo de envio, dentro de um For Next..talvez funcione
Tópico encerrado , respostas não são mais permitidas
Voltar