Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 01.12.2010, 15:22
Dolar Dolar вне форума
Прохожий
 
Регистрация: 13.11.2010
Сообщения: 2
Репутация: 10
По умолчанию Авторизация на LostFilm.tv

Здравствуйте! Нашел пример авторизации на сайте и попробовал авторизироваться на сайте Lostfilm.tv и ничего не вышло. Может я что то упускаю? Не могли бы вы мне помочь.
Сначала пробовал:
Цитата:
...
LoginInfo := TStringList.Create;
Response := TStringList.Create;
try
LoginInfo.Add('FormLogin=Логин');
LoginInfo.Add('FormPassword=Пароль');
LoginInfo.Add('module=1');
LoginInfo.Add('repage=user');
LoginInfo.Add('act=login');
Response.Text := IdHTTP1.Post('http://lostfilm.tv/useri.php',LoginInfo);
if Pos('ПРИВЕТ',Response.Text)=0 then
ShowMessage('Провал!')
else
ShowMessage('Авторизовались!');
finally
LoginInfo.Free;
end;
end;
Но в результате я вообще ничего не получаю.
Затем пробовал:
Цитата:
...
IdHTTP1.get('http://lostfilm.tv/useri.php?FormLogin=Логин&FormPassword=Пароль&modu le=1&repage=user&act=login');
...
Но тоже ничего, хотя в браузере,таким образом, авторизация успешна.

Забыл добавить, програмист я не мощный, если можно, то по подробней. Заранее спасибо.
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 05:51.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025