Гость
Войти | Профиль | Очистить
Действия ...
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Ошибка при скачивании странички сайта с помощью TIdHTTP / 13 сообщений из 13, страница 1 из 1
30.11.2021, 11:09
    #40116064
Term
Term
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ошибка при скачивании странички сайта с помощью TIdHTTP
Добрый день,
такая проблема случилась, пытаюсь скачать страничку https://grls.rosminzdrav.ru
использую TIdHTTP
получаю вот такую ошибку

другие странички скачиваются без проблем

что это за ошибка такая?
не разу с таким не сталкивался
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.11.2021, 11:29
    #40116076
Кроик Семён
Кроик Семён
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ошибка при скачивании странички сайта с помощью TIdHTTP
Term,


1)
google
Код: sql
1.
"<!DOCTYPE html>" TIdHTTP



2)
https://stackoverflow.com/questions/27092722/idhttp-returns-doctype-html-error
авторNevermind I found the problem. Just had to trim the string named sData.

короче, пробелы там в URL были, либо символы перевода строки
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.11.2021, 12:39
    #40116101
Term
Term
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ошибка при скачивании странички сайта с помощью TIdHTTP
Кроик Семён,

благодарю
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.11.2021, 13:10
    #40116117
Term
Term
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ошибка при скачивании странички сайта с помощью TIdHTTP
Кроик Семён,

тут судя по всему другая ситуация, у меня нет всего этого, никаких пробелов и символов

если открыть страничку в браузере, а потом посмотреть её код,
то
то сервер возвращает первые две пустые строки
и потом уже идет <!DOCTYPE
я думаю это может быть связано с данной ошибкой
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.11.2021, 13:14
    #40116118
Term
Term
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ошибка при скачивании странички сайта с помощью TIdHTTP
Term,
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.11.2021, 14:21
    #40116153
Кроик Семён
Кроик Семён
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ошибка при скачивании странички сайта с помощью TIdHTTP
Term,

а вот ещё , там сайт думал, что имеет дело с ботом (=роботом) и артачился
предложенное решение в мимикрии под Mozilla Firefox

так же обратите внимание на HTTPS, хотя там было бы другая ошибка, думаю, что-нибудь с SSL в тексте, если бы вы SSL не подключили
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.11.2021, 14:22
    #40116154
Кроик Семён
Кроик Семён
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ошибка при скачивании странички сайта с помощью TIdHTTP
P.S.
и где ваш пример кода?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.11.2021, 16:03
    #40116188
Term
Term
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ошибка при скачивании странички сайта с помощью TIdHTTP
Кроик Семён
P.S.
и где ваш пример кода?


я делал так, эт сугубо приложение для теста было

Код: pascal
1.
2.
3.
4.
5.
6.
7.
procedure TForm1.FormCreate(Sender: TObject);
begin
   IdHTTP1:= TIdHTTP.Create(Application);
   IdSSLIOHandlerSocketOpenSSL1:=TIdSSLIOHandlerSocketOpenSSL.Create(Application);
   IdHTTP1.IOHandler:=IdSSLIOHandlerSocketOpenSSL1;
   IdSSLIOHandlerSocketOpenSSL1.SSLOptions.SSLVersions:=[sslvSSLv2,sslvSSLv3,sslvTLSv1,sslvTLSv1_1,sslvTLSv1_2];
end;



Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
function GetPage(URL, WorkDir,FileName: String):string;
var Page:TFileStream;
    PageSL:TStringList;
    i,position:integer;
    PageStr:string;
    CSV_Stream:TMemoryStream;
begin
 Page:=TFileStream.Create(WorkDir+'page.htm',fmCreate);
 Form1.idHTTP1.get(URL,Page);
 Page.Free;
end;
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.11.2021, 16:05
    #40116190
Term
Term
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ошибка при скачивании странички сайта с помощью TIdHTTP
Кроик Семён,

кстати, а скачивание этой же странички на C# работает без проблем...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.11.2021, 16:14
    #40116193
Кроик Семён
Кроик Семён
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ошибка при скачивании странички сайта с помощью TIdHTTP
Term,

попробуйте

Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
procedure TForm1.FormCreate(Sender: TObject);
begin
   IdHTTP1:= TIdHTTP.Create(Application);
   IdSSLIOHandlerSocketOpenSSL1:=TIdSSLIOHandlerSocketOpenSSL.Create(Application);
   IdHTTP1.IOHandler:=IdSSLIOHandlerSocketOpenSSL1;
   IdSSLIOHandlerSocketOpenSSL1.SSLOptions.SSLVersions:=[sslvSSLv2,sslvSSLv3,sslvTLSv1,sslvTLSv1_1,sslvTLSv1_2];

   IdHTTP1.Request.ContentType := 'text/plain';
   IdHTTP1.Request.UserAgent := 'Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)';
end;
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.11.2021, 16:18
    #40116195
s62
s62
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ошибка при скачивании странички сайта с помощью TIdHTTP
Term
Кроик Семён,

кстати, а скачивание этой же странички на C# работает без проблем...
В более новых Delphi при помощи компонента TNetHTTPClient - тоже.
Код: pascal
1.
  Memo.Lines.Text := NetCl.Get('https://grls.rosminzdrav.ru/Default.aspx').ContentAsString();


А с Indy да, попробовал, выдает такое исключение.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.11.2021, 16:24
    #40116198
Кроик Семён
Кроик Семён
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ошибка при скачивании странички сайта с помощью TIdHTTP
Кроик Семён
Term,

попробуйте



мой браузер на самом деле гораздо больше посылает, интересно было бы нащупать минимально-достаточный набор
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.11.2021, 19:21
    #40116272
Кроик Семён
Кроик Семён
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ошибка при скачивании странички сайта с помощью TIdHTTP
Term,

я, заметил

что в вашем коде стоит:

Код: pascal
1.
2.
3.
4.
5.
6.
7.
procedure TForm1.FormCreate(Sender: TObject);
begin
   IdHTTP1:= TIdHTTP.Create(Application);
   IdSSLIOHandlerSocketOpenSSL1:=TIdSSLIOHandlerSocketOpenSSL.Create(Application);
   IdHTTP1.IOHandler:=IdSSLIOHandlerSocketOpenSSL1;
   IdSSLIOHandlerSocketOpenSSL1.SSLOptions.SSLVersions:=[sslvSSLv2,sslvSSLv3,sslvTLSv1,sslvTLSv1_1,sslvTLSv1_2];
end;




а в дебаггере Mozila Firefox показывает вот что:
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Ошибка при скачивании странички сайта с помощью TIdHTTP / 13 сообщений из 13, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 142ms
Закрыть
start [/forum/topic.php?fid=58&mobile=1&tid=2036824]:
 0ms
get settings:
 9ms
get forum list:
 12ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 38ms
get topic data:
 12ms
get forum data:
 3ms
get page messages:
 47ms
get tp. blocked users:
 2ms
others: 11ms
total:  142ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]