Проблема с авторизацией..

[egorzenit]

Здравствуйте. помогите пожалуйста.
пытаюсь авторизоваться на сайте http://egorzenit.tmweb.ru
данные для входа login:1234 pass:1234
не как не получается авторизоваться через idhttp..

PHP код:

procedure TForm1.Button1Click(Sender: TObject);
var
LoginData, Response: TStrings;
begin
LoginData := TStringList.Create;
Response := TStringList.Create;
try
LoginData.Add('login='+Edit1.Text);
LoginData.Add('password='+Edit2.Text);
LoginData.Add('login=Войти');
Response.Text := IdHTTP1.Post('http://egorzenit.tmweb.ru/index.php',LoginData);
if Pos('Вы успешно зашли на сайт, сейчас вы будете перенаправлены на главную страницу. Ваш Логин:1234 Data: Date: ',Response.Text)>0 then
ShowMessage('Авторизовались!')
else
ShowMessage('Авторизация не удалась!');
finally
LoginData.Free;
end;
end; 


Вот код.. подскажите как авторизоваться..

[W0LF]

Как-то так...

function Auth(Login, Password: string; var Http: TIdHTTP): Boolean;
begin
  try
    Result := Boolean(Pos('Вы успешно зашли на сайт',
                Http.Get('http://egorzenit.tmweb.ru/enter.php?login='
                  +Login+'&password='+Password+'&submit=Войти')));
  except Result := False end;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  if Auth('1234', '1234', IdHTTP1) then
    ShowMessage('Yes')
  else
    ShowMessage('No');
end;

[=master=]

подскажите как авторизоваться..

во первых запрос надо посылать на страницу enter.php.
во вторых не авторизации а аутентификации.