flush();
}
++$done;
reset($_SESSION['export']['cols']);
while (list($key, $val) = each($_SESSION['export']['cols'])) {
fwrite($exportfile, strtr($user[$val], $col_delim, ',') . $col_delim);
}
reset($attributes);
while (list($key, $val) = each($attributes)) {
$value = UserAttributeValue($user['id'], $val['id']);
fwrite($exportfile, quoteEnclosed($value, $col_delim, $row_delim) . $col_delim);
}
if ($exporthistory) {
fwrite($exportfile, quoteEnclosed($user['ip'], $col_delim, $row_delim) . $col_delim);
fwrite($exportfile, quoteEnclosed($user['summary'], $col_delim, $row_delim) . $col_delim);
fwrite($exportfile, quoteEnclosed($user['detail'], $col_delim, $row_delim) . $col_delim);
}
$lists = Sql_query("select listid,name from\n {$tables['listuser']},{$tables['list']} where userid = " . $user['id'] . " and\n {$tables['listuser']}.listid = {$tables['list']}.id {$listselect_and}");
if (!Sql_Affected_rows($lists)) {
fwrite($exportfile, 'No Lists');
}
while ($list = Sql_fetch_array($lists)) {
fwrite($exportfile, stripslashes($list['name']) . '; ');
}
fwrite($exportfile, $row_delim);
}
print '<script type="text/javascript">
var parentJQuery = window.parent.jQuery;
parentJQuery("#progressbar").updateProgress("' . $todo . ',' . $todo . '");
parentJQuery("#busyimage").hide();
parentJQuery("#progresscount").html("' . s('All done') . '");
Sql_Query(sprintf('update %s set blacklisted = 1 where email = "%s"', $GLOBALS['tables']["user"], $user['email']));
}
set_time_limit(500);
reset($_POST['cols']);
while (list($key, $val) = each($_POST['cols'])) {
print strtr($user[$val], $col_delim, ",") . $col_delim;
}
reset($attributes);
while (list($key, $val) = each($attributes)) {
$value = UserAttributeValue($user["id"], $val["id"]);
print quoteEnclosed($value, $col_delim, $row_delim) . $col_delim;
}
if ($exporthistory) {
print quoteEnclosed($user['ip'], $col_delim, $row_delim) . $col_delim;
print quoteEnclosed($user['summary'], $col_delim, $row_delim) . $col_delim;
print quoteEnclosed($user['detail'], $col_delim, $row_delim) . $col_delim;
}
$lists = Sql_query("select listid,name from\n {$tables['listuser']},{$tables['list']} where userid = " . $user["id"] . " and\n {$tables['listuser']}.listid = {$tables['list']}.id {$listselect_and}");
if (!Sql_Affected_rows($lists)) {
print "No Lists";
}
while ($list = Sql_fetch_array($lists)) {
print stripslashes($list["name"]) . " ";
}
print $row_delim;
}
exit;
}
if ($list) {
print sprintf($GLOBALS['I18N']->get('Export subscribers on %s'), ListName($list));
}