|
Вопрос # 4 079/ вопрос открыт / |
|
Доброго времени суток, уважаемые эксперты!
Авторизация VK
Делфисты юзающие сеть, помогите с авторизацией vkontakte.ru.
Авторизация в принцепе готова, но при 3-ем шаге (после пост запроса) геакции нету никакой... тоесть ничего не происходит (наверно)
Короче авторизация не проходит...
Кто может помоч: ICQ: 375212222
 |
Вопрос задал: Ximer (статус: Посетитель)
Вопрос отправлен: 22 апреля 2010, 17:36
Состояние вопроса: открыт, ответов: 0.
|
Мини-форум вопроса
Всего сообщений: 15; последнее сообщение — 23 апреля 2010, 05:27; участников в обсуждении: 2.
|
Вадим К (статус: Академик), 22 апреля 2010, 17:41 [#1]:
ошибка в 17 строке в втором юните слева.
Галочка "подтверждения прочтения" - вселенское зло.
|
|
|
Ximer (статус: Посетитель), 22 апреля 2010, 17:44 [#2]:
Ты шутник! =)))
|
|
|
Ximer (статус: Посетитель), 22 апреля 2010, 17:45 [#3]:
P.S.: ...Вы
|
|
|
Вадим К (статус: Академик), 22 апреля 2010, 17:46 [#4]:
Конечно, где исходники? как я угадаю, что там не так. может просто банально куку не передали?
Галочка "подтверждения прочтения" - вселенское зло.
|
|
|
Ximer (статус: Посетитель), 22 апреля 2010, 17:50 [#5]:
params:=TStringList.Create;
responseres:=TStringList.Create;
params.Add('op=a_login_attempt');
responseres.Text:=idhttp1.Post('http://vkontakte.ru/login.php',params);
params.free;
responseres.free;
//Step2
params:=TStringList.Create;
responseres:=TStringList.Create;
params.Add('email='+L); //Там он в переменной
params.Add('pass='+P); //Там он в переменной
params.Add('expire=');
params.Add('vk=');
responseres.Text:=idhttp1.Post('http://login.vk.com/?act=login',params);
//For A:=0 To IdHTTP1.CookieManager.CookieCollection.Count-1 Do
//Memo2.Lines.Append(responseres.Text);
s1:=(responseres.Text);
S2:=Copy(s1, Pos('value=', s1)+7, 56);
Memo2.Lines.Add(S2);
params.free;
responseres.free;
//Step3
params:=TStringList.Create;
responseres:=TStringList.Create;
params.Add('s='+S2);
params.Add('op=slogin');
params.Add('redirect=1');
params.Add('expire=0');
params.Add('to=');
responseres.Text:=idhttp1.Post('http://vkontakte.ru/login.php',params);
if Pos('logout', responseres.Text)<>0 then
Memo2.Lines.Add(L+n+P) else Memo2.Lines.add('[No login]');
Memo2.Lines.Append(responseres.Text);
params.free;
responseres.free;
|
|
|
Вадим К (статус: Академик), 22 апреля 2010, 17:58 [#6]:
Когда то мучился с CookieManager - он не передавал куки, или передавал совсем не то, что хотелось. Пришлось ручками.
Галочка "подтверждения прочтения" - вселенское зло.
|
|
|
Ximer (статус: Посетитель), 22 апреля 2010, 18:01 [#7]:
Тоесть вы щитаете что ошибка может быть в передаче кукисов?!
Я сначало куки в мемо выводил перед отправкой на серв =)
Он норм s= передаёт =)А что ещё может быть?
|
|
|
Вадим К (статус: Академик), 22 апреля 2010, 18:03 [#8]:
а ещё может быть useragent.
А то что куки точно передаются я не был бы так уверен. В логи сервера вконтакта смотрели?
Галочка "подтверждения прочтения" - вселенское зло.
|
|
|
Ximer (статус: Посетитель), 22 апреля 2010, 18:10 [#9]:
Ну куки я получаю... ...значит отправить их должнобыть пол дела!=/ИМНО
|
|
|
Ximer (статус: Посетитель), 22 апреля 2010, 18:11 [#10]:
*I
|
|
|
Ximer (статус: Посетитель), 22 апреля 2010, 18:11 [#11]:
А чё там только 56 символов передать и всегото
|
|
|
Ximer (статус: Посетитель), 22 апреля 2010, 18:15 [#12]:
Мля вот задачка
|
|
|
Ximer (статус: Посетитель), 22 апреля 2010, 18:20 [#13]:
Дальше по идее идёт перенапровление...
|
|
|
Вадим К (статус: Академик), 22 апреля 2010, 18:21 [#14]:
А можно нормальным русским, украинским или английском написать, а не поток мыслей на неведомом языке, отдаленно напоминающий русский сапожный?
Галочка "подтверждения прочтения" - вселенское зло.
|
|
|
Ximer (статус: Посетитель), 23 апреля 2010, 05:27 [#15]:
А ты можеш прикрутить куки, принимать кукисы...
|
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|
