Ir para conteúdo
  • Cadastre-se

dev botao

AcbrConsultaCPF com openssl 1.0.2.1


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

Recommended Posts

  • 4 meses depois ...

Boa tarde,

A consulta na Receita Federal mudou mais uma vez, conforme link http://www.receita.fazenda.gov.br/PessoaJuridica/CNPJ/cnpjreva/Cnpjreva_Solicitacao.asp

Agora estão usando o "reCaptcha" do Google.

Alguém sabe informar se já existe alguma solução para a Consulta CPF do ACBr ?

nelconsult 3d.png

Desenvolvedor e Consultor

[email protected]

 

Link para o comentário
Compartilhar em outros sites

  • Moderadores
22 minutos atrás, Nelson Santos disse:

Boa tarde,

A consulta na Receita Federal mudou mais uma vez, conforme link http://www.receita.fazenda.gov.br/PessoaJuridica/CNPJ/cnpjreva/Cnpjreva_Solicitacao.asp

Agora estão usando o "reCaptcha" do Google.

Alguém sabe informar se já existe alguma solução para a Consulta CPF do ACBr ?

não tanto para CPF quanto CNPJ onde já vem se discutindo a alguns dias em diversos tópicos.

Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Black-02.png
 

 

Link para o comentário
Compartilhar em outros sites

Em 10/11/2017 at 15:46, Dfox disse:

