Salu2. Alguno puede
decirme como
mandar emilios automáticos con
ASP. he mirado una infinidad de ejemplos en la red, pero no me ha funcionado ninguno.
. Ya no se que mas probar salvo hacerlos manuales que no sería bueno. Así que si pueden ayudarme se lo agradeceria mucho.
Los 2 ejemplos mas fiables que he encontrado son estos:
1.-
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
<title>Documento sin título</title>
</head>
<body>
<%
set mail=server.CreateObject("CDONTS.NewMail")
mail.From= Request("sender") ' like john.doe@comsoltech.com
mail.Subject = Request("subject")
mail.Body = Request("body")
mail.BodyFormat = 0 ' 0 = HTML, 1 = Plain
mail.MailFormat = 1 ' 0 = MIME, 1 = Text
mail.Importance = 1 ' 0 =High, 1 = Medium, 2 = Low
mail.Send
set mail=nothing
%>
<p>
<b>Se ha enviado el mensaje:</b><br>
De: <%= Request("sender") %><br>
A: <%= Request("receiver") %><br>
Con el asunto: <%= Request("subject") %>
</p>
</body>
</html>
2.-
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
<title>Documento sin título</title>
</head>
<body>
<%
Set mail = Server.CreateObject("JMail.Message")
mail.From = Request("sender")
mail.Subject = Request("subject")
mail.Body = Request("body")
mail.AddRecipient Request("receiver")
mail.Priority = 3 ' =3 Normal
mail.Send "smtp.MiDominio.com"
Set mail=Nothing
%>
<p>
<b>Se ha enviado el mensaje:</b><br>
De: <%= Request("sender") %><br>
A: <%= Request("receiver") %><br>
Con el asunto: <%= Request("subject") %>
</p>
</body>
</html>
Muchas gracias.
