Busca CEP e traz o logradouro?

[RCM 0]

Boa tarde, eu peguei um código no www.republicavirtual.com.br.

Quando eu coloco determinado CEP que existe nos correios, ele mostra falha ao buscar.

 

por exemplo voce coloca isso:

http://republicavirtual.com.br/web_cep.php...amp;formato=xml

 

retorna isso:

<?xml version="1.0" encoding="iso-8859-1" ?>

- <webservicecep>

<resultado>1</resultado>

<resultado_txt>sucesso - cep completo</resultado_txt>

<uf>DF</uf>

<cidade>Sobradinho</cidade>

<bairro>Sobradinho</bairro>

<tipo_logradouro>Condomínio</tipo_logradouro>

<logradouro>Império dos Nobres</logradouro>

</webservicecep>

 

porém da erro, não mostra na pagina, alguém poderia me ajudar por favor?

[Maux 0]

http://www.google.com.br/search?hl=pt-BR&a...p+asp&meta=

sirva-se

[jrcardozo 4]

se você disser ual o erro a gente pode te ajudar. Como está recuperando esse xml?

[RCM 0]

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

 

 

O erro: Falha ao buscar o cep

 

por exemplo o cep: 73252900 existe mais dá o erro.

[Mcliano 0]

Esse CEP não existe no banco de dados da Republica Virtual, por isso da erro, você pode criar uma rotina para retornar no seu formulario ou consulta que o cep não foi encontrado no banco de dados.

 

Esse CEP não existe no banco de dados da Republica Virtual, por isso da erro, você pode criar uma rotina para retornar no seu formulario ou consulta que o cep não foi encontrado no banco de dados.

[hargon 64]

Opa, vlw pelo toque, mas esse tópico está um pouco antigo. http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

[Ted k' 126]

pelo tempo....

 

na locaweb tem um componente que funciona perfeitamente!!!