|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Авторизация вконтакте Delphi Indy
Доброго времени суток! В общем пытаюсь авторизоваться вконтакте через Delphi Indy без всякого API вконтакте, ну так нужно... Разумеется искал я и нашел просто фантастическое количество способов авторизации, но увы все они уже не актуальны значит нужно сделать свой сначала, думаю все действия лучше производить через http://m.vk.com/ так как основной сайт забит всякими js и ajax query и ещё всякой мутней.
И так что мы имеем? http://m.vk.com/ форма отправляет https://login.vk.com/act=login&_orig...ole=pda&utf8=1 причем указан тег novalidate и параметры email и pass всё так просто? Код:
Idhttp1.AllowCookies:=true; Idhttp1.HandleRedirects:=true; Data:=TstringList.Create; Data.Add('email='+Edit1.Text); Data.Add('pass='+Edit2.Text); Memo1.Text := IdHTTP1.Post(link, Data); if Pos('Не удается войти', Memo1.Text) <> 0 then begin if Pos('Выход', Memo1.Text) <> 0 then Memo2.Lines.Add('Авторизация прошла успешно') else Memo2.Lines.Add('Ошибка авторизации'); end else Memo2.Lines.Add(Пожалуйста, проверьте правильность введенных данных'); Data.Free; Но элементарно условия не срабатывают потому что выходит ошибка IOHandler value is not valid то есть идёт редирект на https? на мобильной то версии? или что за зло там твориться? Есть у кого нибудь уже готовый кусок кода простой авторизации вконтакте без API вконтакте желательно для мобильной версии? Последний раз редактировалось Admin, 22.12.2013 в 14:19. |
#2
|
||||
|
||||
Включи наконец поддержку HTTPS... И будет тебе счастье...
TIdSSLIOHandlerSocketOpenSSL на форму, выбрать его в IdHTTP, и кинуть пару DLL в папку с программой. Оставайтесь хорошими людьми... VK id2634397, ds [at] phoenix [dot] dj |
#3
|
||||
|
||||
либо WinHTTP использовать, тогда и таскать ничего не нужно.
Пишу программы за еду. __________________ |