Показать сообщение отдельно
Старый 26.09.2007, 20:11   #8
Aluk
AnyKey`щик
 
Регистрация: 22.09.2007
Сообщений: 11
Написано 0 полезных сообщений
(для 0 пользователей)
Re: POST запрос работает на эмуле а на мобиле нет

все остальные приложения работаю все но не через хттп а через сокет, МП я как понял не дает возможность работы с сокетами? я прав?
и насчет прокси(у мя МТС(ЮМС)) я не совсем шарю насчет прокси, но как его подключить если я запучкаю такое приложение
program net;
var 
connhttp
htmlBodystring
contentTypestring
con:integer;
begin 
 htmlBody
:='p=postbody';
if 
not openHttp(conn'http://nvu.ru/checkpost.php?'+htmlBodythen halt
  
setHttpMethod(connPOST);
  
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); 
  
con := formAddString('used method '+htmlBody); 
  
showForm;
  
delay(5000);
end
отправляя пост запрос на сайт http://nvu.ru/checkpost.php ???
(Offline)
 
Ответить с цитированием