Форум программистов, компьютерный форум, киберфорум
Наши страницы

Delphi для начинающих

Войти
Регистрация
Восстановить пароль
 
Dima-nk
1 / 1 / 0
Регистрация: 23.04.2013
Сообщений: 199
#1

idhttp не берет куки - Delphi

25.09.2013, 10:50. Просмотров 419. Ответов 1
Метки нет (Все метки)

кинул на форму idcookiemanager
соединил его с idhttp. вообщем вот код.
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
unit Unit1;
 
interface
 
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, IdCookieManager, IdBaseComponent, IdComponent, IdTCPConnection,
  IdTCPClient, IdHTTP, StdCtrls;
 
type
  TForm1 = class(TForm)
    Edit1: TEdit;
    Edit2: TEdit;
    Memo1: TMemo;
    Button1: TButton;
    IdHTTP1: TIdHTTP;
    IdCookieManager1: TIdCookieManager;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;
 
var
  Form1: TForm1;
 
implementation
 
{$R *.dfm}
 
procedure TForm1.Button1Click(Sender: TObject);
var s:string;
    http:TIdHTTP;
begin
  http:=TIdHTTP.Create(form1);
  http.AllowCookies:=True;
  http.CookieManager:=IdCookieManager1;
  http.HandleRedirects:=True;
  http.Request.Connection:='keep-alive';
  http.Request.UserAgent:='Opera/9.80 (Windows NT 5.1; U; ru) Presto/2.10.229 Version/11.61';
 
  s:=http.Get('http://login.vk.com/?act=login&expire=1&email='+edit1.text+'&pass='+edit2.text+'&success_url=http://vkontakte.ru/share.php?act=logged');
  Memo1.Text:=s;
 
end;
 
end.
0
Миниатюры
idhttp не берет куки   idhttp не берет куки  
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
25.09.2013, 10:50
Здравствуйте! Я подобрал для вас темы с ответами на вопрос idhttp не берет куки (Delphi):

Берет информацию только с 1 строчки memo - Delphi
Всем привет, делаю парсер(в потоке) Знаю что из потока нельзя взаимодействовать с виз. компонентами но как сделать по другому я не знаю...

Программа, которая берет набор символов из Edit1 и перебирает все их возможные сочетания - Delphi
Есть нехитрая прога, которая берет набор символов из Edit1 и перебирает все их возможные сочетания, записывая в ListBox1. Проблема в том,...

idHTTP - Delphi
Как сделать так, чтобы программа сама через idHTTP заходила в ВК, авторизовывалась и отправляла сообщение на определённый id?

IDHTTP - Delphi
Чтобы авторизироваться на сайте, приходится в idhttp выставлять необходимые заголовки. Например: А можно ли заставить idhttp самого...

IdHTTP + memo - Delphi
Здравствуйте! Никак не могу разобраться с кодировкой вывода( В memo вместо русских букв отображаются крокозябры. ЧИтаю, вроде много штук...

ProgressBar и IdHTTP - Delphi
Можно ли как присоединить ProgressBar не к WebBrowser а к загрузке страницы в мемо- поле компонентом IdHTTP.

1
Dima-nk
1 / 1 / 0
Регистрация: 23.04.2013
Сообщений: 199
25.09.2013, 10:50  [ТС] #2
indy 9
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
25.09.2013, 10:50
Привет! Вот еще темы с ответами:

глюк idHTTP - Delphi
подскажите как можно исправить. я делаю так: idHTTP1.Get('ссылка'); все нормально работает, как только инет отключаю вылазиет ошибка, я ёё...

Работа с IdHTTP - Delphi
Пытаюсь передать POST запрос на сервер (скрипт) посредством IdHTTP. В сервере, скрипте, правах доступа и т.д. уверен. Из скрипта, всё...

Исключения idHTTP - Delphi
При загрузке страниц у меня бывает что возникают исключения (из-за того что слишком часто обращаюсь к серверу возникает ошибка 429), как я...

IdHttp + WebBrowser - Delphi
С помощью IdHttp получаю исходный код страницы, как мне отобразить его графически в WebBrowser(не исходный код:)) без прямого коннекта к...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru