Ошибка подключения с помощью SSL при публикации с помощью Indy - PullRequest
Новая
       52

Ошибка подключения с помощью SSL при публикации с помощью Indy

0 голосов
/ 28 июня 2018

Я пытаюсь опубликовать в веб-сервисе через TIdHTTP (Indy), используя Delphi 5, и всякий раз, когда я вызываю метод post, он возвращает исключение «Ошибка соединения с ошибкой SSL».

Это код, который я пытаюсь запустить 

FHandle                        := TIdSSLIOHandlerSocket.Create(nil);
FHandle.SSLOptions.Method      := sslvTLSv1;
IdHttp.IOHandler               := FHandle;
IdHttp.HandleRedirects         := True;

IdHTTP.Request.CustomHeaders.Add('Content-Type: application/json');
IdHttp.Request.ContentType := 'application/json';

Load();

vAux := TMemoryStream.Create();
try
  WriteStringToStream(vAux, edJson.Text);
  vAux.Position := 0;
  vRet := IdHTTP.Post(edHost.Text, vAux);
finally
  vAux.Free();
end;

Кажется, что независимо от того, что я изменяю в CustomHeaders или любом другом свойстве, одна и та же ошибка происходит.

Я пытаюсь изменить de SSLOption.Method на все доступные, но я не могу заставить его работать.

Любое предложение для меня попробовать?

1 Ответ

0 голосов
/ 10 июля 2018

Я понял, в чем проблема. Это был файл сертификата, который был неисправен в свойстве CertFile компонента TIdSSLIOHandlerSocket, и я даже не понял, что он там был. После указания правильного файла сертификата все прошло гладко. Спасибо, ребята, за понимание!

...