Configurando Componentes ASP Mail

Fabricante: ServerObjects Inc (http://www.serverobjects.com/)
Documentação: http://www.serverobjects.com/comp/Aspmail3.htm

Exemplo de implementação:

Dim objMail
Set objMail = Server.CreateObject("SMTPsvg.Mailer")

objMail.RemoteHost = "smtp.dominio.com.br"

objMail.FromName = "Nome do Remetente"
objMail.FromAddress = "remetente@dominio.com.br"

objMail.AddRecipient "Nome do Destinatário", 
"destinatario@dominio.com.br"

objMail.Subject = "Assunto da mensagem"
objMail.BodyText = "Texto da Mensagem." & 
VbCrLf & "Mensagem de Teste."

If objMail.SendMail Then
	Response.Write "E-mail enviado..."
Else
	Response.Write "Erro no envio de e-mail:
 " & objMail.Response
End If

Set objMail = Nothing

Caso deseje solicitar qualquer tipo de atendimento, utilize nosso canal de contato.