| 
| 
 | Вопрос # 5 949/ вопрос открыт / | 
 |  Приветствую, уважаемые эксперты!
 Немного данных:
 - студия: Rad Studio XE2
 - компоненты: ICS for Delphi XE2
 - ОС: Windows 7
 
 Я тут пишу прогу для facebook и на первых шагах уже проблемы. Не работает авторизация. Facebook просит кукисы, хотя на форме есть dCookieManager, прикрепленный к dHTTP и AllowCookies поставлено в TRUE. Я уже заколебался рыскать по форумам. Может у кого такая проблема была?
 К вопросу прикреплён файл. Загрузить » (срок хранения: 60 дней с момента отправки вопроса) Приложение:Переключить в обычный режим procedure TForm_MainForm.sButton_LoginClick(Sender: TObject);var  LoginInfo: TStrings;  LoginString: string;  ResponseStream: TStringStream;  ResponseStr: string;begin  ResponseStream := TStringStream.Create('');  ResponseStream.Clear;     if S_Login <> '' then         if S_Pass <> '' then          try            { LoginInfo.Add('post_form_id=c7891524de1454ab653d46687d5da72d');              LoginInfo.Add('lsd=JDO8v');              LoginInfo.Add('locale=ru_RU');               LoginInfo.Add('email=' + S_Login);              LoginInfo.Add('pass=' + S_Pass); }            dHTTPRequest1.FormFields['email'].FieldValue := S_Login;            dHTTPRequest1.FormFields['pass'].FieldValue := S_Pass;            LoginString :=               + S_Login + '&pass=' + S_Pass;            dHTTP1.AllowCookies := True;            dHTTP1.Request := dHTTPRequest1;            dHTTP1.Post('http://www.facebook.com/login.php', ResponseStream);            ResponseStream.SaveToFile('c:\1.html');            ResponseStream.Clear;            // dHTTP1.Request:=dHTTPRequest2;            //
dHTTPRequest2.FormFields['feedback_params'].FieldValue:='"target_fbid":"225209567557656"';            dHTTP1.Post('http://www.facebook.com/ajax/ufi/modify.php?__a=1',              ResponseStream);            { --DEBUG-- } // ShowMessage(ResponseStream.DataString);            ResponseStream.SaveToFile('c:\2.html');          finally           end        else          Exit;  LoginInfo.Free;  ResponseStream.Free;end;
|  |   Вопрос задал: BigNik (статус: 1-ый класс)Вопрос отправлен: 13 февраля 2012, 13:34
 Состояние вопроса: открыт, ответов: 0.
 |  
 Мини-форум вопросаВсего сообщений: 3; последнее сообщение — 13 февраля 2012, 13:50; участников в обсуждении: 2. 
|   | Вадим К (статус: Академик), 13 февраля 2012, 13:40 [#1]:В свое время я мучился с этой же проблемой. Не хотел idHttp работать корректно с кукисами. В конце концов, я решил это следующим образом - после выполнения запроса я сохранял кукисы в свою переменную, парсил, чуточку модифицировал (в моем случае оказалось, что компонент ещё и портит немного кукисы), а при следующем запросе подставлял кукисы. Галочка "подтверждения прочтения" - вселенское зло. |  
|   | BigNik (статус: 1-ый класс), 13 февраля 2012, 13:46 [#2]:Спасибо большое за быстрый ответ! Мудохаться с кукисами мне чего-то не хочется но похоже что придется. Париться еще будет над чем. Хуже всего это то, что вчера 2 раза оно работало! Я уже обрадовался и тут на тебе - не работает опять... |  
|   | BigNik (статус: 1-ый класс), 13 февраля 2012, 13:50 [#3]:А у вас, кстати, еще тот код не сохранился? Он бы очень помог. |  Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте. |