Конференция "Сети" » synapse и https, не могу загрузить страницу [D7]
 
  • tippa (05.05.15 19:11) [0]
    Нужно получать данные с сайта https://bitinfocharts.com, никак не получается, на других сайтах с https все приходит, а здесь возвращается ошибка 500. Что можно придумать? У меня Delphi7. Вот тестовый пример:
    procedure TForm1.Button2Click(Sender: TObject);
    var http:THttpSend;              
       list:TStringList;        
       str:string;
    begin
    HTTP:=THTTPSend.Create;
    list:=TStringList.Create;
         if HTTP.HTTPMethod('GET','https://bitinfocharts.com') then
         begin
         if http.ResultCode=200 then
           begin
           list.LoadFromStream(http.Document);
           str:=list.Text;
           LogFileOutput('log1.txt','200');
           end else
               begin
               list.LoadFromStream(http.Document);
               str:=list.Text;
               LogFileOutput('log1.txt','not 200 '+inttostr(http.ResultCode));
               end;
          end else
               begin
               list.LoadFromStream(http.Document);
               str:=list.Text;
               LogFileOutput('log1.txt','not get '+inttostr(http.ResultCode));
               end;
    http.Free;
    list.Free;
    end;


    здесь LogFileOutput - процедура записи в лог. И пишет туда "not get 500"
    Пробовал разные заголовки добавлять
    http.Headers.Add('Accept-Encoding: gzip,deflate');
    http.Headers.Add('Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8');
    http.Headers.Add('Accept-Language: en-US,en;q=0.5');
    http.Headers.Add('Connection: keep-alive');


    но это ничего не дало.
  • brother © (06.05.15 10:41) [1]
    удачи!
  • tippa (06.05.15 23:39) [2]
    спасибо большое!
  • tippa (07.05.15 18:09) [3]
    отписываю решение, оказалось, что ексе файл возвращает ошибку 500 только если рядом лежат длл-ки libeay32.dll msvcr71.dll и ssleay32.dll. Если их убрать, то все нормально работает. Блин, я уже и забыл зачем я их туда положил.
  • Дамир (16.03.18 09:10) [4]
    tippa, Огромное тебе спасибо! Ты реально мне помог! Сколько я мучался!
  • Дамир (16.03.18 09:11) [5]
    tippa, Огромное тебе спасибо! Ты реально мне помог! Сколько я мучался!
 
Конференция "Сети" » synapse и https, не могу загрузить страницу [D7]
Есть новые Нет новых   [103768   +21][b:0.001][p:0.002]