|
#1
|
|||
|
|||
HTTP и Cookies
Всем привет.
Вывожу на форму компоненты: куки_менеджер и http В http свойствах в cookie выставляю добавленный менеджер. Пытаюсь авторизоваться на сайте, мне выбивает, что у меня не включены cookies. Как быть |
#2
|
||||
|
||||
включи куки
Пишу программы за еду. __________________ |
#3
|
|||
|
|||
я бы и рад. но чайник. не подскажите как это сделать?
|
#4
|
||||
|
||||
Оффтоп:
Цитата:
Код:
var HTTP: TIdHTTP; SP: String; CM: TidCookieManager; Data:Tstringlist; begin Data:= TStringList.Create; CM:= TidCookieManager.Create(Http); Http.AllowCookies:= true; Http.CookieManager:= CM; Http.HandleRedirects:= true; Http.Request.UserAgent:= 'Opera/9.80 (Windows NT 6.1; U; ru) Presto/2.10.229 Version/11.61'; Http.Request.Accept:= '*/*'; Http.Request.AcceptLanguage:= 'ru-RU,ru;q=0.9,en;q=0.8'; Data.Add('username='); // Логин Data.Add('password='); // Пароль try SP:= Http.Post('http://*/*login', Data); except end; if pos('reg.php',SP) <> 0 then ShowMessage('Неверный логин или пароль') else ShowMessage('Всё нормально, авторизовались'); Data.Free; // Soft.Bz Я не понял Вашего вопроса, но всё же Вам на него отвечу! |
#5
|
|||
|
|||
Видел этот код уже на паблике.
Не работает! Не хочет! Все пишет и пишет. У вас не включены cookie! |
#6
|
||||
|
||||
Телепаты у нас в загугл ушли, как авторизуетесь, код покажите
UPDsm Цитата:
Я не понял Вашего вопроса, но всё же Вам на него отвечу! |
#7
|
|||
|
|||
http://i.imgur.com/ZidP1AC.png
Код:
begin HTTP:=TIdHTTP.Create(nil); with HTTP do begin AllowCookies:=true; HandleRedirects:=false; ReadTimeout:=10000; ProxyParams.ProxyServer:=proxy; ProxyParams.ProxyPort:=StrToInt(pport); end; //формируем параметры для POST запроса Send:=TStringList.Create; Send.Add('log='+login); Send.Add('pwd='+passw); Send.Add('testcookie=1'); Send.Add('redirect_to='+url.Text+'/wp-admin/'); Send.Add('wp-submit=Войти'); try HTTP.Request.Referer:=url.Text+'/wp-login.php'; / pg:=HTTP.Post(url.Text+'/wp-login.php', send); HTML:=HTTP.Get(url.Text+'/wp-admin/'); if(pos('wp-admin/post-new.php', HTML) <> 0) then result:=1 else result:=2; except result:=0; end; LogMemo.Lines.Add(pg); Send.Free; HTTP.Free; end; |
#8
|
||||
|
||||
Я не понял Вашего вопроса, но всё же Вам на него отвечу! Последний раз редактировалось Alegun, 09.02.2014 в 03:40. |
#9
|
||||
|
||||
Цитата:
Код:
AIdHTTP.Request.CustomHeaders.Text:='Cookie: '+ACookie; Пишу программы за еду. __________________ |
#10
|
|||
|
|||
Проблема в том, что при отправке post мне пишет проблему с куками. а после мне нет смысла их принимать.
|
#11
|
||||
|
||||
так после GET их получишь скорее всего
Пишу программы за еду. __________________ |
#12
|
|||
|
|||
Советую посмотреть в сторону Synapse. В свое время очень намучался с глючной инди, а синапс суперский.
|