|
Вопрос # 5 974/ вопрос открыт / |
|
Здравствуйте уважаемые эксперты, так как я только начинаю изучать Delphi, мне хотелось бы сделать авторизацию на сайте (http://rutracker.org). Но увы, Не получается. Я был бы вам очень признателен, если бы вы нашли мои ошибки. Кланяюсь.
Приложение: Переключить в обычный режим- var
- Data: TStringList;
- Request: String;
- HTTP: TIdHTTP;
- begin
- Data := TStringList.Create;
- HTTP := TIdHTTP.Create(nil);
- HTTP.Request.UserAgent :=
- 'Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 6.0)';
- Data.Add('login_username=' + Edit1.Text);
- Data.Add('login_password=' + Edit2.Text);
- if CheckBox1.Checked then
- begin
- Data.Add('auth_remember=ok');
- end;
- try
- Request := HTTP.Post('http://login.rutracker.org/forum/login.php', Data);
- if Pos('./profile.php?mode=viewprofile&u=23472412', Request) <> 0 then
- begin
-
- end
- else
- begin
-
- end;
- finally
- Data.Free;
- Request := '';
- HTTP.Free;
- end;
-
- end;
- end.
 |
Вопрос задал: MrPrice (статус: Посетитель)
Вопрос отправлен: 2 марта 2012, 16:51
Состояние вопроса: открыт, ответов: 0.
|
Мини-форум вопроса
Всего сообщений: 6; последнее сообщение — 3 марта 2012, 14:24; участников в обсуждении: 3.
|
Ерёмин А.А. (статус: *Администратор), 2 марта 2012, 19:11 [#1]:
Cookies надо сохранять, не в воздухе же авторизация сохраняется.
|
|
|
MrPrice (статус: Посетитель), 2 марта 2012, 19:21 [#2]:
But how?
|
|
|
MrPrice (статус: Посетитель), 2 марта 2012, 19:27 [#3]:
Зачем куки? Если там просто авторизация
|
|
|
Ерёмин А.А. (статус: *Администратор), 2 марта 2012, 21:39 [#4]:
Что значит «просто авторизация»? И что вы собираетесь после неё делать?
|
|
bugmenot (статус: 3-ий класс), 2 марта 2012, 23:07 [#5]:
Нет там простой проверки подлинности, это же модифицированный форум на PHP.
виконання програми розпочинається з того самого мiсця, де призупинилося.
|
|
|
MrPrice (статус: Посетитель), 3 марта 2012, 14:24 [#6]:
Не могли бы вы написать?
|
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|
