forum.boolean.name - php скрипты

forum.boolean.name (http://forum.boolean.name/index.php)

- Основной форум (http://forum.boolean.name/forumdisplay.php?f=49)

- - php скрипты (http://forum.boolean.name/showthread.php?t=2434)

Lelick

16.01.2007 23:45

php скрипты

имеется вот такой php скрипт, допустим имя у него llck.php

<form action="llck.php" method="GET">
<p> Login <input type="text" name="conn" /> </p>
<p> password <input type="password" name="pas" /></p>
<p> <input type="submit" value="enter"> </p>
</form>

<?php

$s1 = $_GET["pas"];
$s2 = $_GET["conn"];
echo($s1.$s2."PREVED");
?>

он представляет из себя два текстовых поля и кнопку ентер, при нажатии на которую отображаются на странице переменные $s1 и $s2.

А теперь вопрос:
Как передавать имена pas и conn (на примере данного скрипта) из Midlet Pascal ?

ARV	17.01.2007 00:04

Re: php скрипты

пусть pas='Lelik' а conn='Bolik', тогда серверному скрипту http://www.super.com/igo-go.php эти штуки мы передаем так:

Код:

 

var

   url : string;

   cn : http;

   result : integer;

begin

   url := 'http://www.super.com/igo-go.php?pas=Lelik&conn=Bolik';

   if OpenHttp(cn, url) then begin

      SetHttpMethod(cn, GET);

      result := SendHttpMessage(cn);

      CloseHttp(cn);

   end;

end.

Chip	24.01.2007 22:28

Re: php скрипты

Нужно принять строку с сайта http://www.teploluxe.net/SMS.php
как это сделать?
Использую:

url := 'http://www.teploluxe.net/SMS.php';
if OpenHttp(cn, url) then
begin
SetHttpMethod(cn, GET);
result_string := getHttpResponse(cn);
CloseHttp(cn);
end;

не выходит.

ARV	24.01.2007 23:39

Re: php скрипты

Опыта у меня немного, но по-моему, сначала надо запрос серверу подать SendHttpMessage, дождаться ответа, а уж потом, если ошибки не было, пытаться получить ответ getHttpResponce...

Chip	24.01.2007 23:47

Re: php скрипты

По всякому пытался.
url := 'http://www.teploluxe.net/SMS.php';
if OpenHttp(cn, url) then
begin
SetHttpMethod(cn, GET);
if sendHttpMessage(cn) <> 200 then halt;
result := getHttpResponse(cn);
CloseHttp(cn);
end; else halt;

Тупо висит и все.

ARV	25.01.2007 09:39

Re: php скрипты

у меня была подобная проблема при тесте на телефоне - на эмуле отрабатывало быстро... висит тупо именно на реальном телефоне? если да, то мне помогли 2 вещи:
1. Отключение прокси в настройках HTTP-профиля для мидлетов
2. Терпение :) ответ приходил где-то за 45-75 секунд ... мидлет не висит, он ждет...

Chip	25.01.2007 10:25

Re: php скрипты

Все остальные соеденения работают на ура.(опера,Jimm,Magent)
А с этим жду и 5 мин. но ничего не происходит.

ARV	25.01.2007 10:52

Re: php скрипты

даже не знаю... у меня вот этот код

Код:

var

 cn : http;

 url : string;

 res : string;

 i : integer;

begin

 delay(5000);

 url := 'http://www.teploluxe.net/SMS.php';

 if OpenHttp(cn, url) then 

  begin

   SetHttpMethod(cn, GET);

   debug('begin');

   //i := sendHttpMessage(cn); // ***

   debug(''+i);

   res := getHttpResponse(cn);

   debug(res);

   CloseHttp(cn); 

  end;

 delay(5000);

end.

и не виснет в эмуляторе, отрабатывает быстренько (в отладочной консоли смотрю результат работы), а если снять ремарку со строки, отмеченной ***, то так же в эмуле отрабатывает практически мгновенно и получает следующую строку: wm+944516 Ок!
Может, причина не в этом участке кода?

Chip	25.01.2007 11:28

Re: php скрипты

У меня эмуль не поддерживает седенение. А с тела не работает.
И этот участок кода поставил в самом начале . А зачем такая длинная пауза вначале твоего кода?

Chip	25.01.2007 12:02

Re: php скрипты

Спасибо за помощь. Вынес в отдельный проект и все заработало.
Единственная проблема это кодировка. Но это решаемо.
Да скорость конекта достаточна приличная , ожидал худшего.

Цитата:

url := 'http://www.teploluxe.net/SMS.php';
if OpenHttp(cn, url) then
begin
SetHttpMethod(cn, GET);
i := sendHttpMessage(cn);
result := getHttpResponse(cn);
drawText(''+result,2,2);
repaint;
CloseHttp(cn);
end; else halt;
delay(3000);

ARV	25.01.2007 13:01

Re: php скрипты

Цитата:

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

А зачем такая длинная пауза вначале твоего кода?

Да чтобы успеть открыть окно вывода отладочной инфы пержде, чем мидлет отработает :)

Chip	25.01.2007 18:15

Re: php скрипты

Еще вопрос а как загрузить image из ресурса?

Цитата:

program CY;
var
i:integer;
url : string;
cn : http;
result : String;
begin
url := 'http://www.teploluxe.net/cy_pr.php?a=submit&code=voxtel.net.ru';
if OpenHttp(cn, url) then
begin
SetHttpMethod(cn, GET);
i := sendHttpMessage(cn);
result := getHttpResponse(cn);
CloseHttp(cn);
end; else halt;
//***************************
Здесь нужно проконвертировать result что то типа StringToImage
Кто делал? Подскажите.
А то ссылка которую дал здесь Pilgrim не пашет
//***************************
end.

IVenoMI

28.01.2007 19:09

Re: php скрипты

Стандартными средствами Паскаля нельзя превратить строку в Имэдж..

Chip	28.01.2007 19:59

Re: php скрипты

Вложений: 2

Можно ! Посмотри в атаче. В ресурсе есль только текстовый фаил :)

Skythrone

23.07.2008 14:36

Ответ: php скрипты

Гм, очень интересно.

Действительно, тут из какой-то странной текстовой строчки формируется большая картинка. У кого-нибудь есть мысли, как это сделано?

ViNT	23.07.2008 15:39

Ответ: php скрипты

Цитата:

Сообщение от Skythrone (Сообщение 82823)

У кого-нибудь есть мысли, как это сделано?

Картинка, это по сути набор байтов, строка - тоже. Просто строка распознается как массив данных RGB.

Skythrone

23.07.2008 16:21

Ответ: php скрипты

Т.е. ты имеешь в виду, что данная картинка строится на экране попиксельно, на основе считывания байт, назначения цвета и установки в заданную координату пикселя?

Или тут используются какие-либо встроенные средства MP / внешние библиотеки ?

Skythrone

23.07.2008 16:23

Ответ: php скрипты

Хотя да, ты прав:

176 x 220 x 3 = 116160

что соответствует длине этого файла.

Вопрос про сторонние библиотеки, реализующие быстрое построение такой картинки, остаётся открытым.

ViNT	23.07.2008 16:28

Ответ: php скрипты

Цитата:

Сообщение от Skythrone (Сообщение 82840)

Вопрос про сторонние библиотеки, реализующие быстрое построение такой картинки, остаётся открытым.

Загрузка из строки есть в Lib_im - image_from_string. Преобразование в строку - в Lib_imtostr.

Часовой пояс GMT +4, время: 14:52.