Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Работа с сетью в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 28.01.2012, 01:08   #1
Человек_Борща
Старожил
 
Аватар для Человек_Борща
 
Регистрация: 30.12.2009
Сообщений: 11,430
Восклицание Вставить в запрос, нужную печеньку(кукис, cookies) indy 10

доброго времени суток!

Есть некий сайт.

Через httpanalyzer посмотел, что на сервер уходит кукис:
Код:

(Request-Line):POST /wp-content/plugins/pierres-wordspew/wordspew.php?jalSendChat=yes HTTP/1.1
User-Agent:Opera/9.80 (Windows NT 5.1; U; ru) Presto/2.10.229 Version/11.61
Host:
Accept:text/html, application/xml;q=0.9, application/xhtml+xml, image/png, image/webp, image/jpeg, image/gif, image/x-xbitmap, */*;q=0.1
Accept-Language:ru-RU,ru;q=0.9,en;q=0.8
Accept-Encoding:gzip, deflate
Referer:http://chats.ru/
Cookie:jalUserName=??? bp-activity-oldestpage=1
Connection:Keep-Alive
Content-Length:175
Content-Type:application/x-www-form-urlencoded
Content-Transfer-Encoding:binary
красным, выделил то, что Я должен послать на сервер. Подскажите: как это сделать? Желательно на примере кода.
Человек_Борща вне форума Ответить с цитированием
Старый 28.01.2012, 21:21   #2
Человек_Борща
Старожил
 
Аватар для Человек_Борща
 
Регистрация: 30.12.2009
Сообщений: 11,430
По умолчанию

Ума не приложу, как добавить свой кукис и послать на сервер....
Человек_Борща вне форума Ответить с цитированием
Старый 29.01.2012, 03:24   #3
Lesha
Форумчанин
 
Аватар для Lesha
 
Регистрация: 30.01.2009
Сообщений: 418
По умолчанию

Код:
IdHTTP.AllowCookies := true;
не?
Lesha вне форума Ответить с цитированием
Старый 29.01.2012, 03:47   #4
Lesha
Форумчанин
 
Аватар для Lesha
 
Регистрация: 30.01.2009
Сообщений: 418
По умолчанию

php

PHP код:
<?php
if (isset($_POST['hello'])) {
    
print_r($_COOKIE);
    echo 
'   <- this cookies';
} else {
    echo 
'nonecookie';
}
delphi

Код:
procedure TForm1.Button1Click(Sender: TObject);
var post: TStringList;
begin
  post:=TStringList.Create;
  post.Add('hello=post1');
// CookieManager - невизуальный компонент idCookieManager
  IdHTTP1.CookieManager.AddCookie('cook1=zn1','10.13.**.**');
  IdHTTP1.CookieManager.AddCookie('cook2=zn2','10.13.**.**');
  ShowMessage(IdHTTP1.Post('http://10.13.**.**/works/111.php',post));
  // очистка
  IdHTTP1.CookieManager.CookieCollection.Clear;
  post.free;
end;
ответ php:

Цитата:
Array
(
[cook1] => zn1
[cook2] => zn2
)
<- this cookies
Lesha вне форума Ответить с цитированием
Старый 29.01.2012, 04:39   #5
Человек_Борща
Старожил
 
Аватар для Человек_Борща
 
Регистрация: 30.12.2009
Сообщений: 11,430
По умолчанию

Lesha,
Печеньками меня сервер кормит, но мне надо, чтобы я его меченьками кормил. Как этого добится?

Delphi XE2 - INDY 10
там нет метода AddCookie ни в idCookiesManager ни в его CookiesCollection
Есть AddClientCookie и есть AddServerCookie, где вторым параметром, везде идёт тип TidURI.

и как минимум:
Код:
IdHTTP1.CookieManager.AddCookie('cook2=zn2','10.13.**.**');
идёт лесом... Я уже обгуглился по этому поводу...

Последний раз редактировалось Человек_Борща; 29.01.2012 в 04:42.
Человек_Борща вне форума Ответить с цитированием
Старый 29.01.2012, 05:40   #6
Lesha
Форумчанин
 
Аватар для Lesha
 
Регистрация: 30.01.2009
Сообщений: 418
По умолчанию

что то даже оффициальной справки на indy 10.5.7 на ихнем сайте не наблюдается

а которая есть там методы стандартны. и никаких AddServerCookie в помине нет
Lesha вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Indy, принудительно завершить запрос phphel Работа с сетью в Delphi 1 28.07.2011 14:26
Послать запрос с изменённым cookies на сервер Человек_Борща Работа с сетью в Delphi 9 03.06.2011 12:16
Indy tiburon и cookies brt Работа с сетью в Delphi 2 29.07.2010 20:16
Си++. Вставить в массив элемент в нужную строку hen Помощь студентам 10 08.06.2009 22:27
Вставить запись в нужную строку и колонку Inbox БД в Delphi 1 19.02.2009 19:50