Модераторы: korob2001, ginnie
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> html form onChange 
V
    Опции темы
gcc
Дата 10.11.2008, 17:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Агент алкомафии
****


Профиль
Группа: Участник
Сообщений: 2691
Регистрация: 25.4.2008
Где: %&й

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



Код

<div id="admin_virtual">
<form name="overview" method="post">
<select name="Domain" onChange="this.form.submit()";>
  
  <option value="dfgdfg.com" selected>dfgdfg.com</option>
  
  <option value="rrrrrr" selected>rrrrrr</option>
 
</select>
<input type="submit" name="postfixform" value="Go" />
</form>


Есть HTML после выбора автоматичеcки происходит загрузка

но не определяется Domain

Код

 $query->param("Domain");


то есть после выбора Domain ничему не равно, почему так?

но если без автовыбора, то всё работает...

используется cgi + HTML::Template

Это сообщение отредактировал(а) gcc - 10.11.2008, 17:42
PM WWW ICQ Skype GTalk Jabber   Вверх
ginnie
Дата 10.11.2008, 17:48 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Комодератор
Сообщений: 1287
Регистрация: 6.1.2008
Где: Москва

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



gcc, посмотри, какие параметры приходят в скрипт

Код

my @names = $query->param();


если в массиве будет имя Domain, тогда надо выяснить его значение

Код

warn('Domain: ', $query->param('Domain') // 'undef');


В запросе может быть несколько значений с именем Domain, тогда $query->param('Domain') вернет массив этих значений.

Это сообщение отредактировал(а) ginnie - 10.11.2008, 17:49


--------------------
Написать код, понятный компьютеру, может каждый, но только хорошие программисты пишут код, понятный людям. (Мартин Фаулер. Рефакторинг)
PM MAIL Skype Jabber   Вверх
gcc
Дата 10.11.2008, 18:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Агент алкомафии
****


Профиль
Группа: Участник
Сообщений: 2691
Регистрация: 25.4.2008
Где: %&й

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



спасибо, забыл определить в начале...

сделал примерно так:
Код

if ($actionp eq 'add') {add();}
elsif ($actionp eq 'edit') {edit();}
elsif ($actionp eq 'list' || defined($domain))) {list();}
.....






Это сообщение отредактировал(а) gcc - 10.11.2008, 18:07
PM WWW ICQ Skype GTalk Jabber   Вверх
gcc
Дата 14.12.2008, 17:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Агент алкомафии
****


Профиль
Группа: Участник
Сообщений: 2691
Регистрация: 25.4.2008
Где: %&й

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



подскажите можно так писать? нигде не видел, может быть нельзя

Код

  my %hash = map { $_ => $query->param($_) } my @names = $query->param();


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

на пхп это считает ошибка в безопасности, там есть опция register_globals off



Это сообщение отредактировал(а) gcc - 14.12.2008, 17:53
PM WWW ICQ Skype GTalk Jabber   Вверх
KSURi
Дата 14.12.2008, 19:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

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



gcc, может вам проще воспользоваться методом Vars из CGI.pm?


--------------------
Died at Life.pl line 21
PM Jabber   Вверх
gcc
Дата 14.12.2008, 19:58 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Агент алкомафии
****


Профиль
Группа: Участник
Сообщений: 2691
Регистрация: 25.4.2008
Где: %&й

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



Код

%params = $q->Vars;


спасибо, не заметил

PM WWW ICQ Skype GTalk Jabber   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Perl"
korob2001
sharq
  • В этом разделе обсуждаются общие вопросы по языку Perl
  • Если ваш вопрос относится к системному программированию, задавайте его здесь
  • Если ваш вопрос относится к CGI программированию, задавайте его здесь
  • Интерпретатор Perl можно скачать здесь ActiveState, O'REILLY, The source for Perl
  • Справочное руководство "Установка perl-модулей", можно скачать здесь


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, korob2001, sharq.

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


 




[ Время генерации скрипта: 0.0703 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.