Erro na recuperação do Captcha

[Giovani Da Cruz]

Encontrei um problema mesmo compilando o programa de exemplo.

Delphi 10 Seatle,

Windows: Diversos

compilação: 64 bits

 

OBS: Colocando o exe gerado na pasta C:\arquivos de programas...

 

Em x32 funciona normalmente.

Em x64 em uma pasta comum

 

 

O erro ocorre:

procedure TACBrConsultaCPF.Captcha(Stream: TStream);

    HTTPGet('https://www.receita.fazenda.gov.br/Aplicacoes/SSL/ATCTA/CPF/captcha/gerarCaptcha.asp');

          HTTPMethod( 'GET', AURL );

              HTTPSend.HTTPMethod(Method, AURL);

                  aqui a propriedade HTTPSend.ResultCode fica 500.

 

Sendo que depois dará o erro aqui

OK := HTTPSend.ResultCode = 200;   

//...

    if not OK then
       raise EACBrHTTPError.Create( 'Erro HTTP: '+IntToStr(HTTPSend.ResultCode)+' '+
                                     HTTPSend.ResultString + sLineBreak +
                                     'URL: '+AURL + sLineBreak + sLineBreak +
                                     'Resposta HTTP:' + sLineBreak +
                                     String(AjustaLinhas( AnsiString(RespHTTP.Text), 80, 20) )) ;

 

 

Detalhe o erro só ocorre na compilação x64 e executando em uma pasta mais restrita ex : c:\Program Files

 

[Daniel Simoes]

Se você compila em 64 bits então precisa das DLLs de 64 bits do OpenSSL

 

[Giovani Da Cruz]

Sim, estou utilizando as dlls de x64.

 

Interessante que funcionava em antes da alteração do endereço, a pesquisa de cnpj funciona normalmente, no x64.

 

Outro detalhe interessante é que testando o exemplo executando no D, funciona, mas no C, mesmo como administrador, da o Erro 500.

[Daniel Simoes]

Antes não era HTTPS

[Nelson Santos]

Vejam esta solução do @Demetrius de A.Nascimento neste link 

 

[ricardo_casc]

Aproveitando o post, na minha maquina e na de alguns cliente também está ocorrendo o erro abaixo :

Lembrando que está corretos as dll's. Conforme falados nos dois posts anteriores.

 

Erro na hora de fazer o download da imagem do captcha.

Erro na hora de obter a URL do captcha.

Erro HTTP: 504 Timeout while reading response from Server

URL: http://www.receita.fazenda.gov.br/pessoajuridica/cnpj/cnpjreva/cnpjreva_solicitacao2.asp

Resposta HTTP:

[Juliomar Marchetti]

Bom dia

o problema está no site!

acessem e vejam .. aguardem resolver o site e se precisar depois aplicamos a correção aqui! mas acho que é só instabilidade lá

[ricardo_casc]

Ok, obrigado Júliomar.