CDONTS

Enviando e-mail com o componente CDONTS

Informações sobre o componente

Fabricante: Microsoft (www.microsoft.com)

Documentação: http://msdn2.microsoft.com/en-us/library/ms526367.aspx

Exemplo de implementação



<%
Dim objMail
Set objMail = Server.CreateObject("CDONTS.NewMail")

objMail.From = "remetente@dominio.com.br"
objMail.To = "destinatario@dominio.com.br"

objMail.Subject = "Assunto da Mensagem"
objMail.Body = "Texto da Mensagem." &amp; VbCrLf &amp; "Mensagem de Teste."

objMail.Send

Set objMail = Nothing

Response.Write "E-mail enviado."
%>

Atenção: Este componente é instalado apenas em servidores Windows 2000 e não funciona em contas da plataforma Windows 2008, criadas a partir de Agosto de 2010.