Показать сообщение отдельно
  #2  
Старый 17.02.2016, 13:14
ApxaHGe1 ApxaHGe1 вне форума
Активный
 
Регистрация: 08.04.2008
Адрес: Нижний новгород
Сообщения: 311
Репутация: 38
По умолчанию

Код:
procedure th.Execute;
begin
h.MimeType:='application/x-www-form-urlencoded';
 
send.WriteString('login=Testt&pass=123456');
h.Document.LoadFromStream(send);
h.HTTPMethod('POST','http://tiwar.ru/?sign_in=1');
g.LoadFromStream(h.Document);
 
form1.memo1.Lines.Add(utf8decode(h.Headers.Text));
form1.memo1.Lines.Add(inttostr(h.ResultCode));
form1.memo1.Lines.Add(utf8decode(g.Text));
end;
Админ: пятидневный бан за несоблюдение правил форума по оформлению кода.

Перед постом хедер чистить надо.а первый запрос на авторизацию без него слать. И без юзер агента. Вообщем попробуй
Ответить с цитированием