| |||
Alguien tiene algun codigo para un tell a friend?? Necesito algun codigo para qeu en mi page diga recomendale esta page a un amigo y este el boton enviar, gracias y espero me puedan ayudar! |
| |||
Re: Alguien tiene algun codigo para un tell a friend?? Aquí tienes otro ejemplo :) <a href='ir.asp?http://www.webexperto.com.ar/articulos/articulo.asp?cod=52' target='_blank'>http://www.webexperto.com.ar/articulos/a...</a> un saludo!! [email protected] |
| |||
Re: Alguien tiene algun codigo para un tell a friend?? Les digo la verdad, no se nada de asp y no me funciona alguien me podria explicar que debo hacer? Muchas gracias |
| ||||
Re: Alguien tiene algun codigo para un tell a friend?? Hola, Snakepit. Lo que Giancarlo te está diciendo es que en la página enviar.html puedes armar tu formulario que enviará los datos a la página enviar.asp de esta manera: <form action="enviar.asp" method=post> // Lo envías a la página por POST para que guarde los datos Tu Nombre: <input type=text name=nombre> // Casilla para el nombre del usuario <br> Tu mail: <input type=text name=mail> // Casilla para el corroe del usuario <br> Su nombre: <input type=text name=sunombre> // Casilla para aquél a quien vas a recomendar la página <br> Su mail: <input type=text name=sumail> // Correo de tu amigo <br> <input type=submit name=enviar value=Enviar> </form> La página enviar.asp recogerá los datos de este formulario e inmediatamente los mandará por correo electrónico con el código que te han proporcionado, utilizando la librería CDONTS: <% set mail = server.CreateObject("CDONTS.Newmail") 'Se crea la conexión mail.from = trim (Request("mail")) 'Correo de quien envía el mensaje mail.to = trim (Request("sumail")) 'Correo al cual se envía el mensaje mail.subject = "TU TEXTO" 'Este texto puede ser por ejemplo "Un amigo te recomienda visitar tupagina.com" 'Aquí viene el cuerpo del mensaje mail.message = "Hola " & trim(Request("sunombre")) & "<p>" & trim (Request("nombre") & " te manda un mail para recomendarte esta página... bla bla blaa..." mail.send 'Envía el Mail set mail = nothing 'Esta acción borra todos los datos después de enviar el mail %> Espero haberte ayudado en algo. Saludos a todos ;) |