[set page_title][L]Individual Table Export[/L][/set]
[set table_perm]=x[/set]
[set ui_class]Admin[/set]
[set help_name]export.main[/set]
[set icon_name]icon_config.gif[/set]
@_UI_STD_HEAD_@
[page __UI_BASE__/dbdownload][L]Multiple table export[/L][/page]
[seti user_tables][loop list="[list-databases]"][if-mm function=export table="[loop-code]"][loop-code]
[/if-mm][/loop][/seti]
[seti tables][scratch user_tables]
__UI_ACCESS_TABLE__
__UI_META_TABLE__[/seti]
[perl table="[scratch tables]"]
my @tables = grep /\S/, split /\s+/, $Scratch->{tables};
my $out;
for(@tables) {
#Log("table $_");
unless (ref $Db{$_}) {
Log("bad table %s", $_);
next;
}
$tables{$_} = [ $Db{$_}->columns() ];
}
$out = "
EOF
[/perl]
[if cgi ui_export_database]
[update values]
[seti result][export-database
table="[value mv_data_table]"
file="[value mv_data_file]"
type="[value mv_data_export_type]"
sort="[if value ui_sort_field][value ui_sort_field]:[value ui_sort_option][/if]"
][/seti]
[if scratch result]
Export of table [cgi mv_data_table] successful