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

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Событие по нажатию кнопки 
:(
    Опции темы
PalmOs
Дата 30.5.2008, 19:03 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

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



Есть форма, в ней две кнопки, одно поле для ввода. Как сделать так чтобы при нажатие первой кнопки выполнялось одно событие, а при нажатие другой другое событие
Код

sub print_query {  # печать первого фрейма
$script_name = $query->script_name;
print "<H1>Finding the right partners statistics</H1>\n";
print $query->startform(-action=>"$script_name/response",-TARGET=>"response");
print "Enter ID the partner",$query->textfield('name');
print $query->submit(-name=>'go',-value=>'OK');
print "<br>\n";
print "<hr>\n";
print "<H1> The output statistics for all partners </H1>\n";
print $query->submit(-name=>'go',-value=>'OK');
print $query->endform;
}


Работаю с фреймами. Сейчас при нажатие первой и второй кнопки, происходит одно и то же событие.
PM MAIL   Вверх
ginnie
Дата 30.5.2008, 21:30 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


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

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



Уважаемый PalmOs, что Вы подразумеваете под событием? Если Вам нужно, чтобы после нажатия разных кнопок выполнялся разный код скрипта, тогда дайте кнопкам разные имена, и проверяйте в скрипте, какой параметр пришел (в запросе будет параметр, соответствующий нажатой кнопке). Если Вам надо вызывать разные скрипты, в зависимости от нажатой кнопки, то это можно сделать только через javascript. 


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


Новичок



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

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



Мне нужно чтоб после нажатия кнопки, выполнялась определенная часть скрипта. 
А можно пример какой нибудь? smile 
PM MAIL   Вверх
nitr
Дата 31.5.2008, 09:34 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


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

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



PalmOs, пересмотрите вашу структуру скрипта, например, как посоветовал многоуважаемый ginnie, дайте имена и значения кнопкам, от этого у нас будут разные получаемые параметры, ну и просто события разные на каждый параметр.
Если я вас конечно понял ;) . А так такой способ, к примеру, описан в рецептах Perl, там где CGI (про магазин пример).
 


--------------------
PM   Вверх
ginnie
Дата 3.6.2008, 17:18 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


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

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



Уважаемый PalmOs, самый простой пример

Код

my $query = new CGI;
if ($query->param('button1')) {
    # обработчик нажатия button1
}
elsif ($query->param('button2')) {
    # обработчик нажатия button2
}



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


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

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


 




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


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

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