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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 28.03.2011, 22:47   #1
Pein95
Форумчанин
 
Регистрация: 25.04.2010
Сообщений: 881
По умолчанию получить id вконтакте после авторизации

ну собственно из названия темы все ясно, как можно получить id страницы после авторизации, я авторизировалса с помощю idhttp вот код:
Код:
idhttp1.AllowCookies:=true;
idhttp1.HandleRedirects:=false;
data:=tstringlist.Create;
data.Add('email='+mailedit.Text);
data.Add('pass='+passedit.Text);
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;
   Memo1.Lines.Add('Авторизация удалась');
  end
 else
  Memo1.Lines.Add('Авторизация не удалась');

 Data.Free;
Pein95 вне форума Ответить с цитированием
Старый 28.03.2011, 23:04   #2
Pein95
Форумчанин
 
Регистрация: 25.04.2010
Сообщений: 881
По умолчанию

неужели никто не знает как ето сделать?
Pein95 вне форума Ответить с цитированием
Старый 29.03.2011, 00:08   #3
Pein95
Форумчанин
 
Регистрация: 25.04.2010
Сообщений: 881
По умолчанию

все проблема решена с помощю api вконтакте)
Pein95 вне форума Ответить с цитированием
Старый 31.03.2011, 14:58   #4
cargo29
Форумчанин
 
Регистрация: 13.12.2010
Сообщений: 603
По умолчанию

Цитата:
Сообщение от Pein95 Посмотреть сообщение
все проблема решена с помощю api вконтакте)
http://vkontakte.ru/developers.php#devstep1

но я сам еще ни разу даже не пробовал с этим работать ..
cargo29 вне форума Ответить с цитированием
Старый 08.05.2011, 13:42   #5
bohdan09
 
Аватар для bohdan09
 
Регистрация: 18.11.2010
Сообщений: 5
По умолчанию

А можно такое же только на C#?
bohdan09 вне форума Ответить с цитированием
Старый 09.05.2011, 01:12   #6
Usov
Форумчанин
 
Аватар для Usov
 
Регистрация: 29.09.2009
Сообщений: 228
По умолчанию

Там просто пример запросов HTTP, и сам разработчик его интерпретирует под свою среду разработки.
Кстати API для спама не рулят.

Последний раз редактировалось Usov; 09.05.2011 в 01:14.
Usov вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
получить текст сообщения вконтакте Dionix Работа с сетью в Delphi 9 12.07.2010 14:37
Исходник процедуры авторизации в вконтакте. Как запустить? big_master Общие вопросы Delphi 11 28.04.2010 09:32
Получить скан код после WM_KEYEVENT TwiX Общие вопросы Delphi 1 21.04.2010 23:09