Ir para conteúdo

POWERED BY:

Arquivado

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

AspMan

ASP e AJAX

Recommended Posts

Boa noite pessoas,

 

estou com uma dúvida aqui, é o seguinte, tenho uma página de cadastro e nela tem busca de CEP com retorno sincronizado... AJAX né..rs

Pois é... pra mim pegar o CEP, eu sempre faço um submit...

 

A questão é o seguinte, toda vez que faço o submit pra rodar a página q busca o CEP, todos os dados já preenchidos do form vão pro beleléu...

 

Tem como eu fazer uma requisição usando xmlhttp dentro de outra?...

 

a requisição q faço do CEP é da Republica Virtual.. vou postar o código;

<!--"CadCep.asp"-->



<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">

<% ON ERROR RESUME NEXT  '	
  '  Função de busca de Endereço pelo CEP	
  '  -   Desenvolvido Felipe Olivaes para ajaxbox.com.br	
  '  -   Adaptação de exemplo para utilização com ASP por Otávio Nogueira   
  '  -   Utilizando WebService de CEP da republicavirtual.com.br	
  '   
  
dim i, sT, sR

 function busca_cep( cep )   
  
	url = "http://republicavirtual.com.br/web_cep.php?cep="& cep &"&formato=query_string"  
	   
	set xmlhttp = CreateObject("MSXML2.ServerXMLHTTP")	
	xmlhttp.open "GET", url, false	
	xmlhttp.send ""  
		
	xmlhttp_resultado = xmlhttp.responseText	
	set xmlhttp = nothing	
  
	arr_resultado = split( xmlhttp_resultado, "&" )   
  
	dim resultado(7)   
	for i = lbound( arr_resultado ) to ubound( arr_resultado )   
  
		resultado( i ) = arr_resultado( i )  
		  
	next   
  
	arr = split( join( resultado, "=" ), "=" )   
  
	dim arr_2(14)   
	for i = lbound( arr ) to ubound( arr )   
  
		arr_2( i ) = replace( arr( i ), "+", " " )
 
   next	   
	   
	busca_cep = arr_2   
end function   
  
 '	
 ' Exemplo de utilização	 
 '	 
	  
 'Vamos buscar o CEP 90020022	
 CEP=request.form("CobCep")
resultado = busca_cep( CEP )   

'VALIDAR OS CARACTERES ESPECIAIS RECEBIDO POR QUERY

  
select case resultado( 2 )   
 
 
	   
	case "2"  
	texto = " "&_   
		 "<br>Cidade com logradouro único" &_	
		 "<br><b>Cidade: </b> "&resultado( 8 ) &" "&_   
		 "<br><b>UF: </b> "&resultado( 5 )   
	case "1"  
	texto = " "&_   
		 "<br>Cidade com logradouro completo "&_   
		 "<br><b>Tipo de Logradouro: </b> "&resultado( 12 ) &" "&_   
		 "<br><b>Logradouro: </b> "&resultado( 14 ) &" "&_   
		 "<br><b>Bairro: </b> "&resultado( 10 ) &" "&_	
		 "<br><b>Cidade: </b> "&resultado( 8 ) &" "&_   
		 "<br><b>UF: </b> "&resultado( 6 )   
	
	   case else   
  
	texto = "Falha ao buscar cep: "& resultado( 4 )   
end select	
'response.write texto   
%>

 

Tem como eu executar isso sem precisar fazer um submit?

 

meu form ta assim

 

<!--FORMULARIO CADASTRO.ASP-->


 <form name="form" method="post" action="Cadastro.asp">
<% if request.form("enviar")="send" then%>
<!--#include file="CadCep.asp"-->
<%if CIDADE="" then
msg2="CEP Inválido."
funcaocep=1
else
session("cadcidade")=CIDADE
session("cadestado")=UF
session("cadendereco")=LOGRAD
session("cadtipoendereco")=TIPOLOGR
session("cadbairro")=BAIRRO
session("cadcep")=request.Form("CadCep")
end if
end if%>
CEP:   <input name="CobCep" type="texto" class="box-buscar" id="CobCep" size="30" >				  
				  <input type="submit" value="Pesquisar" class="box-buscar-OK">
				  <input type="hidden" value="send" name="enviar"></FORM>

Quem poder ajudar... vlw desde já...

Compartilhar este post


Link para o post
Compartilhar em outros sites

augustoclaro, exatamente isso...

 

Hoje está assim, eu clico no botão, a página faz um refresh e os dados aparece no local q quero... porém eu quero clicar no botão e a página não dar o refresh, ja aparecer o resultado.... ou então, digitar o CEP e ao sair do campo, ele já carregar... sem precisar clicar no botão.

 

tanto faz, um quanto outro... vlw...

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

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