Post запрос через Synapse

[mss]

Сообщение от Lauri

Просмотрел сниффером
Запрос даже не отправляеться почему то... ошибки нету...

Не знаю.
У меня все чудесно отправляется и Апач отвечает на запрос.

[Lauri]

Сообщение от mss

Не знаю.
У меня все чудесно отправляется и Апач отвечает на запрос.

Код точно такой же используешь?
мож я установил не верно... в папку lib вроди бросил

[mss]

var
  Data: TStringStream;
  HTTPs: THTTPSend;
begin

  https:=thttpsend.Create;
  Data := TStringStream.Create('');
  Data.WriteString(EncodeURLElement('wan=91.123.124.12'));
  Data.WriteString(EncodeURLElement('os=XP'));
  Data.Position:=0;
  HTTPs.Document.LoadFromStream(Data);
  if not HTTPs.HTTPMethod('POST','http://crasher.byethost3.com/') then
    writeln('error')
  else begin
    writeln(PChar(HTTPs.Document.Memory));
  end;
 ReadLn;
end.

[mss]

var
  Data: TStringStream;
  HTTPs: THTTPSend;
begin

  https:=thttpsend.Create;
  Data := TStringStream.Create('');
  Data.WriteString(EncodeURLElement('wan=91.123.124.12'));
  Data.WriteString(EncodeURLElement('os=XP'));
  Data.Position:=0;
  HTTPs.Document.LoadFromStream(Data);
  if not HTTPs.HTTPMethod('POST','http://crasher.byethost3.com/') then
    writeln('error')
  else begin
    writeln(PChar(HTTPs.Document.Memory));
  end;
 ReadLn;
end.