Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Bruno Bim

Problemas com Passagem de Parametros

Por , em ASP Clássico

Recommended Posts

Bruno Bim    0

Bruno Bim
Postado

Ae pessoal, estou com um probleminha aqui no meu codigo, veja:

 

preciso submeter o formulario para a mesma pagina passando um parametro, muitissimo simples, mas ele da o erro que a pagina nao existe, e na verdade a pagina existe, vou postar meu codigo auqi pra vcs verem o que tem de errado, pois ano sei mais o que fazer, pra mim esta certo.

 

 

Erro:The page cannot be found The page you are looking for might have been removed, had its name changed, or is temporarily unavailable.

meu codigo<!--#include file="includes/inc_abreconexao.asp"--><!--#include file="includes/inc_verificausu.asp"--><%		formdados = request.querystring("formdados")	corrigir = request.querystring("corrigir")	cepDestino = request.form("cepDestino")	dados = request.form("dados")		if not isnumeric(erro) then		response.redirect("ferte.asp")	end ifif dados = "1" then			Nome = replace(request.form("nome_form"),",","")		Nome = replace (Nome,"'","")		Nome = replace (Nome,"-","")		Nome = replace (Nome,"&","")		Endereco = replace(request.form("Endereco_form"),"'","")		Endereco = replace (Endereco,"-","")		Endereco = replace (Endereco,"&","")		Cidade = replace(request.form("Cidade_form"),"'","")		Cidade = replace (Cidade,"-","")		Cidade = replace (Cidade,"&","")			UF = replace(request.form("UF_form"),"'","")		UF = replace (UF,"-","")		UF = replace (UF,"&","")		CEP = Session("CEPDestino")		Telefone = replace(request.form("Telefone_form"),"'","")		Telefone = replace (Telefone,"-","")		Telefone = replace (Telefone,"&","")		Data = date						Session("Nome") = Nome		Session("Endereco") = Endereco		Session("Cidade") = Cidade		Session("UF") = UF		Session("Telefone") = Telefone		Session("Data") = convData(Data)					response.redirect("recibo.asp")			end if	SQL="Select Produtos.Peso_Pro, "&_	" Iten_Pedidos.QTD_Pro "&_	" FROM Produtos inner Join Iten_Pedidos "&_	" ON Produtos.ID_Pro = Iten_Pedidos.Id_Pro "&_	" WHERE ID_Ped = " & Session("Cod_Pedido")	set recset = conexao.execute(SQL)		if recset.eof then		a=0	else		a=1		vetLista = recset.getrows	end if	%><!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"><link rel="stylesheet" href="estilo.css" type="text/css"><script>				function somente_numero(campo){			var digits="0123456789"			var campo_temp 			for (var i=0;i<campo.value.length;i++){			  campo_temp=campo.value.substring(i,i+1)				  if (digits.indexOf(campo_temp)==-1){					campo.value = campo.value.substring(0,i);					break;			   }			}		}	function Verifica(){				var CepDestino = document.form.cepDestino.value;				if (CepDestino == ""){			alert("Preencha o cep");			return false;		}		return true;	}	</script><style>}.alerta{	font-family:Arail;	font-size:14px;	color:red;}.TextBox{	color:#30667F;	background-color:#F0F0E5;	font-size:11px;	font-family:Verdana;	border-left: 1px solid #DDD2C6;;	border-right: 1px solid #DDD2C6;;	border-top: 1px solid #DDD2C6;;	border-bottom: 1px solid #DDD2C6;}.Botao{	border-left: 1px solid #5a4231;	border-right: 1px solid #5a4231;	border-top: 1px solid #5a4231;	border-bottom: 1px solid #5a4231;	color:#5a4231;	font-family:Verdana;	font-size:11px;	background-color:#EDEEC2;}</style></head><body><form action="http://www.correios.com.br/encomendas/precos/calculo.cfm" method="get" name="form" onSubmit="return Verifica()">  <input type="Hidden" name="resposta" value="http://www.engenhodeimagens.com.br/marbor/loja/retornosedex.asp"><input type="Hidden" name="cepOrigem" value="03112090"><input type="Hidden" name="servico" value="40010">  <table width="449" align="center" id="Table1">	<tr> 	  <td width="190" height="23"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"> </font></td>	</tr>	<tr> 	  <td><div align="right"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"><strong>Digite 		  seu cep:</strong></font></div></td>	  <td> 		<input type="text" name="cepDestino" value="<%=Session("CEPDestino")%>" id="cepDestino2" size="9" maxlength="8" onKeyUp="java script:somente_numero(this);" class="TextBox">		<span class="alerta">(somente números)</span></td>	</tr>	<tr>	  <td> </td>	  <td> </td>	</tr>	<tr> 	  <td><font size="2" face="Verdana, Arial, Helvetica, sans-serif">  </font></td>	  <td><div align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"> 		  <input type="submit" name="Submit" value="Enviar" id="Submit1" class="botao">		  </font></div></td>  </table>  <table border="0" cellspacing="1" cellpadding="1" width="577" height="34">	<%re   	Peso = 0		Peso1 = 0	Peso2 = 0	for i=LBound(vetLista,2) to UBound(vetLista,2)					Peso = Peso + vetLista(0,i) * vetLista(1,i)	'		response.write "peso "					  	'response.write peso &"<BR>"	next	'response.write "Total dos pesos="& peso	'response.end	%><input type="Hidden" name="peso" value="<%=replace(Peso,",",".")%>"></form><%if formdados = 1 then%><form name="formdados" method="post" action="dadospedido.asp?dados=1" onSubmit="return Verifica()">  <div align="center">	<table width="574" border="0" cellspacing="3" cellpadding="0">	  <tr> 		<td colspan="2"> </td>	  </tr>	  <tr> 		<td colspan="2"><div align="center"><strong><font size="2" face="Arial, Helvetica, sans-serif">DADOS 			DA ENTREGA</font></strong></div></td>	  </tr>	  <tr> 		<td width="168" height="20"><div align="right"><strong><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Nome:</font></strong></div></td>		<td width="397"><input name="nome_form" type="text" id="nome_form" size="40" class="TextBox" value="<%=Session("Nome")%>"> 		  <font color="#FF0000" size="2" face="Arial, Helvetica, sans-serif"><em>*</em></font></td>	  </tr>	  <tr> 		<td><div align="right"><strong><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Endereço:</font></strong></div></td>		<td><input name="endereco_form" type="text" class="TextBox" id="endereco_form" value="<%=Session("Endereco")%>" size="40"> 		  <font color="#FF0000" size="2" face="Arial, Helvetica, sans-serif"><em>*</em></font> 		</td>	  </tr>	  <tr> 		<td><div align="right"><strong><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Cidade:</font></strong></div></td>		<td><input name="cidade_form" type="text" class="TextBox" id="cidade_form" value="<%=Session("Cidade")%>" size="40"> 		  <font color="#FF0000" size="2" face="Arial, Helvetica, sans-serif"><em>*</em></font></td>	  </tr>	  <tr> 		<td height="24"> <div align="right"><strong><font size="2" face="Verdana, Arial, Helvetica, sans-serif">UF:</font></strong></div></td>		<td><input name="uf_form" type="text" class="TextBox" id="uf_form" value="<%=Session("UF")%>" size="3" maxlength="2"> 		  <font color="#FF0000" size="2" face="Arial, Helvetica, sans-serif"><em>*</em></font></td>	  </tr>	  <tr> 		<td><div align="right"><strong><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Telefone:</font></strong></div></td>		<td><input name="telefone_form" type="text" class="TextBox" id="telefone_form" onKeyUp="java script:somente_numero(this);" value="<%=Session("Telefone")%>" size="10"> 		  <font color="#FF0000" size="2" face="Verdana, Arial, Helvetica, sans-serif"> </font><font color="#FF0000" size="2" face="Arial, Helvetica, sans-serif"><em>*</em></font></td>	  </tr>	  <tr> 		<td> </td>		<td><div align="right"><span class="alerta">* Campos obrigatórios</span>         </div></td>	  </tr>	  <tr> 		<td colspan="2"><div align="center"> 			<input type="submit" name="Submit" value="Gravar dados" class="botao">		  </div></td>	  </tr>	</table>  </div></form><div align="center">  <%end if%></div></body></html><!--#include file="includes/inc_fechaconexao.asp"-->

Compartilhar este post

Link para o post
Compartilhar em outros sites

sr.silva    1

sr.silva
Postado

Para recuperar os parametros que são passados via GET e necessário usar o Request.QueryString

 

Pelo que vi, você não esta fazendo isso, ocasionando o erro!!

 

Troque essa Linha.

dados = request.form("dados")

Por essa.

dados = request.QueryString("dados")

[]´s

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.

  Aceito