想通过CGI.pm里popup memu给下拉框加上onchange怎么加？

actan

my %attributes = ('All'=>{'onchange'=>'refreshCountry(this)'});

print popup_menu(-name=>continent, -values=>[@continent], -default=>$continent,-attributes=>\%attributes);

通过指定attributes后得到的结果是 onchange被加在了第一个option上。

1. 
   
2. <select name="continent">
   
3. <option value="All" onchange="refreshCountry(this)" selected="selected">All</option>
   
4. <option value="Africa">Africa</option>
   
5. <option value="Asia">Asia</option>
   
6. <option value="Europe">Europe</option>
   
7. <option value="North_America">North_America</option>
   
8. <option value="Oceania">Oceania</option>
   
9. <option value="South_America">South_America</option>
   
10. </select>
    
11. 
    

复制代码

指定class好像还行，可以这样指定javascript的onclick, onchange好像就不行了
我们ff里点了半天也没有调用我的refreshCountry。

有什么好办法吗？

还是不如直接写html代码输出一个drop down list算了？

ttcn_cu

HTML::Template

ulmer

原帖由 actan 于 2010-1-8 17:11 发表
my %attributes = ('All'=>{'onchange'=>'refreshCountry(this)'});

print popup_menu(-name=>continent, -values=>[@continent], -default=>$continent,-attributes=>\%attributes);

通过指定attributes ...

放错地方了。应该是：

popup_menu(
    -name => continent,
   -value => [...],
   -onChange => 'refreshCountry(this)'
  # adding more attributes for html tag:
  # -name => value

);

actan

多谢，昨天搜了下自己发的贴，以前问过类似问题，当时居然也是ulmer回答的！
狂汗