Показать сообщение отдельно
  #1  
Старый 30.03.2012, 14:52
scroyler scroyler вне форума
Активный
 
Регистрация: 01.08.2011
Адрес: ЧЕбоксары
Сообщения: 248
Версия Delphi: XE
Репутация: -615
По умолчанию Проблемы с авторизацией

Помогте пройти авторизацию на юкоз форуме
http://remain.do.am
Деаю так:
Код:
var params,responseres:tstringlist;
begin
params:=TStringList.Create;
responseres:=TStringList.Create;
try
params.Add('user=test');
params.Add('password=test');
params.Add('rem=1');
params.Add('a=2');
params.Add('ajax=1');
params.Add('rnd=159');
params.Add('_tp_=xml');
responseres.Text:=idhttp1.Post('http://remain.do.am/index/sub/',params);
if Pos('log',responseres.Text)>0 then
ShowMessage('Авторизовались!');
finally
params.free;
responseres.free;
end;
end;
Сниффером ловлю, не верно логин и пароль, но они верны!
ЧТо в запросе не верно?
Логин и пароль которые в этом коде валидны (специально создал)
__________________
Ставь спасибо за спасибо!
Помог?Ставь спасибо!Увидел пост? Поставь спасибо!
Ответить с цитированием