форумы  помощь  поиск  регистрация  майллист  ВХОД  слежка

Вариант для распечатки		Пред. тема | След. тема
Форумы WEB технологии (Public)
Изначальное сообщение		[Проследить за развитием треда]

"CGI.pm как присвоить popup_menu значения из Postg"

Сообщение от sudomen (??) on 07-Июн-06, 12:34

Привет всем. Такая ситуация, есть страничка написанная на cgi.pm use CGI qw/:standard/; use DBI; print popup_menu(......) и теперь мне надо чтоб из таблицы PG значения подставлялись в значения popup_menu. Вот такая проблема.

Правка | Высказать мнение | Ответить | Cообщить модератору | Наверх

Сообщения по теме

[Сортировка по времени, UBB]

1. "CGI.pm как присвоить popup_menu значения из Postg"

Сообщение от sudomen (??) on 07-Июн-06, 15:26

>Привет всем. Такая ситуация, есть страничка написанная на cgi.pm >use CGI qw/:standard/; >use DBI; > >print popup_menu(......) >и теперь мне надо чтоб из таблицы PG значения подставлялись в значения >popup_menu. > >Вот такая проблема. Все нашел как это делать, оказалось просто. Если кому понадобиться. Выбираем нужные значения из таблицы и загоняем их в массив use CGI qw/:standard/; use DBI; $db = DBI->connect("dbi:Pg:dbname=template1","pgsql","",{PrintError=>0}); $q = "select tablename from pg_tables"; $sth = $db->prepare($sel_q); $rv = $sth->execute(); while ($ref=$sth->fetchrow_hashref())       {       ($name)=($ref->{'tablename'});        push(@name_mas,$name);       } #print popup_menu({-values=>[@name_mas]}); $sth->finish(); $db->disconnect();

Правка | Высказать мнение | Ответить | Cообщить модератору | Наверх

	2. "CGI.pm как присвоить popup_menu значения из Postg"
	Сообщение от dsl on 10-Июн-06, 09:40
	>while ($ref=$sth->fetchrow_hashref()) >      { >      ($name)=($ref->{'tablename'}); >       push(@name_mas,$name); >      } > >#print popup_menu({-values=>[@name_mas]}); CGI зло, сравни быстродействие :) это все заменяем на: print "<select name='select1' style='width: 200pt'>"; foreach my $key ( @{$sth->fetchall_arrayref} ){      print "<option value='$key->[0]'> $key->[0] </option>"; } print "</select>";
	Правка | Высказать мнение | Ответить | Cообщить модератору | Наверх

	3. "CGI.pm как присвоить popup_menu значения из Postg"
	Сообщение от sudomen (??) on 13-Июн-06, 10:32
	> >>while ($ref=$sth->fetchrow_hashref()) >>      { >>      ($name)=($ref->{'tablename'}); >>       push(@name_mas,$name); >>      } >> >>#print popup_menu({-values=>[@name_mas]}); > >CGI зло, сравни быстродействие :) > >это все заменяем на: >print "<select name='select1' style='width: 200pt'>"; >foreach my $key ( @{$sth->fetchall_arrayref} ){ >     print "<option value='$key->[0]'> $key->[0] </option>"; >} >print "</select>"; Вроде также работает. :-(
	Правка | Высказать мнение | Ответить | Cообщить модератору | Наверх

Архив | Удалить	Индекс форумов | Темы | Пред. тема | След. тема
Оцените тред (1=ужас, 5=супер)? [ 1 | 2 | 3 | 4 | 5 ] [Рекомендовать для помещения в FAQ]