|
Server : Apache/2.2.2 (Fedora) System : Linux App1.pathumtani.go.th 2.6.20-1.2320.fc5smp #1 SMP Tue Jun 12 19:40:16 EDT 2007 i686 User : apache ( 48) PHP Version : 5.2.9 Disable Function : NONE Directory : /proc/self/root/proc/self/root/usr/libexec/webmin/mysql/ |
Upload File : |
#!/usr/bin/perl
# newdb_form.cgi
# Display a form for creating a new database
require './mysql-lib.pl';
$access{'create'} || &error($text{'newdb_ecannot'});
&ui_print_header(undef, $text{'newdb_title'}, "", "newdb_form");
print &ui_form_start("newdb.cgi", "post");
print &ui_table_start($text{'newdb_header'}, undef, 2);
# DB name
print &ui_table_row($text{'newdb_db'},
&ui_textbox("db", undef, 20));
if ($mysql_version >= 4.1) {
# Character set option
print &ui_table_row($text{'newdb_charset'},
&ui_select("charset", undef,
[ [ undef, "<$text{'default'}>" ],
&list_character_sets() ]));
}
# Initial table name
print &ui_table_row($text{'newdb_table'},
&ui_radio("table_def", 1, [ [ 1, $text{'newdb_none'} ],
[ 0, $text{'newdb_tname'} ] ])." ".
&ui_textbox("table", undef, 20)." ".$text{'newdb_str'}."...");
$out = &capture_function_output(\&show_table_form, 4);
print &ui_table_row(undef, $out, 2);
print &ui_table_end();
print &ui_form_end([ [ undef, $text{'create'} ] ]);
&ui_print_footer("", $text{'index_return'});