CDO na teoria
CDO (Collaboration Data Objects) é umatecnologia desenvolvida pela microsoft para simplifica a criação de mensagens através de programação.
Instanciando o objeto:
Set Objemail = CreateObject("CDO.Message")Propriedades do objeto:
Propriedade Descrição Exemplo de utilização From Email do remetente Objemail.From = "email@site.xxx.xx" To Email destino Objemail.To = "emaildestino@site.yyy.yy" TextBody Corpo da mensagem no formato texto Objemail.TextBody = "Este é um corpo de mensagem em texto" Bcc Envia uma cópia da mensagem para o destinatário oculto. Objemail.Bcc = "emailcopiaoculta@site.yyy.yy" Send Envia a mensagem. é o comando final após ele a mensagem é enviada Objemail.Send SubjectAssunto da mensagemExemplo de utilização:
ObFrom :- Email do Remetente da mensagem
To :- Email do destinatário da mensagem
TextBody :- Corpo da mensagem, no formato texto.