|
Основной форум Сюда все проблемы связанные с программированием. |
16.01.2007, 23:45
|
#1
|
AnyKey`щик
Регистрация: 10.01.2007
Сообщений: 8
Написано 0 полезных сообщений (для 0 пользователей)
|
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 ?
|
(Offline)
|
|
17.01.2007, 00:04
|
#2
|
ПроЭктировщик
Регистрация: 25.12.2006
Сообщений: 163
Написано 7 полезных сообщений (для 12 пользователей)
|
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.
|
(Offline)
|
|
24.01.2007, 22:28
|
#3
|
ПроЭктировщик
Регистрация: 20.10.2006
Сообщений: 102
Написано одно полезное сообщение
|
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;
не выходит.
|
(Offline)
|
|
24.01.2007, 23:39
|
#4
|
ПроЭктировщик
Регистрация: 25.12.2006
Сообщений: 163
Написано 7 полезных сообщений (для 12 пользователей)
|
Re: php скрипты
Опыта у меня немного, но по-моему, сначала надо запрос серверу подать SendHttpMessage, дождаться ответа, а уж потом, если ошибки не было, пытаться получить ответ getHttpResponce...
|
(Offline)
|
|
24.01.2007, 23:47
|
#5
|
ПроЭктировщик
Регистрация: 20.10.2006
Сообщений: 102
Написано одно полезное сообщение
|
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;
Тупо висит и все.
|
(Offline)
|
|
25.01.2007, 09:39
|
#6
|
ПроЭктировщик
Регистрация: 25.12.2006
Сообщений: 163
Написано 7 полезных сообщений (для 12 пользователей)
|
Re: php скрипты
у меня была подобная проблема при тесте на телефоне - на эмуле отрабатывало быстро... висит тупо именно на реальном телефоне? если да, то мне помогли 2 вещи:
1. Отключение прокси в настройках HTTP-профиля для мидлетов
2. Терпение ответ приходил где-то за 45-75 секунд ... мидлет не висит, он ждет...
|
(Offline)
|
|
25.01.2007, 10:25
|
#7
|
ПроЭктировщик
Регистрация: 20.10.2006
Сообщений: 102
Написано одно полезное сообщение
|
Re: php скрипты
Все остальные соеденения работают на ура.(опера,Jimm,Magent)
А с этим жду и 5 мин. но ничего не происходит.
|
(Offline)
|
|
25.01.2007, 10:52
|
#8
|
ПроЭктировщик
Регистрация: 25.12.2006
Сообщений: 163
Написано 7 полезных сообщений (для 12 пользователей)
|
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 Ок!
Может, причина не в этом участке кода?
|
(Offline)
|
|
25.01.2007, 11:28
|
#9
|
ПроЭктировщик
Регистрация: 20.10.2006
Сообщений: 102
Написано одно полезное сообщение
|
Re: php скрипты
У меня эмуль не поддерживает седенение. А с тела не работает.
И этот участок кода поставил в самом начале . А зачем такая длинная пауза вначале твоего кода?
|
(Offline)
|
|
25.01.2007, 12:02
|
#10
|
ПроЭктировщик
Регистрация: 20.10.2006
Сообщений: 102
Написано одно полезное сообщение
|
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);
|
|
(Offline)
|
|
25.01.2007, 13:01
|
#11
|
ПроЭктировщик
Регистрация: 25.12.2006
Сообщений: 163
Написано 7 полезных сообщений (для 12 пользователей)
|
Re: php скрипты
Сообщение от Chip
А зачем такая длинная пауза вначале твоего кода?
|
Да чтобы успеть открыть окно вывода отладочной инфы пержде, чем мидлет отработает
|
(Offline)
|
|
25.01.2007, 18:15
|
#12
|
ПроЭктировщик
Регистрация: 20.10.2006
Сообщений: 102
Написано одно полезное сообщение
|
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.
|
|
(Offline)
|
|
28.01.2007, 19:09
|
#13
|
Знающий
Регистрация: 10.08.2006
Сообщений: 254
Написано 3 полезных сообщений (для 3 пользователей)
|
Re: php скрипты
Стандартными средствами Паскаля нельзя превратить строку в Имэдж..
|
(Offline)
|
|
28.01.2007, 19:59
|
#14
|
ПроЭктировщик
Регистрация: 20.10.2006
Сообщений: 102
Написано одно полезное сообщение
|
Re: php скрипты
Можно ! Посмотри в атаче. В ресурсе есль только текстовый фаил
|
(Offline)
|
|
23.07.2008, 14:36
|
#15
|
ПроЭктировщик
Регистрация: 02.07.2008
Сообщений: 105
Написано 7 полезных сообщений (для 14 пользователей)
|
Ответ: php скрипты
Гм, очень интересно.
Действительно, тут из какой-то странной текстовой строчки формируется большая картинка. У кого-нибудь есть мысли, как это сделано?
|
(Offline)
|
|
Ваши права в разделе
|
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения
HTML код Выкл.
|
|
|
Часовой пояс GMT +4, время: 16:21.
|