Emails con CDOSYS
Windows XP, o mejor dicho el IIS 5.1 no "soporta" mas el viejo CDONTS. ha sido reemplazado por CDOSYS
el cual tiene mas cualidades... las cuales no veremos hoy aqui.
Cabe destacar que CDOSYS si funciona correctamente sobre Windows 2000.
A continuacion les dejo el codigo para el envio simple de emails con CDOSYS.
<%
Set oMail = Server.CreateObject("CDO.Message")
'reemplazar aqui las variables principales
para = "destinatario@servidor.com"
de = "remitente@servidor.com"
asunto = "El asunto de mi email"
mensaje = "El mensaje del mail..."
oMail.From = de
oMail.To = para
oMail.Subject= asunto
oMail.TextBody = mensaje
oMail.Send
Set oMail = Nothing
%>
|
Si se quiere enviar un mail con formato HTML, puede hacerlo por supuesto...
usando oMail.HTMLBody = mensaje
|
