Здравствуйте! Нашел пример авторизации на сайте и попробовал авторизироваться на сайте 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');
...
|
Но тоже ничего, хотя в браузере,таким образом, авторизация успешна.
Забыл добавить, програмист я не мощный, если можно, то по подробней. Заранее спасибо.