Verdade :-( rsrs

tem esses dois links

reCaptcha

http://cpf.receita.fazenda.gov.br/situacao/default.asp

Captcha modo antigo

http://cpf.receita.fazenda.gov.br/situacao/defaultSonoro.asp

mais eu consegui consultar por esse modo antigo parece que esta bugado.

Me parece que por esse link, pode funcionar..

Link para o comentário
Compartilhar em outros sites

  • Consultores
20 horas atrás, Dfox disse:

Boa tarde a todos,

consegui a consulta do cpf segue as unit  para teste :-D

 

 

uPrincipal.pas

ACBrConsultaCPF.pas

Olá,

  notei que o código não está compatível com o Lazarus e o Delphi 7, só do Delphi 2009 pra frente, mesmo assim com alguns ajustes...

Pelo que percebi o código foi alterado para fazer o seguinte:
* usar o outro endereço
* localizar a imagem nessa outra página via tags
* decodificar a imagem da página para um stream (porque a imagem está em base64)
* jogar o stream para uma imagem png
* corrigir outros detalhes no envio

Foi isso mesmo? Perdi alguma coisa?

[]'s

Consultor SAC ACBr

Elton
Profissionalize o ACBr na sua empresa, conheça o ACBr Pro.

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

Um engenheiro de Controle de Qualidade(QA) entra num bar. Pede uma cerveja. Pede zero cervejas.
Pede 99999999 cervejas. Pede -1 cervejas. Pede um jacaré. Pede asdfdhklçkh.
Link para o comentário
Compartilhar em outros sites

Agora, EMBarbosa disse:

Olá,

  notei que o código não está compatível com o Lazarus e o Delphi 7, só do Delphi 2009 pra frente, mesmo assim com alguns ajustes...

Pelo que percebi o código foi alterado para fazer o seguinte:
* usar o outro endereço
* localizar a imagem nessa outra página via tags
* decodificar a imagem da página para um stream (porque a imagem está em base64)
* jogar o stream para uma imagem png
* corrigir outros detalhes no envio

Foi isso mesmo? Perdi alguma coisa?

exatamente isso, já adaptei também para esse outro link 

https://www.receita.fazenda.gov.br/Aplicacoes/SSL/ATCTA/CPF/ConsultaSituacao/ConsultaPublicaSonoro.asp

mais esse link anida esta instável!

Link para o comentário
Compartilhar em outros sites

  • Consultores
17 minutos atrás, Dfox disse:

exatamente isso, já adaptei também para esse outro link 

https://www.receita.fazenda.gov.br/Aplicacoes/SSL/ATCTA/CPF/ConsultaSituacao/ConsultaPublicaSonoro.asp

mais esse link anida esta instável!

Talvez seja possível alterar para utilizar a synapse ao invés dessa outra unit EncdDecd.pas (ou soap.EncdDecd.pas no Delphi XE2 ou superior) pois não consegui encontrar uma versão dela para Delphi 7 ou Lazarus.

A synapse tem o método encode e decode para Base64. http://synapse.ararat.cz/doc/help/synacode.html

Mas precisaria ver melhor como mostrar a imagem png nessas versões (Lazarus e Delphi 7)...

[]'s

Consultor SAC ACBr

Elton
Profissionalize o ACBr na sua empresa, conheça o ACBr Pro.

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

Um engenheiro de Controle de Qualidade(QA) entra num bar. Pede uma cerveja. Pede zero cervejas.
Pede 99999999 cervejas. Pede -1 cervejas. Pede um jacaré. Pede asdfdhklçkh.
Link para o comentário
Compartilhar em outros sites

7 minutos atrás, EMBarbosa disse:

Talvez seja possível alterar para utilizar a synapse ao invés dessa outra unit EncdDecd.pas (ou soap.EncdDecd.pas no Delphi XE2 ou superior) pois não consegui encontrar uma versão dela para Delphi 7 ou Lazarus.

A synapse tem o método encode e decode para Base64. http://synapse.ararat.cz/doc/help/synacode.html

Mas precisaria ver melhor como mostrar a imagem png nessas versões (Lazarus e Delphi 7)...

Consegui usar a Unit synacode segue a unit alterada :-D

att.

ACBrConsultaCPF.pas

Link para o comentário
Compartilhar em outros sites

10 horas atrás, Dfox disse:

Consegui usar a Unit synacode segue a unit alterada :-D

att.

ACBrConsultaCPF.pas

mudaram para modo seguro agora

antes

http://cpf.receita.fazenda.gov.br/situacao/defaultSonoro.asp

http://cpf.receita.fazenda.gov.br/situacao/ConsultaSituacao.asp

atual

https://cpf.receita.fazenda.gov.br/situacao/defaultSonoro.asp

https://cpf.receita.fazenda.gov.br/situacao/ConsultaSituacao.asp

é só alterar os links da unit.

Editado por Dfox
Link para o comentário
Compartilhar em outros sites

Testando as alterações aqui, está funcionando perfeitamente, com os links novos

https://cpf.receita.fazenda.gov.br/situacao/defaultSonoro.asp

https://cpf.receita.fazenda.gov.br/situacao/ConsultaSituacao.asp

Só não consegui testar com Delphi 7.

Editado por Maiquel

Maiquel Parisotto

 

"Ora, a fé é o firme fundamento das coisas que se esperam, e a prova das coisas que se não vêem"

Link para o comentário
Compartilhar em outros sites

  • Moderadores
1 hora atrás, luciano_f disse:

Segue a unit com os endereços atualizados e testados em Delphi XE5.

ACBrConsultaCPF.pas

 

será que o administradores já subiram essa nova unit ?

Agora está!

Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Black-02.png
 

 

Link para o comentário
Compartilhar em outros sites

  • Moderadores
2 horas atrás, lucasbm disse:

Delphi 2010: testado e aprovado.

exato no 2010 

acabei de efetuar mais testes com o lazarus e deu erro vou subir modificações

Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Black-02.png
 

 

Link para o comentário
Compartilhar em outros sites

Em 20/11/2017 at 11:33, Maiquel disse:

Testando as alterações aqui, está funcionando perfeitamente, com os links novos

https://cpf.receita.fazenda.gov.br/situacao/defaultSonoro.asp

https://cpf.receita.fazenda.gov.br/situacao/ConsultaSituacao.asp

Só não consegui testar com Delphi 7.

Segue em anexo a unit modificada para compilar no Delphi 7.

ACBrConsultaCPF.pas

  • Curtir 3
Link para o comentário
Compartilhar em outros sites

  • 1 mês depois ...
  • Este tópico foi criado há 2153 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
×
×
  • 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...