VPF::Авторизация vkontakte - Форум программистов

Recev

Дата 18.10.2010, 21:09 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 76
Регистрация: 18.10.2010

Репутация: нет
Всего: нет

Авторизировался вконтакте с помощью следующего кода:

Код


var data:tstringlist;
        PageProfile:string;
        error:boolean;
   begin
    IdHTTP1.AllowCookies:=true;
    IdHTTP1.HandleRedirects:=false;
    data:=tstringlist.create;
    data.Add('email='+edit1.text); // логин для авторизации, берём из edit1
    data.Add('pass='+edit2.Text);  // пароль для авторизации, берём из edit2
    data.Add('expire=');
    data.Add('vk=');
    error:=false;
    try
     PageProfile:=IdHTTP1.Post('http://login.vk.com/?act=login', data);
    except
     error:=true;
    end;

    if not(error) then
     begin
      data.Clear;
      data.Add('s='+Copy(PageProfile, Pos('value', PageProfile)+7, 56));
      data.Add('op=slogin');
      data.Add('redirect=1');
      data.Add('expire=0');
      data.Add('to=');
      IdHTTP1.HandleRedirects:=true;
      try
       PageProfile:=IdHTTP1.Post('http://vkontakte.ru/login.php', data);
    except
      end;
     listbox1.items.add('Авторизовались');//listbox1 - это наш лог.
     end
    else
  listbox1.Items.Add('Авторизация не удалась');

    Data.Free;

При этом PageProfile возвращает чистую страницу (т.е страницу с запросом на авторизацию.).
Кто нить поможет вытащить свою страницу из контакта?

cat512

Дата 19.10.2010, 19:49 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 438
Регистрация: 20.3.2007

Репутация: нет
Всего: 15

Ставишь httpanalyser и смотришь, что отсылается и что принимается

Recev

Дата 20.10.2010, 14:41 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 76
Регистрация: 18.10.2010

Репутация: нет
Всего: нет

cat512, ты бы сначала протестировал, а затем писал.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Сети \| Следующая тема »