Ir para conteúdo
  • Cadastre-se

dev botao

Seja bem-vindo
Regras e orientações da nossa comunidade Participe do Discord do ACBr

ACBrConsultaCNPJ Erro na consulta

manschein

Por manschein
em ACBrTCP

 Compartilhar
Ver Solução Respondido por Daniel Simoes,
  • Este tópico foi criado há 1689 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

manschein Enthusiast

manschein

Postado
Postado

Estou com esse erro na consulta do CNPJ: Erro na Consulta. Atualize o Captcha.

Mesmo atualizando continua o mesmo erro, e começou a acontecer isso ontem, até então esta funcionando normalmente.

Dei uma procurada no forum e não achei nada parecido com esse erro.

Agradeço a ajuda.

Capture.PNG

SHDW Collaborator

SHDW

Postado
Postado

Consegui fazer funcionar o captcha e a consulta, mas o retorno está vindo estranho, parece outra pagina, que não tem os dados da consulta.

Talvez, sejam novos parametros a serem passados.

Dempsey Enthusiast

Dempsey

Postado
Postado
3 minutos atrás, SHDW disse:

Consegui fazer funcionar o captcha e a consulta, mas o retorno está vindo estranho, parece outra pagina, que não tem os dados da consulta.

Talvez, sejam novos parametros a serem passados.

O quê você fez?

  • Membros Pro
jaques.rocha Collaborator

jaques.rocha

Postado
  • Membros Pro
Postado

Alguem já conseguiu corrigir para passar pra gente como fez ? estou a um tempo tentando corrigir mas não estou conseguindo

troquei o caminho do captcha  no ACBrConsultaCNPJ de:

HTTPGet('https://www.receita.fazenda.gov.br/pessoajuridica/cnpj/cnpjreva/captcha/gerarCaptcha.asp');  // GetCaptchaURL

para:

HTTPGet('https://servicos.receita.fazenda.gov.br/Servicos/cnpjreva/captcha/gerarCaptcha.asp');  // GetCaptchaURL

tentei alterar esses abaixo tambem,  mas dá erro

HTTPSend.Headers.Add('Referer: https://www.receita.fazenda.gov.br/pessoajuridica/cnpj/cnpjreva/Cnpjreva_solicitacao3.asp');
HTTPPost('https://www.receita.fazenda.gov.br/pessoajuridica/cnpj/cnpjreva/valida.asp');
 

Renato Gil Apprentice

Renato Gil

Postado
Postado

Bom dia pessoa, fiz um teste aqui e aparentemente está funcionando.

na unit acbrconsultacnpj.pas alterei as seguintes linhas:

//    HTTPGet('https://www.receita.fazenda.gov.br/pessoajuridica/cnpj/cnpjreva/captcha/gerarCaptcha.asp');  // GetCaptchaURL
    HTTPGet('https://servicos.receita.fazenda.gov.br/Servicos/cnpjreva/captcha/gerarCaptcha.asp');  // GetCaptchaURL

e

//    HTTPSend.Headers.Add('Referer: https://www.receita.fazenda.gov.br/pessoajuridica/cnpj/cnpjreva/Cnpjreva_solicitacao3.asp');
//    HTTPPost('https://www.receita.fazenda.gov.br/pessoajuridica/cnpj/cnpjreva/valida.asp');
    HTTPSend.Headers.Add('Referer: https://servicos.receita.fazenda.gov.br/Servicos/cnpjreva/Cnpjreva_solicitacao3.asp');
    HTTPPost('https://servicos.receita.fazenda.gov.br/Servicos/cnpjreva/valida.asp');

 

  • Curtir 3
Roberto Krug Newbie

Roberto Krug

Postado
Postado
21 minutos atrás, Renato Gil disse:

Bom dia pessoa, fiz um teste aqui e aparentemente está funcionando.

na unit acbrconsultacnpj.pas alterei as seguintes linhas:

//    HTTPGet('https://www.receita.fazenda.gov.br/pessoajuridica/cnpj/cnpjreva/captcha/gerarCaptcha.asp');  // GetCaptchaURL
    HTTPGet('https://servicos.receita.fazenda.gov.br/Servicos/cnpjreva/captcha/gerarCaptcha.asp');  // GetCaptchaURL

e

