Dundas Mailer

Fabricante: Dundas Software (www.dundas.com)
Documentação: http://aspalliance.com/dundas/

Exemplo de implementação:

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

objMail.SMTPRelayServers.Add "smtp.dominio.com.br"

objMail.FromAddress = "remetente@dominio.com.br"

objMail.TOs.Add "destinatario@dominio.com.br"

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

objMail.SendMail

Set objMail = Nothing