Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.08.12;
Скачать: CL | DM;

Вниз

Indy: Не посылаются Cookies.   Найти похожие ветки 

 
Gnobobel   (2006-03-01 18:55) [0]

Моя прога должна обращатся к скрипту (htpp://localhost:****/someprog.php), передавать ему данные через POST запрос, получать кукисы, а затем в следующем запросе передавать их серверу.

procedure TForm1.BitBtn1Click(Sender: TObject);
var
 Form: TIdMultiPartFormDataStream;
begin
 Form := TIdMultiPartFormDataStream.Create();
 Form.AddFormField("hello", "123");
 IdHTTP.AllowCookies := True;
 Memo1.Lines.Add(IdHTTP.Post ("htpp://localhost:****/someprog.php", Form));
end;

procedure TForm1.IdCookieManager1NewCookie(ASender: TObject;
 ACookie: TIdCookieRFC2109; var VAccept: Boolean);
begin
 memo1.lines.add(ACookie.CookieText);
end;


При повторном нажатии на кнопку выводится

lo=lll; domain=localhost
//Начало сраницы someprog.php
=== GET =====================
=== POST ====================
login = n0p
pass = gi8Nool
ok = ВОЙТИ

=== COOKIE ==================
//Конец сраницы someprog.php

//Второй клик

lo=lll; domain=localhost
//Начало сраницы someprog.php
=== GET =====================
=== POST ====================
login = n0p
pass = gi8Nool
ok = ВОЙТИ

=== COOKIE ==================
//Конец сраницы someprog.php


 
Gnobolel   (2006-03-01 18:57) [1]

Гы гы пассы к своему сервису выложил =) Иду менять =)


 
IUnknown   (2006-06-16 13:43) [2]

Да-а-а... сРАНИца класная :)))


 
CyberBullDog ©   (2006-09-24 12:38) [3]

У меня та же проблема. Использую IdHTTP + CookieManager. Так он Cookie принимает, а отдавать не хочет. М.б. надо вручную прописать отправку Cookie?


 
CyberBullDog ©   (2006-09-25 11:19) [4]

Проблемы уже нет


 
Nehljudov ©   (2007-01-05 12:12) [5]

как мило, может напишешь, как ты ее решил?



Страницы: 1 вся ветка

Текущий архив: 2007.08.12;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.07 c
2-1184572332
L2
2007-07-16 11:52
2007.08.12
Вычисляемые поля


2-1184321070
Dddddddd
2007-07-13 14:04
2007.08.12
Обратная связь TcpServer - TcpClient


2-1184231067
031178
2007-07-12 13:04
2007.08.12
Как узнать, что в определенный каталог поступил какой-либо файл ?


2-1184647927
Knob
2007-07-17 08:52
2007.08.12
Регулировка звука


2-1184349062
RIMED
2007-07-13 21:51
2007.08.12
весь текст в буфер