//    HTTPSend.Headers.Add('Referer: https://www.receita.fazenda.gov.br/pessoajuridica/cnpj/cnpjreva/Cnpjreva_solicitacao3.asp');
//    HTTPPost('https://www.receita.fazenda.gov.br/pessoajuridica/cnpj/cnpjreva/valida.asp');
    HTTPSend.Headers.Add('Referer: https://servicos.receita.fazenda.gov.br/Servicos/cnpjreva/Cnpjreva_solicitacao3.asp');
    HTTPPost('https://servicos.receita.fazenda.gov.br/Servicos/cnpjreva/valida.asp');

 

Fiz aqui e deu certo... muito obrigado...

 

  • Curtir 1
eduardowak Newbie

eduardowak

Postado
Postado
41 minutos atrás, Renato Gil disse:

Bom dia pessoa, fiz um teste aqui e aparentemente está funcionando.

na unit acbrconsultacnpj.pas alterei as seguintes linhas:

//    HTTPGet('https://www.receita.fazenda.gov.br/pessoajuridica/cnpj/cnpjreva/captcha/gerarCaptcha.asp');  // GetCaptchaURL
    HTTPGet('https://servicos.receita.fazenda.gov.br/Servicos/cnpjreva/captcha/gerarCaptcha.asp');  // GetCaptchaURL

e

//    HTTPSend.Headers.Add('Referer: https://www.receita.fazenda.gov.br/pessoajuridica/cnpj/cnpjreva/Cnpjreva_solicitacao3.asp');
//    HTTPPost('https://www.receita.fazenda.gov.br/pessoajuridica/cnpj/cnpjreva/valida.asp');
    HTTPSend.Headers.Add('Referer: https://servicos.receita.fazenda.gov.br/Servicos/cnpjreva/Cnpjreva_solicitacao3.asp');
    HTTPPost('https://servicos.receita.fazenda.gov.br/Servicos/cnpjreva/valida.asp');

 

Exatamente isso, valeu amigo !!!

  • Fundadores
Daniel Simoes Grand Master

Daniel Simoes

Postado
  • Fundadores
Postado

Já está no SVN...  Obrigado @Renato Gil

Citar

-- ACBrConsultaCNPJ --
[-] Correção de URLs, após mudança no servidor da SEFAZ
    https://www.projetoacbr.com.br/forum/topic/55411-acbrconsultacnpj-erro-na-consulta/
[-] Correção para ler corretamente os CNAEs secundários
    (por: DSA, e Renato Gil)


                            

  • Curtir 4
Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

eduardowak Newbie

eduardowak

Postado
Postado
1 hora atrás, eduardowak disse:

Exatamente isso, valeu amigo !!!

quem precisar do receitaws como alternativa segue passos:

IdHttp1 := TidHTTP.Create;
IdHttp1.ProtocolVersion := pv1_0;
IdHttp1.Request.Accept := 'text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8';
IdHttp1.Request.UserAgent := 'Mozilla/3.0 (compatible; Indy Library)';


HtmlCode := IdHttp1.Get('https://www.receitaws.com.br/v1/cnpj/'+OnlyNumber(sCNPJ));
   HtmlCode :=Memo1.Text;

 RespHTTP.Text := IdHttp1.Get('https://www.receitaws.com.br/v1/cnpj/'+OnlyNumber(ACNPJ));

   if (Pos('situacao', HtmlCode) > 0) then
   begin
      FSituacao :=copy(HtmlCode,(Pos('"situacao":', HtmlCode)) , 200 );
      FSituacao :=copy(FSituacao,(Pos('"situacao":', FSituacao)+(Length('situacao')+5)),(Pos('",', FSituacao) )- (Length('situacao')+6));
   end;

   if (Pos('bairro', HtmlCode) > 0) then
   begin
      Fbairro :=copy(HtmlCode,(Pos('"bairro":', HtmlCode)) , 200 );
      Fbairro :=copy(Fbairro,(Pos('"bairro":', Fbairro)+(Length('bairro')+5)),(Pos('",', Fbairro) )- (Length('bairro')+6));
   end;

   if (Pos('logradouro', HtmlCode) > 0) then
   begin
      Flogradouro :=copy(HtmlCode,(Pos('"logradouro":', HtmlCode)) , 200 );
      Flogradouro :=copy(Flogradouro,(Pos('"logradouro":', Flogradouro)+(Length('logradouro')+5)),(Pos('",', Flogradouro) )- (Length('logradouro')+6));
   end;

   if (Pos('numero', HtmlCode) > 0) then
   begin
      Fnumero :=copy(HtmlCode,(Pos('"numero":', HtmlCode)) , 200 );
      Fnumero :=copy(Fnumero,(Pos('"numero":', Fnumero)+(Length('numero')+5)),(Pos('",', Fnumero) )- (Length('numero')+6));
   end;

 

