SoloCodigo

Programación Web y Scripting => ASP => Mensaje iniciado por: Sagutxo en Jueves 14 de Septiembre de 2006, 12:12

Título: Envio De Emilios
Publicado por: Sagutxo en Jueves 14 de Septiembre de 2006, 12:12
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.-
Código: Text
  1. <%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
  2. <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
  3. <html xmlns="http://www.w3.org/1999/xhtml">
  4. <head>
  5. <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
  6. <title>Documento sin título</title>
  7. </head>
  8.  
  9. <body>
  10. <%
  11. set mail=server.CreateObject("CDONTS.NewMail")
  12. mail.From= Request("sender") ' like john.doe@comsoltech.com
  13. mail.Subject = Request("subject")
  14. mail.Body = Request("body")
  15. mail.BodyFormat = 0 ' 0 = HTML, 1 = Plain
  16. mail.MailFormat = 1 ' 0 = MIME, 1 = Text
  17. mail.Importance = 1 ' 0 =High, 1 = Medium, 2 = Low
  18. mail.Send
  19. set mail=nothing
  20. %>
  21.  
  22. <p>
  23. <b>Se ha enviado el mensaje:</b><br>
  24. De: <%= Request("sender") %><br>
  25. A: <%= Request("receiver") %><br>
  26. Con el asunto: <%= Request("subject") %>
  27. </p>
  28. </body>
  29. </html>
  30.  

2.-
Código: Text
  1. <%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
  2. <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
  3. <html xmlns="http://www.w3.org/1999/xhtml">
  4. <head>
  5. <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
  6. <title>Documento sin título</title>
  7. </head>
  8.  
  9. <body>
  10. <%
  11. Set mail = Server.CreateObject("JMail.Message")
  12. mail.From = Request("sender")
  13. mail.Subject = Request("subject")
  14. mail.Body = Request("body")
  15. mail.AddRecipient Request("receiver")
  16. mail.Priority = 3 ' =3 Normal
  17. mail.Send "smtp.MiDominio.com"
  18. Set mail=Nothing
  19. %>
  20.  
  21. <p>
  22. <b>Se ha enviado el mensaje:</b><br>
  23. De: <%= Request("sender") %><br>
  24. A: <%= Request("receiver") %><br>
  25. Con el asunto: <%= Request("subject") %>
  26. </p>
  27.  
  28. </body>
  29. </html>
  30.  

Muchas gracias.
 :smartass:  :comp:  :smartass:
Título: Re: Envio De Emilios
Publicado por: Sagutxo en Jueves 26 de Octubre de 2006, 11:33
ARREGLADO, no recordaba ya ni el mensaje.
Título: Re: Envio De Emilios
Publicado por: Mollense en Jueves 26 de Octubre de 2006, 19:36
A que le llaman "emilios", porque así se llama mi tío  :lol:

Acaso es a las invitaciones?
Título: Re: Envio De Emilios
Publicado por: Sagutxo en Viernes 27 de Octubre de 2006, 23:35
Salu2. Creo que me dices en bromas pero te voy a decir por si acaso
E-mail emilios :)
Título: Re: Envio De Emilios
Publicado por: Mollense en Domingo 29 de Octubre de 2006, 19:25
:P , ya sabía.

Yo solamente he usado CDONTS y es exactamente igual a tu código.

Así (http://foros.solocodigo.com/index.php?showtopic=23533)

Tambíen tube un problemita pero lo solucioné

Así (http://foros.solocodigo.com/index.php?showtopic=20919)

 :hola: