[saylar_06]

Доброго времени суток! В общем пытаюсь авторизоваться вконтакте через 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 вконтакте желательно для мобильной версии?

[PhoeniX]

Включи наконец поддержку HTTPS... И будет тебе счастье...
TIdSSLIOHandlerSocketOpenSSL на форму, выбрать его в IdHTTP, и кинуть пару DLL в папку с программой.

[NumLock]

либо WinHTTP использовать, тогда и таскать ничего не нужно.