Ir para conteúdo
  • Cadastre-se

Sistemas Informação

Membros
  • Total de ítens

    6
  • Registro em

  • Última visita

Últimos Visitantes

O bloco dos últimos visitantes está desativado e não está sendo visualizado por outros usuários.

Sistemas Informação's Achievements

Rookie

Rookie (2/14)

  • First Post
  • Week One Done
  • One Month Later
  • One Year In
  • Conversation Starter

Recent Badges

0

Reputação

  1. A consulta que fiz pelo site foi realizada sem problemas. Poderia me enviar o link que está utilizando para fazer a consulta por gentileza?
  2. As DLLs já estão sendo utilizadas, você consegue realizar a consulta aí sem nenhum problema?
  3. Acredito que não tenha problemas na conexão daqui, mas consegui resolver o problema com a captura do captcha depois desse erro trocando para esse link https://servicos.receita.fazenda.gov.br/Servicos/CPF/ConsultaSituacao/ConsultaPublicaSonoro.asp?CPF=&NASCIMENTO= Porém agora estou com estes outros dois erros que ficam intercalando ao tentar fazer as consultas
  4. Nesse caso deu um Server Error 403 - Forbidden: access is denied
  5. Ao realizar o teste o erro foi o seguinte:
  6. Bom dia pessoal, estou com um problema na consulta do CPF por meio do ACBrConsultaCPF, quando deveria encontrar um captcha para a consulta do cpf aparece a seguinte mensagem: 'The file being read is not a valid "Portable Network Graphics" image because it contains an invalid header. This file may be corrupted, try obtaining it again' segue o código da consulta do cpf: function TACBrConsultaCPF.GetCaptchaURL : String ; var AURL, Html, siteconsulta: String; begin try if ProtocoloHTTPS then siteconsulta := 'https://' else siteconsulta := 'http://'; siteconsulta :='https://www.receita.fazenda.gov.br/Aplicacoes/SSL/ATCTA/CPF/captcha/gerarCaptcha.asp'; Self.HTTPGet(siteconsulta); Html := UTF8ToNativeString(Self.RespHTTP.Text); //Debug //WriteToTXT('C:\TEMP\ACBrConsultaCPF-Captcha.TXT',Html); AURL := RetornarConteudoEntre(Html, 'src="data:image/png;base64,', '">'); Result := StringReplace(AURL, 'amp;', '', []); except on E: Exception do begin raise EACBrConsultaCPFException.Create('Erro na hora de obter a URL do captcha.'+#13#10+E.Message); end; end; end; As dll's já foram atualizadas, o link antigo nem ao menos abria o programa, então troquei para este novo que por fim trouxe este erro, o problema seria no código em si ou no link defasado? Grato
×
×
  • 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.