Envio de mails con: ASPMail

ASPMail es un componente para envio de mails desde ASP. La empresa que lo desarrolla se llama ServerObjects Inc. Pueden ver su sitio web en ServerObjects.com
Lamentablemente no es gratuito, pero se puede bajar por un tiempo (29 dias) como período de prueba.
No confundir este componente con otro llamado ASPEmail.

Estoy incluyendo un ejemplo sobre ASPMail, ya que muchos servidores que soportan ASP, tienen instalado este componente, por lo tanto podran usarlo aquellos que tengan un hosting que haya previamente instalado el COM es sus web servers.

Pero volviendo al ASPMail, del cual nos ocupamos en este ejemplo, se destaca que usando este COMponente se puede enviar mails con formato HTML (muy importante para algunos)
Veamos el código (junto a sus comentarios) que debemos incluir en nuestro ASP para usar el ASPMail.

<%
'creamos el Objeto con la siguiente linea...
Set ObjMail = Server.CreateObject ("SMTPsvg.Mailer")

'definimos y configuramos sus propiedades basicas...
ObjMail.FromName = "Nombre del remitente"
ObjMail.FromAddress = "email@delremitente.com"
ObjMail.Subject = "Asunto del mail que enviamos"
ObjMail.BodyText = "Cuerpo o mensaje del mail"

'a quien enviamos el mail... (2 destinatarios)
ObjMail.AddRecipient "Mario", "mario@email.com"
ObjMail.AddRecipient "Juan", "juan@email.com"
'y una copia oculta para Pedro
ObjMail.AddBCC "Pedro", "pedro@email.com"

'aqui configuramos el servidor SMTP que usamos...
ObjMail.RemoteHost = "localhost"

'Envio del mail con chequeo...
if ObjMail.SendMail then
       response.write "El mail fue enviado con exito"
else
       response.write "El mail no pudo ser enviado."
end if
%> 

Bueno, como pueden apreciar en el código, configuramos nuestro email, definimos a 3 destinatarios (2 copias normales y una oculta), configuramos por ultimo el servidro SMTP, y luego lo enviamos conObjMail.SendMail.
Esa linea la pusimos dentro de un IF, pudiendo comprobar si el mail realmente fue enviado correctamente o fallo.

A continuación les explicaré como enviar un mail con formato HTML.

Antes de la linea ObjMail.BodyText deben definir el tipo de mail que se enviará.
Eso lo hacemos con ObjMail.ContentType = "text/html", indicando que el mail va a llevar codigo HTML, y que debe ser enviado de ese modo.
Asi que el fragmento de mail quedará asi.

<%
'...........
ObjMail.ContentType = "text/html"
ObjMail.BodyText = "Este mail <BR> puede contener etiquetas <B> HTML </B>"
'...........
%>

Como ven era algo muy fácil. Solo definimos el tipo de contenido del mail y podemos usar HTML en él

Para finalizar el ejemplo les mostrare como adjuntar un archivo con el mail (el famoso Attach).

Debemos usar el metodo AddAttachment para poder ajuntar un archivo. Su forma de uso por supuesto que es asi:
ObjMail.AddAttachment "C:\ruta\archivo.ext"

<%
'...........
ObjMail.AddAttachment "C:\download\programa.zip"
'...........%> 

¿Simple verdad? Pero aqui hay algo para decir sobre los attach:
Segun la documentación que ofrece ServerObject.com, "You must use an explicit path to attach files"...
Esto quiere decir que debemos explicitar la ruta al archivo. Esto era logico, pero lo recuerdo por las dudas