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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 22.03.2014, 09:40   #1
милт
Форумчанин
 
Регистрация: 19.03.2012
Сообщений: 108
По умолчанию Синапс и куки

Как передать куки в синапсе? покажите пример как это пишется.
Мне надо залогинится на сайте, а потом например отправить сообщение на форуме при помощи синапс.

Код Delphi

Код:
procedure TForm2.Button1Click(Sender: TObject);
var
http:THTTPSend;
html:TStringList;
send:TStringStream;
begin
 http:=THTTPSend.Create;
 html:=TStringList.Create;
 send:=TStringStream.Create;
 
 http.UserAgent:='Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/32.0.1700.107 Safari/537.36';
 http.Headers.Add('Origin: [url]http://kmory.ru');
 http.MimeType:='application/x-www-form-urlencoded';
 
 send.WriteString('username=milt&password=123456789&login=%D0%92%D1%85%D0%BE%D0%B4&redirect=.%2Findex.php%3F');
 http.Document.LoadFromStream(send);
 http.HTTPMethod('post','http://kmory.ru/ucp.php?mode=login');
 html.LoadFromStream(http.Document);
 Memo1.Text:=IntToStr(Pos('Выход',html.Text));
end;


________
Код нужно оформлять по правилам:
тегом [CODE]..[/СODE]
(это кнопочка на панели форматирования с решёточкой #)
Не забывайте об этом!

Модератор.

Последний раз редактировалось Serge_Bliznykov; 22.03.2014 в 09:54.
милт вне форума Ответить с цитированием
Старый 22.03.2014, 10:49   #2
Кольша
Далеко не
Участник клуба
 
Аватар для Кольша
 
Регистрация: 11.08.2011
Сообщений: 1,512
По умолчанию

куда передать? зачем?Почему? Кому?
Кольша вне форума Ответить с цитированием
Старый 22.03.2014, 22:35   #3
милт
Форумчанин
 
Регистрация: 19.03.2012
Сообщений: 108
По умолчанию

Мне надо уже будучи залогениненым посмотреть страницу сайта. но не ту которая доступна для гостей, а ту которую можно посмотреть уже будучи залосненным. что тут не понятно?
милт вне форума Ответить с цитированием
Старый 22.03.2014, 23:44   #4
Человек_Борща
Старожил
 
Аватар для Человек_Борща
 
Регистрация: 30.12.2009
Сообщений: 11,426
По умолчанию

Сохранил кук и гоняй его в запросах после авторизации, что тут сложного.
Человек_Борща вне форума Ответить с цитированием
Старый 02.04.2014, 23:19   #5
милт
Форумчанин
 
Регистрация: 19.03.2012
Сообщений: 108
По умолчанию

Цитата:
Сообщение от Человек_Борща Посмотреть сообщение
Сохранил кук и гоняй его в запросах после авторизации, что тут сложного.
Я не знаю кода как это сделать. То есть как сохранить куки и как их передавать в запросе? можете показать пример или где найти пример кода?
милт вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Синапс Tstream Зод Работа с сетью в Delphi 8 25.11.2011 11:11
Синапс+Яваскрипты Зод Работа с сетью в Delphi 0 12.10.2011 09:40
Синапс userAgent Зод Работа с сетью в Delphi 3 07.10.2011 16:25
Куки ilSMoKEli Работа с сетью в Delphi 1 15.06.2010 11:09
Куки Kinematik Работа с сетью в Delphi 0 27.12.2008 04:53