ReSQL.ru
     
powered by simpleCommunicator - 2.0.36     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Ошибка при скачивании странички сайта с помощью TIdHTTP
13 сообщений из 13, страница 1 из 1
Ошибка при скачивании странички сайта с помощью TIdHTTP
    #40116064
Term
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Term
Участник
Добрый день,
такая проблема случилась, пытаюсь скачать страничку https://grls.rosminzdrav.ru
использую TIdHTTP
получаю вот такую ошибку

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

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

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

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

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

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

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

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

попробуйте



мой браузер на самом деле гораздо больше посылает, интересно было бы нащупать минимально-достаточный набор
...
Рейтинг: 0 / 0
30.11.2021, 16:24
| Ответить | Цитировать | Написать  
Ошибка при скачивании странички сайта с помощью TIdHTTP
    #40116272
Фотография Кроик Семён
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Кроик Семён
Участник
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
30.11.2021, 19:21
| Ответить | Цитировать | Написать  
13 сообщений из 13, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Ошибка при скачивании странички сайта с помощью TIdHTTP
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru             Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=58&fpage=7&tid=2036824]:
 0ms
get settings:
 9ms
get forum list:
 12ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 31ms
get topic data:
 12ms
get forum data:
 2ms
get page messages:
 49ms
get tp. blocked users:
 1ms
others: 275ms
total:  399ms
созд. / загр.: 399ms
x
x
Закрыть


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