Indique um amigo, erro no formulário
Bom, dia pessoal, estou tentando inserir no site um formulário de indique um amigo, mas não estou conseguindo, são dois arquivos um ind.html e o outro indique.asp, MAS NÃO ENVIA,
VEJAM:
http://www.1000000pixelsdehoteiseturismo.com/ind.html
Por favor me ajudem, segue abaixo os co´digos:
ind.html--------------------------------
-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<title>Documento sem título</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body>
<p><img src="img_geral/indique.jpg" width="240" height="39"></p>
<hr>
<form action = " indique.asp" method="post">
<strong> <font color="#0066CC" size="2" face="Verdana, Arial, Helvetica, sans-serif">Preencha os campos abaixo e indique a um amigo: </font></strong>
<font color="#0066CC" size="2" face="Verdana, Arial, Helvetica, sans-serif"><br>
<b>Seu Nome:</b>
<input type="text" name="remetente" size= "30">
<br>
<b>E-mail do seu amigo:</b>
<input type = "text" name= "destinatario" size = "26">
<input type = hidden name="pagina" value = "[http://www.1000000pixelsdehoteiseturismo.com">](http://www.1000000pixelsdehoteiseturismo.com%22)
<input type = submit value= "Indique este site a um amigo!">
</font>
</form>
</body>
</html>
</body>
</html>
</body>
</html>
--------------------
Agora o indique.asp
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<title>Documento sem título</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body>
<%
'confira as variáveis da mensagem
str_nome = trim(request.form("nome"))
str_remetente = trim(requesr.form("remetente"))
str_destinatario = trim(resquest.form("destinatario
str_assunto = " www.1000000pixelsdehoteiseturismo.com"
endereco = request.form("http://www.1000000pixelsdehoteiseturismo.com")
str_mensagem = "Acessei este site e achei interessante : < a href = "& endereco & "> " & endereco & "</a>"
'Envia a mensagem
set mensagem = server.createobject("CDONTS.NewMail")
mensagem.from = str_nome & "<" & str_remetente & ")"
mensagem.to = str_destinatario
mensagem.Subject = str_assunto
mensagem.bodyformat = 0
mensagem.mailformat = 0
mensagem.Body = str_mensagem
mensagem.Send
'Informa o que foi enviado
response.write "<b> Dados da mensagem </b>"
response.write "<br><i> Remetente: </i> " & str_nome & " - " & str_remetente &
response.write " <br><i> Destinatário: </i> " & str_destinatario
response.write "<br><i> Assunto: </i> " & str_assunto
response.write "<br><i> Mensagem: </i> " & str_mensagem
response.write "<br><h2> Mensagem enviada com sucesso</h2>
response.write "<br><strong><a href=" & endereco & " "> Clique aqui para voltar! </a></strong>"
%></body>
</html>
-------------
Desde já agradeço a ajuda dos amigos......
Discussão (5)
Carregando comentários...