assim por diante

  • Curtir 1
Danillo_Fernandes Newbie

Danillo_Fernandes

Postado
Postado
Em 18/12/2019 at 11:43, eduardowak disse:

quem precisar do receitaws como alternativa segue passos:

IdHttp1 := TidHTTP.Create;
IdHttp1.ProtocolVersion := pv1_0;
IdHttp1.Request.Accept := 'text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8';
IdHttp1.Request.UserAgent := 'Mozilla/3.0 (compatible; Indy Library)';


HtmlCode := IdHttp1.Get('https://www.receitaws.com.br/v1/cnpj/'+OnlyNumber(sCNPJ));
   HtmlCode :=Memo1.Text;

 RespHTTP.Text := IdHttp1.Get('https://www.receitaws.com.br/v1/cnpj/'+OnlyNumber(ACNPJ));

   if (Pos('situacao', HtmlCode) > 0) then
   begin
      FSituacao :=copy(HtmlCode,(Pos('"situacao":', HtmlCode)) , 200 );
      FSituacao :=copy(FSituacao,(Pos('"situacao":', FSituacao)+(Length('situacao')+5)),(Pos('",', FSituacao) )- (Length('situacao')+6));
   end;

   if (Pos('bairro', HtmlCode) > 0) then
   begin
      Fbairro :=copy(HtmlCode,(Pos('"bairro":', HtmlCode)) , 200 );
      Fbairro :=copy(Fbairro,(Pos('"bairro":', Fbairro)+(Length('bairro')+5)),(Pos('",', Fbairro) )- (Length('bairro')+6));
   end;

   if (Pos('logradouro', HtmlCode) > 0) then
   begin
      Flogradouro :=copy(HtmlCode,(Pos('"logradouro":', HtmlCode)) , 200 );
      Flogradouro :=copy(Flogradouro,(Pos('"logradouro":', Flogradouro)+(Length('logradouro')+5)),(Pos('",', Flogradouro) )- (Length('logradouro')+6));
   end;

   if (Pos('numero', HtmlCode) > 0) then
   begin
      Fnumero :=copy(HtmlCode,(Pos('"numero":', HtmlCode)) , 200 );
      Fnumero :=copy(Fnumero,(Pos('"numero":', Fnumero)+(Length('numero')+5)),(Pos('",', Fnumero) )- (Length('numero')+6));
   end;

 

assim por diante

O plano gratuito deles oferecem 3 consultas por minuto e 130.000 por mês, você sabe me informar se esse controle é feito por IP ou faixa de IP? Procurei essa informação no site deles porém não encontrei nada.

  • 3 meses depois ...
wanderok Enthusiast

wanderok

Postado
Postado
Em 17/12/2019 at 08:48, manschein disse:

Estou com esse erro na consulta do CNPJ: Erro na Consulta. Atualize o Captcha.

Mesmo atualizando continua o mesmo erro, e começou a acontecer isso ontem, até então esta funcionando normalmente.

Dei uma procurada no forum e não achei nada parecido com esse erro.

Agradeço a ajuda.

Capture.PNG

o Captcha está incorreto: Voce digitou DSSAZU enquanto a imagem é DSS4ZU kkkkkkkkkkk

 

  • Curtir 1
  • Haha 1
Doutorando em Ciências da Computação- UNIFEI - Universidade Federal de Itajubá
Mestrado em Ciências e Tecnologias da Computação - UNIFEI - Universidade Federal de Itajubá
Analista de Sistemas - FAI - Faculdade de Administração e Informática de Santa Rita do Sapucaí
Técnico em Processamento de Dados - FEPI - Fundação de Ensino e Pesquisa de Itajubá
Desenvolvendo desde 1982.
www.wander.eng.br    [email protected]   (35)984053554
 
 
 
  • Este tópico foi criado há 1689 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.
Visitante
Este tópico está agora fechado para novas respostas
 Compartilhar
Ir para a lista de tópicos
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.

The popup will be closed in 10 segundos...