POST на сайт: что и как запросить?

[Aliens_wolfs]

Нет. Сейчас скрин покажу. Может для СПб цен нет)))

[Ship_1]

Ого, как интересно... На их форуме читал пару жалоб на отсутствие кнопки. Сейчас впервые почти своими глазами увидел.
Может, по IP определяется локация и кнопка отображается только для Москвы...

[Aliens_wolfs]

Сейчас попробую в хроме затем через прокси

[Alex11223]

Ну так выберите не Спб.

[Aliens_wolfs]

Ну так выберите не Спб.

Вот я ламер)))) Да в Москве показывает. Сейчас потестируем

[Aliens_wolfs]

Вот попробуйте этот код, я не смог его до конца проверить так как мне сервер дает в httpsend
Cookie: TEREMOK_CURRENT_CITY=spb; PHPSESSID=iknsm1c7vhvhm8a9lco66fpp6 3; TEREMOK_IS_MOBILE_VERSION=N

а нужен TEREMOK_CURRENT_CITY=msk

Сейчас экспериментирую чтобы в httpsend замену в Cookie делать на нужную строку

procedure TForm1.Button2Click(Sender: TObject);
var
httpsend: THttpSend;
pList: TStringList;
DocData: TStringStream;
i: integer;
begin
pList:= TStringList.Create;
httpsend:=THTTPSend.Create;
DocData:=TStringStream.Create('');
try

  httpsend.Protocol := '1.1';
  httpsend.UserAgent:=  'Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 '+
'(KHTML, like Gecko) Chrome/62.0.3202.89 Safari/537.36 OPR/49.0.2725.47';
 httpsend.Headers.Add('Accept: */*');
 httpsend.Headers.Add('Accept-Language: ru-RU,ru;q=0.9,en-US;q=0.8,en;q=0.7');
//Accept-Encoding: gzip, deflate')
 httpsend.Headers.Add('Cache-Control: no-cache');
 httpsend.HTTPMethod('GET','http://teremok.ru/menu/dobavki_v_bliny_i_kashi/mayonez/');
//Вначале получаем Cookies
  if httpsend.ResultCode = 200 then
  begin
  httpsend.Headers.Clear;
  httpsend.Headers.Add('Accept: */*');
  httpsend.Headers.Add('x-requested-with: XMLHttpRequest');
  httpsend.Headers.Add('Referer: http://teremok.ru/menu/dobavki_v_bliny_i_kashi/mayonez/');
  //httpsend.Headers.Add('Accept-Encoding: gzip, deflate');
  httpsend.Headers.Add('Accept-Language: ru-RU,ru;q=0.9,en-US;q=0.8,en;q=0.7');
  httpsend.Headers.Add('Cache-Control: no-cache');
  //Делаем подмену Cookies
   For i:= 0 to httpsend.Cookies.Count - 1 do
   if Pos(AnsiUpperCase('TEREMOK_CURRENT_CITY='), AnsiUpperCase(httpsend.Cookies.Strings[i])) <> 0 then
   httpsend.Cookies.Strings[i]:= 'TEREMOK_CURRENT_CITY=msk';

  DocData.WriteString('addr_id=603');
  HTTPSend.Document.LoadFromStream(DocData);
  httpsend.HTTPMethod('POST','http://teremok.ru/menu/dobavki_v_bliny_i_kashi/mayonez/');
  end;

 //pList.LoadFromStream(httpsend.Document);
// pList.SaveToFile('terem_result1.html');
Form1.Memo1.Lines.LoadFromStream(httpsend.Document);
Form1.Memo1.Lines.SaveToFile('D:\terem_result1.html');
Form1.Memo1.Lines.Text:= Utf8ToAnsi(Form1.Memo1.Lines.Text);


finally
pList.Free;
httpsend.Free;
DocData.Free
end;

end;

И маленький снифер в помощь для просмотра пакетов

[Ship_1]

Всё равно не получилось...
Спасибо за снифер Правда, скачать пока не получится: админский антивирус не пропускает, почему-то.

[Aliens_wolfs]

Сейчас еще поэкспериментируем, там еще при нажатии на кнопку указать цену всплывает окно, после выбора в этом окне еще скрипт выполняется и допонительные куки присваиваются.

[Ship_1]

Так из этого окна как раз и берётся выбранное ID. Зачем же там ещё дополнительные куки?..

[Aliens_wolfs]

В общем как то из этого окна генерирует куки методом какого то скрипта

А ID это адрес ресторана из списка в окне

Вот так мне цену получилось увидеть

  httpsend.UserAgent:=  'Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 '+
'(KHTML, like Gecko) Chrome/62.0.3202.89 Safari/537.36 OPR/49.0.2725.47';

httpsend.Headers.Add('Accept: */*');
httpsend.Headers.Add('Accept-Language: ru-RU');
httpsend.Headers.Add('Cookie: PHPSESSID=ngpj9hc9h9mjdpev77dhk53tn7; tmr_detect=0%7C1513677880205; TEREMOK_IS_MOBILE_VERSION=N;'
+ '_ga=GA1.2.487355652.1513677851; _gid=GA1.2.125047124.1513677851; _gat=1; _ym_uid=151367785135355848; _ym_isad=2; TEREMOK_CURRENT_CITY=msk');

httpsend.HTTPMethod('GET','http://teremok.ru/menu/dobavki_v_bliny_i_kashi/mayonez/');

Form1.Memo1.Lines.LoadFromStream(httpsend.Document);
Form1.Memo1.Lines.SaveToFile('D:\terem_result1.html');
Form1.Memo1.Lines.Text:= Utf8ToAnsi(Form1.Memo1.Lines.Text);

Как получить эти куки пока не пойму даже в POST запросе они уже есть

_ga=GA1.2.487355652.1513677851; _gid=GA1.2.125047124.1513677851; _gat=1; _ym_uid=151367785135355848; PHPSESSID=ngpj9hc9h9mjdpev77dhk53tn7; 
tmr_detect=0%7C1513677880205

Взял эти куки через снифер и мне дало цену в коде что выше
Снифером отследил все покеты и сделал вывод что данные куки не получены от сервера, а созданы методом какого то скрипта

Sciv в посте #10 описал метод