VPF::передача параметров из формы - Форум программистов

*NS*

Дата 26.3.2002, 13:11 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник Клуба
Сообщений: 299
Регистрация: 26.3.2002

Репутация: нет
Всего: нет

товарищи подскажите..
из формы (хтмлевской) передаю параметры скрипту, param1, param2 и т.д. , но я не знаю склько их в форме...
как мне их все обработать скриптом? (ну явно получить в скрипте)
через стандартный $name = $query -> param{'param1'} и т.д. не получается т.к. я не знаю сколько их

--------------------

ну, все, что знал - рассказал...

Cepera

Дата 27.3.2002, 08:47 (ссылка)

(нет голосов)

Загрузка ...

PHPexp

Профиль
Группа: Экс. модератор
Сообщений: 2146
Регистрация: 25.3.2002
Где: Russia, Samara

Репутация: нет
Всего: 7

хм... задача интересна...
а вот такой выход попробуй...
передавай сначала параметром (первым, естественно) общее кол-во параметров, и все :satisfied

--------------------

I know it is heavy for reading, but I know you will read it anyway...

Arx

Дата 30.3.2002, 11:15 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 20
Регистрация: 30.3.2002
Где: Москва

Репутация: нет
Всего: нет

да элементарно

Код


 $buffer=$ENV{'QUERY_STRING'};
 @pairs=split(/&/,$buffer);
 foreach $pair (@pairs)
 {
  ($name, $value)=split(/=/,$pair);
  $value =~ tr/+/ /;
  $value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C",hex($1))/eg;
  $value =~ s/<!--(.|\n)*-->//g;
  $FORM{$name}=$value;
 }

*NS*

Дата 1.4.2002, 10:29 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник Клуба
Сообщений: 299
Регистрация: 26.3.2002

Репутация: нет
Всего: нет

а для POST ?

--------------------

ну, все, что знал - рассказал...

Arx

Дата 1.4.2002, 11:44 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 20
Регистрация: 30.3.2002
Где: Москва

Репутация: нет
Всего: нет

такая же хрень, тока в $buffer кладешь данные из STDIN'а
ну как обычно вобщем
можно сделать универсально для обоих методов

Код


if( $ENV{'REQUEST_METHOD'} eq "POST" )
{
        read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
}
elsif($ENV{'REQUEST_METHOD'} eq "GET")
{
       $buffer=$ENV{'QUERY_STRING'};
}

...

Это сообщение отредактировал(а) korob2001 - 10.3.2005, 12:56

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Perl: разработка для Web \| Следующая тема »