Ver Mensaje Individual
  #10 (permalink)  
Antiguo 12/04/2005, 18:00
angelseron
 
Fecha de Ingreso: abril-2005
Mensajes: 247
Antigüedad: 20 años
Puntos: 1
gracias

gracias amigo neuron por repsonder mira si que toy enredado hice un link para este caso

http://www.peruforless.com/budgetTou...s_arequipa.htm , esta pagina contienes el boton <a href="#" onClick="MM_openBrWindow('../recomendar_friend.asp','reco','width=347,height=44 4')"><img src="../images/b_enviar1.gif" width="112" height="30" border="0"></a> , el formulario sale pero al enviar no envia la url de la apgina e donde clcikeee , la web esta en linea prubalo siqueires , ahi estyo utilizando el poput, te dare parte del codigo del asp

recomendar_friend.asp

<%If request.form("enviar") = "" then
link=request.servervariables("HTTP_REFERER")%>
<FORM METHOD="POST" ACTION="recomendar_friend.asp">
<TABLE WIDTH="300" BORDER="0" CELLSPACING="0" CELLPADDING="0"
ALIGN="center">
<TR> .......
......

<P ALIGN="CENTER">
<%strHost = "mail.peruforless.com"
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = strHost
Mail.From = "[email protected]"

Mail.FromName = request.form("nombre")

Mail.AddReplyTo request.form("tuemail")

'response.write request.form("email1")

Mail.AddAddress request.form("email1")
titulo=Request.form("")&" peruforless.com "
Mail.Subject = titulo
Mail.IsHTML = True

mensaje="<html><head>"
mensaje=mensaje & "<title>Recommend a Friend</title>"&vbcrlf
mensaje=mensaje & " </head><body><div align=center>"&vbcrlf
mensaje=mensaje & " <center>"&vbcrlf
mensaje=mensaje & " <table width=405 border=0 cellpadding=0 cellspacing=1 bgcolor=#999999>"&vbcrlf
mensaje=mensaje & " <tr><td bgcolor=#FFFFFF>"&vbcrlf
mensaje=mensaje & " <a href=http://www.peruforless.com>"&vbcrlf
mensaje=mensaje & " <img border=0 src=http://www.peruforless.com/images/cabe_mail.jpg width=405 height=99></a></td></tr>"&vbcrlf
mensaje=mensaje & " <tr> <td bgcolor=#FFFFFF>"&vbcrlf
mensaje=mensaje & " <table border=0 width=390 align=center>"&vbcrlf
mensaje=mensaje & " <tr><td><br><br><font color=#FF0000>Hi!<b>"&request.form("nombreamigo")& "</font></b><br>"&vbcrlf
mensaje=mensaje & " <p>Your friend: <b><font color=#000000>"& Request.form("Nombre")&" </font></b>(<font color=#000000><a href=mailto:"&request.form("tuemail")&">"&vbcrlf
mensaje=mensaje & request.form("tuemail")&"</a></font>)&nbsp;"&vbcrlf
mensaje=mensaje & " it recommends to you that you visit:</p>"&vbcrlf
mensaje=mensaje & " <p size=4><a href="&Request.form("link")&">"&Request.form("link ")&"</a></p>"&vbcrlf
mensaje=mensaje & " <p>Comments to you that:"&vbcrlf
mensaje=mensaje & " </td></tr></table>"&vbcrlf
mensaje=mensaje & " <div align=justify>"&vbcrlf
mensaje=mensaje & " <table border=0 width=390 bgcolor=#FFFFFF align=center>"&vbcrlf
mensaje=mensaje & " <tr><td><br><b>"&Request.form("comentarios")&"</td>"&vbcrlf
mensaje=mensaje & " </tr> </table></b> </div>"&vbcrlf
mensaje=mensaje & " <p align=center><img border=0 src=http://www.peruforless.com/images/hotel_puntos02.gif ></p>"&vbcrlf
mensaje=mensaje & " <center>Message sent from <a href=http://www.peruforless.com>http://www.peruforless.com</a><br>"&vbcrlf
mensaje=mensaje & " Texas USA<br><br></center></body></html>"&vbcrlf

Mail.Body = mensaje
Mail.Send %>
<%End If%>
</span>...


cuando utilizo en este caso el poput no manda lo del link actual manda lo demas menos el link actual, gracias saludos.