Componente Correio.Cep

[Clauido José 3]

Bom dia pessoal estou aqui de novo eu tenho uma busca de cep no meu site que e utilizo o componente do correio.cep bom ele funciona ok so que estou implementando se o usuario nao saber o cep dele ai ele entra em outra tela que ele informa a Uf, Cidade, Tipo de logradouro (rua,alameda,avinida), o endereço e tem que trazer a lista de ceps com esse dados informados, nao sei como fazer ja procurei as documentações e nao econtrei nada so com vou postar como estou fazendo.

 

<%
uf = Request("uf") 
Cid = Request("Cid") 
tipo = Request("tipo") 
logra = Request("tipo") 

Set CEP_obj = CreateObject("Correios.CEP") 
CEP_obj.EncontraCEP(uf,Cid,tipo,tipo) 

If CEP_obj.Erro = 0 Then 
endereco = CEP_obj.Endereco 
bairro = CEP_obj.Bairro 
cidade = CEP_obj.Cidade 
estado = CEP_obj.Estado 
myVal=endereco + "|" + bairro + "|" + cidade + "|" + estado

Else 
erro_descricao = CEP_obj.DescricaoErro 
myVal=1
End If 
Set CEP_obj = Nothing 

%>

[xanburzum 169]

voce pode usar o webservice dos correios

 

<%  '    
 '  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( "29108048" )   

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   
%>

[Patrique 0]

Esse tipo de dúvida se tira com a documentação, você tem que ver se esse tipo de requisição é permitida, sendo permitida você irá ter a certeza de que funciona e assim poderá fazer testes sabendo que é possível e assim não vai testando N funções que ao final sempre vai da erro caso esse tipo de requisição não seja permitida.

[Clauido José 3]

Hehe andei vendo na locaweb parece que esse que eles nao trabalham mais com esse componenete vou ter que ver o componente do correio hehe que saco rs.

 

Se possivel alguem tem alguma coias a respeito que possa me ajudar?

[Patrique 0]

Esse tipo de requisição não tem necessidade de componente uma vez que depender de componente é algo que se tem que pensar muito, pois pode acontecer isso.

 

Faça uma busca na net que você encontrara banco de dados de CEP busque por uma base de 2010 e monte o script em cima dela, assim fica mais fácil.

[Clauido José 3]

Entendi mas sera que encontro uma base atualizada com cep do brasil inteiro?

[Patrique 0]

Sim encontra, estou na dúvida se é permitido isso aqui no fórum, pois estou na duvida se é ou não legal, caso não seja não podemos tratar aqui, mas da uma busca ai na net que você encontrara um monte, geralmente os completos vem com o tamanho mais ou menos de 80MB pra cima.

[Clauido José 3]

Opa valeu patrique vou dar um busca no pai google rs, bom xanbumzum esse codigo faz a busca pelo cep né se entendi, bom eu preciso colocar no site por exemplo se cara nao sabe qual o cep dele entao ele tem que informar a cidade o estado e tipo de logradouro e logradouro como faço isso?

 

Opa beleza bom dia consegui achar uma base de cep de 2010 otima vou ate postar aqui para quem precisa esta em arquivo sql só importar para o banco valeu resolvi essa, bom existe alguma maneira de anexar arquivo por aqui se alguem precisa so manda um topico que eu mando

[rohde 3]

opa posta o arquvo ai pra nois :D

[Clauido José 3]

ai vai ele desculpa a demora mas ta ai uma tabela de ceps atualizada 2010 pra quem precisar resolvi essa

 

cep.sql

[~Thiago Lara 0]

Bom, eu não recomendo utilizar esse script aí não, seu sistema vai ficar obsoleto em menos de 6 meses, visto que os Correios realizam manutenção constante em sua base de dados...

 

Eu também hospedo na Locaweb e tenho o meu componente de busca funciona direitinho com o CEP informado, porém nunca testei pra buscar o CEP não, mas com certeza tem algo parecido no wiki da Locaweb..

 

 

Abs

[xanburzum 169]

quem quiser para fins didáticos, me envie um email no xanburzum@msn.com, que tenho o arquivo