Chinaunix

标题: 如何删除或者隐藏表 [打印本页]

作者: fzhcl 时间: 2015-06-21 11:12
标题: 如何删除或者隐藏表
我有如下的几行代码(Linux 下perl)，当我点击"submit" 时，我希望页面只显示 “YourChoice is : JobOrder”，清除 print_form()显示的内容。在此先谢谢各位高手。

#!/usr/bin/perl
use DBI;
use DBD::mysql;
use CGI qw(:standard);
$query = new CGI;
print $query->header;
print $query->start_html("Welcome to JobOrder");
&print_form($query);
my $choice = $query->param('YourChoice');
print "<tr>YourChoice is : $choice</tr>";

sub print_form{
my($query) = @_;
print $query->startform;
print "<H3>Welcome to Job dashboard</H3>";
print "Please pick your choice.<BR>";
print $query->radio_group(-name=>'YourChoice',
                        -values=>[ 'JobOrder', 'Exit' ],
                        -default=>[ 'Exit'],
                        );
print "<BR>";
print $query->submit('action', 'submit');
print $query->reset('Clear');
print $query->endform;
}

作者: yjh777 时间: 2015-12-26 16:53
我是把东西放在一个div里，然后在事件处理里修改 div 的属性
div.style.zIndex=-1;
div.style.display="none";

欢迎光临 Chinaunix (http://bbs.chinaunix.net/)