[Роман]

В общем в логе сервера отображается запрос типа GET (((
как ни крути.:

program smssend; 
var 
conn: http; 
htmlBody: string; 
contentType: string; 
label_id:integer;
begin 
  htmlBody:='p=postbody';
  if not openHttp(conn, 'http://nvu.ru/checkpost.php') then halt; 
  setHttpMethod(conn, POST);
  addHttpHeader(conn, 'User-agent', 'SendSMS'); 
  addHttpHeader(conn, 'Content-type','application/x-www-form-urlencoded');
  addHttpHeader(conn, 'Content-Length', integertoString(length(htmlBody)+1));
  addHttpBody(conn,htmlBody);
  if sendHttpMessage(conn) <> 200 then halt; 
  htmlBody := getHttpResponse(conn);
  closeHttp(conn); 
  label_id := formAddString('used method '+POST+chr(10)+chr(13)+htmlBody); 
  showForm;
  delay(5000);
end.

###.###.###.### nvu125.ultrahosting.ru - [09/Mar/2006:14:39:48 +0300] "GET /checkpost.php HTTP/1.1" 200 22 "-" "UNTRUSTED/1.0"