cdonts

Olá pessoal, eu tento mandar email, ele não da nenhuma mensagem de eero, mas o e-mail não chega na caixa de email, veja o código,

Const CdoBodyFormatText = 1
Const CdoBodyFormatHTML = 0
Const CdoMailFormatMime = 0
Const CdoMailFormatText = 1

Set Message = CreateObject("cdonts.NewMail")

Message.To = "email@email.com.br"
Message.Subject = "Subject"
Message.Body = "TextBody"

Message.MailFormat = CdoMailFormatText
Message.BodyFormat = CdoBodyFormatText

Message.From = "meuemail@email.com.br"

Message.Send
O que tem de errado no código?

alguém sabe outro componente (objeto) de email, que usa smtp e não tem problemas?

ou outro que mandar mensagem tipo Form Mail.