Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Интернет и сети
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

 
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 04.08.2015, 08:06
beetlejuice541 beetlejuice541 вне форума
Новичок
 
Регистрация: 10.07.2015
Сообщения: 62
Версия Delphi: Delphi 7
Репутация: 10
Вопрос Использование Cookie и header

Отследил через анализатор куки которые отправляет браузер,и которые отправляет моя программа и они отличаются,почему?
Код:
idhttp.AllowCookies:=true;
idhttp.Get('URL');
idhttp.Get('URL');
куки цепляются,но они не такие как у браузера,из-за чего сайт через какое-то время блокирует доступ.
Что можно сделать?
Вот весь код
Код:
procedure TForm1.FormCreate(Sender: TObject);
var i:integer;
begin
idHttp := TIdHTTP.Create(nil);
idhttp.HandleRedirects:=true;
idhttp.AllowCookies:=true;
IdCookieManager:= TidCookieManager.Create(idHttp);
idHttp.CookieManager := IdCookieManager;
idhttp.Request.Host:='steamcommunity.com';
idhttp.Request.Connection:='keep-alive';
IdHTTP.Request.Accept:='text/html,application/xhtml+xml,application/xml;q=0.9,image/webp,*/*;q=0.8';
IdHTTP.Request.UserAgent:='Mozilla/5.0 (X11; Linux i686; rv:38.0) Gecko/20100101 Firefox/38.0 Iceweasel/38.1.0';
idhttp.Request.Referer:='http://steamcommunity.com/market/search?appid=730';
IdHTTP.Request.AcceptLanguage:='ru,en;q=0.8';
idhttp.Get('URL');
idhttp.Get('URL');
end;
 
procedure TForm1.Button1Click(Sender: TObject);
var
i:integer;
begin
idhttp.Get('URL');
end;
Ответить с цитированием
 


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 21:36.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025