hola a todos desde un html hay un boton gif (recomienda la web a un amigo) que al dar click llama a un poput asp donde hay un formulario que lo que haces es mandar la pagina actual de donde has clcikeado el boton y toda la cosa. el asunto es queme dado cuenta que la variable de de la pag. a enviar al correo no pasa cuando es un poput. pero tb lo porbe sin poput y todo funciona muy bien por eso creo que al hacer el poput parece que se pierde la variable link=request.servervariables("HTTP_REFERER")%>, no so experto en asp por eso te pido tu ayuda ya que este codigo me lo io un amigo y lo adpte a mi diseno,,
-te voy pasar e codigo del html que lama al poput
<a href="#" onClick="MM_openBrWindow('../recomendar_friend.asp','recomienda','width=398,hei ght=434')"><img src="../images/b_enviar.gif" width="112" height="30" border="0"></a>
- aqui va el asp
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<title>Recommends</title>
<style type="text/css">
<!--
body {
margin-left: 0px;
margin-top: 0px;
margin-right: 0px;
margin-bottom: 0px;
}
.Estilo9 {color: #3c78bd}
.Estilo12 {font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 10px; color: #3c78bd; }
-->
</style>
</head>
<body>
<TABLE WIDTH=347 HEIGHT=444 BORDER=0 align="center" CELLPADDING=0 CELLSPACING=0 ID="Tabla_01">
<TR>
<TD WIDTH=347 HEIGHT=11 COLSPAN=3></TD>
</TR>
<TR>
<TD WIDTH=14 HEIGHT=421></TD>
<TD WIDTH=321 HEIGHT=421 valign="top"><TABLE ID="Tabla_01" WIDTH=321 HEIGHT=421 BORDER=0 CELLPADDING=0 CELLSPACING=0>
<TR>
<TD COLSPAN=3>
<IMG SRC="images/cabe_recomendar.gif" WIDTH=321 HEIGHT=108 ALT=""></TD>
</TR>
<TR>
<TD COLSPAN=3>
<IMG SRC="images/titu_recomendar.gif" WIDTH=321 HEIGHT=31 ALT=""></TD>
</TR>
<TR>
<TD WIDTH=7 HEIGHT=266 background="images/f_recomen_izq.gif"></TD>
<TD WIDTH=308 HEIGHT=266 valign="top"><table width="308" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td bgcolor="#000000"><table width="308" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td bgcolor="#FFFFFF"><span class="Estilo9">
<%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>
<TD COLSPAN="3"><br>
<DIV ALIGN="center"> <font color="#000000" size="1" face="Verdana, Arial, Helvetica, sans-serif"> <b>Tell a friend about this page. <br>
</b></font></DIV>
<DIV ALIGN="center"> </DIV></TD>
</TR>
<TR>
<TD WIDTH="120" height="30" class="Estilo12">Your name</font></TD>
<TD WIDTH="5"><FONT COLOR="#000000" FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"> </FONT></TD>
<TD WIDTH="175"><input type="text" NAME="Nombre" style="font-size:11px; background-color:#FCF6E7; font-family:verdana;color:#3c78bd; BORDER-RIGHT: #84A4C8 1px solid; BORDER-TOP: #84A4C8 1px solid; BORDER-LEFT: #84A4C8 1px solid; WIDTH: 170px; height: 18px; BORDER-BOTTOM: #84A4C8 1px solid" maxlength="65"></TD>
</TR>
<TR>
<TD height="30"><span class="Estilo12">Your e-mail</span></TD>
<TD WIDTH="12"><FONT COLOR="#000000" FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"> </FONT></TD>
<TD><INPUT TYPE="text" NAME="tuemail" style="font-size:11px; background-color:#FCF6E7; font-family:verdana;color:#3c78bd; BORDER-RIGHT: #84A4C8 1px solid; BORDER-TOP: #84A4C8 1px solid; BORDER-LEFT: #84A4C8 1px solid; WIDTH: 170px; height: 18px; BORDER-BOTTOM: #84A4C8 1px solid" maxlength="65"></TD>
</TR>
<TR>
<TD height="30"><span class="Estilo12">Name of your friend</span></TD>
<TD WIDTH="12" rowspan="2"><FONT COLOR="#000000" FACE="Verdana, Arial, Helvetica, sans-serif" SIZE="2"> </FONT></TD>
<TD><input type="text" name="nombreamigo" style="font-size:11px; background-color:#FCF6E7; font-family:verdana;color:#3c78bd; BORDER-RIGHT: #84A4C8 1px solid; BORDER-TOP: #84A4C8 1px solid; BORDER-LEFT: #84A4C8 1px solid; WIDTH: 170px; height: 18px; BORDER-BOTTOM: #84A4C8 1px solid" maxlength="65">
</TD>
</TR>
<TR>
<TD height="30"><span class="Estilo12">E-mail of your friend</span></TD>
<TD><INPUT TYPE="text" NAME="email1" style="font-size:11px; background-color:#FCF6E7; font-family:verdana;color:#3c78bd; BORDER-RIGHT: #84A4C8 1px solid; BORDER-TOP: #84A4C8 1px solid; BORDER-LEFT: #84A4C8 1px solid; WIDTH: 170px; height: 18px; BORDER-BOTTOM: #84A4C8 1px solid" maxlength="65"></TD>
</TR>
<TR>
<TD height="73"><span class="Estilo12">Comment on<br>
this page:</span></TD>
<TD WIDTH="12"></TD>
<TD><textarea rows="4" name="comentarios" cols="25" style="font-size:11px; background-color:#FCF6E7; font-family:verdana;color:#3c78bd; BORDER-RIGHT: #84A4C8 1px solid; BORDER-TOP: #84A4C8 1px solid; BORDER-LEFT: #84A4C8 1px solid; BORDER-BOTTOM: #84A4C8 1px solid"></textarea>
</TD>
</TR>
<TR><TD COLSPAN="3" HEIGHT="50"><center><input type="hidden" name="enviar" size="2" value="SI"><input type="hidden" name="link" size="20" value="<%=link%>"><INPUT TYPE="submit" NAME="sub" VALUE="Send"></center></TD></TR></TABLE></FORM>
<%End If%>
<%If request.form("enviar") = "SI" then%>
<p>
</span>
<P ALIGN="CENTER"><span class="Estilo34"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"> <br>
<br>
<br>
Sent email, Thanks To recommend Our Site. <br>
</font></span><strong><font size="2" face="Verdana, Arial, Helvetica, sans-serif">
<div align="center">http://www.peruforless.com</div>
</font></strong>
<div align="center"><span class="Estilo34"></span></div>
<span class="Estilo34"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"><br>
<br>
</font></span><font size="2" face="Verdana, Arial, Helvetica, sans-serif">
<P ALIGN="CENTER"><span class="Estilo34"> <a href="javascript:close();">Close window</a></span></P>
</font>
<span class="Estilo9">
<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("")&" Te Recomienda un Articulo de peruforless.com "
Mail.Subject = titulo
Mail.IsHTML = True
mensaje="<html><head>"
mensaje=mensaje & "<title>Recomendacion</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>) "&vbcrlf
mensaje=mensaje & " te recomienda que visites:</p>"&vbcrlf
mensaje=mensaje & " <p size=4><a href="&Request.form("link")&">"&Request.form("link ")&"</a></p>"&vbcrlf
mensaje=mensaje & " <p>Además te Comenta que:"&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>Mensaje enviado desde <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></td>
</tr>
</table></td>
</tr>
</table></TD>
<TD WIDTH=6 HEIGHT=266 background="images/f_recomen_der.gif"></TD>
</TR>
<TR>
<TD COLSPAN=3>
<IMG SRC="images/abj_recomendar.gif" WIDTH=321 HEIGHT=16 ALT=""></TD>
</TR>
</TABLE></TD>
<TD WIDTH=12 HEIGHT=421></TD>
</TR>
<TR>
<TD WIDTH=347 HEIGHT=12 COLSPAN=3></TD>
</TR>
</TABLE>
</body>
</html>
*** dicho codigo me funciona bien cuando lo utilizo sin el poput saludos un abrazo alli te mando la url de mi web que aplique el codigo pero ahportia esta en el modo sin poput por eso funciona buen, con poput no manda el url manda todo menos el url.
http://www.peruforless.com/budgetTou...s_arequipa.htm