PHP PageLink2函数代码示例

     flush();
     $req = Sql_Query("select id,email from {$tables['user']}");
     $c = 0;
     while ($row = Sql_Fetch_Array($req)) {
         set_time_limit(60);
         #    if (checkMemoryAvail())
         if (!is_email($row['email'])) {
             ++$c;
             $fixemail = fixEmail($row['email']);
             if (is_email($fixemail)) {
                 Sql_Query(sprintf('update %s set email = "%s" where id = %d', $tables['user'], $fixemail, $row['id']), 0);
                 $list .= PageLink2('user&amp;id=' . $row['id'] . '&returnpage=reconcileusers&returnoption=fixinvalidemail', $GLOBALS['I18N']->get('User') . ' ' . $row['id']) . '    [' . $row['email'] . '] => fixed to ' . $fixemail . '<br/>';
                 ++$fixed;
             } else {
                 ++$notfixed;
                 $list .= PageLink2('user&amp;id=' . $row['id'] . '&returnpage=reconcileusers&returnoption=fixinvalidemail', $GLOBALS['I18N']->get('User') . ' ' . $row['id']) . '    [' . $row['email'] . ']<br/>';
             }
         }
     }
     print $fixed . ' ' . $GLOBALS['I18N']->get('subscribers fixed') . '<br/>' . $notfixed . ' ' . $GLOBALS['I18N']->get('subscribers could not be fixed') . '<br/>' . $list . "\n";
 } elseif (isset($_GET['option']) && $_GET['option'] == 'deleteinvalidemail') {
     include 'actions/reconcileusers.php';
 } elseif (isset($_GET['option']) && $_GET['option'] == 'markinvalidunconfirmed') {
     Info($GLOBALS['I18N']->get('Marking subscribers with an invalid email as unconfirmed'));
     flush();
     $req = Sql_Query("select id,email from {$tables['user']}");
     $c = 0;
     while ($row = Sql_Fetch_Array($req)) {
         set_time_limit(60);
         if (!is_email($row['email'])) {
             ++$c;

<h3>Подвал сообщения или нижний колонтитул</h3>

<p>Нижний колонтитул письма необходим по нескольким очень важным причинам. При переадресации сообщения на другой адрес эл. почты, нижний колонтитул изменится на другой, что позволяет настроить содержимое, более подходящее для тех, кто ещё не подписан на Вашу информационную рассылку и предложить им подписаться.</p>

<p>Вы можете настроить стандартный подвал в
<?php 
## for translators, you can translater the word "Configuration" below
echo PageLink2('configure&id=messagefooter', 'Конфигурации');
?>
</p>

<p>Допускается использование нескольких меток, которые помогут Вашим подписчикам определить, что за письмо они получили и что делать с ним дальше. 

<ul>
<li><b>[UNSUBSCRIBEURL]</b> - ссылка для отказа от подписки</li>
<li><b>[PREFERENCESURL]</b> - ссылка на страницу, где подписчики могут изменить свои учётные данные</li>
<li><b>[FORWARDURL]</b> - ссылка на то, чтобы переслать письмо кому-либо ещё</li>
<li><b>[EMAIL]</b> - адрес электронной почты</li>
<li><b>[USERID]</b> - уникальный идентификатор подписчика</li>
<li><b>[USERTRACK]</b> - код для отслеживания открытий кампании подписчиками</li>
</ul>
</p>

<h3>Предлагаемый нижний колонтитул</h3>
<div class="suggestion">
<pre>
--
&lt;h2&gt;Это письмо отправлено на адрес [EMAIL] от <?php 
echo getConfig('message_from_name') . ' ' . getConfig('admin_address');
?>
&lt;/h2&gt;

{
    if (!$id) {
        return;
    }
    $data = Sql_Fetch_Array_Query("select * from groups where id = {$id}");
    return $data["name"];
}
require dirname(__FILE__) . '/structure.php';
$struct = $DBstruct["user"];
if (isset($_GET['list'])) {
    echo "<br />" . PageLink2("members", "Back to Members of this list", "id={$list}") . "\n";
}
if (isset($start)) {
    echo "<br />" . PageLink2("users", "Back to the list of users", "start={$start}&unconfirmed=" . $_GET["unconfirmed"]) . "\n";
}
if ($find) {
    echo "<br />" . PageLink2("users", "Back to the search results", "start={$start}&find=" . urlencode($find) . "&findby=" . urlencode($findby) . "&unconfirmed=" . $_GET["unconfirmed"] . "\n");
}
if ($returnpage) {
    if ($returnoption) {
        $more = "&option=" . $returnoption;
    }
    echo "<br/>" . PageLink2("{$returnpage}{$more}", "Return to {$returnpage}");
    $returnurl = "returnpage={$returnpage}&returnoption={$returnoption}";
}
include dirname(__FILE__) . '/commonlib/pages/user.php';
return;
?>

    abs(unix_timestamp(entered) - unix_timestamp(viewed)) as responsetime from %s where userid = %d and status = "sent"', $tables["usermessage"], $user["id"]));
    $num = Sql_Affected_Rows();
} else {
    $num = 0;
}
printf('%d ' . $GLOBALS['I18N']->get('messages sent to this user') . '<br/>', $num);
if ($num) {
    $resptime = 0;
    $totalresp = 0;
    while ($msg = Sql_Fetch_Array($msgs)) {
        $ls->addElement($msg["messageid"], PageURL2("message", $GLOBALS['I18N']->get('view'), "id=" . $msg["messageid"]));
        if (defined('CLICKTRACK') && CLICKTRACK) {
            $clicksreq = Sql_Fetch_Row_Query(sprintf('select sum(clicked) as numclicks from %s where userid = %s and messageid = %s', $GLOBALS['tables']['linktrack_uml_click'], $user['id'], $msg['messageid']));
            $clicks = sprintf('%d', $clicksreq[0]);
            if ($clicks) {
                $ls->addColumn($msg["messageid"], $GLOBALS['I18N']->get('clicks'), PageLink2('userclicks&amp;userid=' . $user['id'] . '&amp;msgid=' . $msg['messageid'], $clicks));
            } else {
                $ls->addColumn($msg["messageid"], $GLOBALS['I18N']->get('clicks'), 0);
            }
        }
        $ls->addColumn($msg["messageid"], $GLOBALS['I18N']->get('sent'), formatDateTime($msg["entered"], 1));
        if (!$msg['notviewed']) {
            $ls->addColumn($msg["messageid"], $GLOBALS['I18N']->get('viewed'), formatDateTime($msg["viewed"], 1));
            $ls->addColumn($msg["messageid"], $GLOBALS['I18N']->get('responsetime'), $msg['responsetime']);
            $resptime += $msg['responsetime'];
            $totalresp += 1;
        }
        if (!empty($bounces[$msg["messageid"]])) {
            $ls->addColumn($msg["messageid"], $GLOBALS['I18N']->get('bounce'), $bounces[$msg["messageid"]]);
        }
    }

    $listing = sprintf($GLOBALS['I18N']->get("Listing user %d to %d"), $start, $start + MAX_USER_PP);
    $limit = "limit {$start}," . MAX_USER_PP;
} else {
    $listing = sprintf($GLOBALS['I18N']->get("Listing user %d to %d"), 1, MAX_USER_PP);
    $limit = "limit 0," . MAX_USER_PP;
    $start = 0;
}
if ($id) {
    $url_keep = '&id=' . $id;
} else {
    $url_keep = '';
}
print $total . " " . $GLOBALS['I18N']->get("Entries") . "</p>";
if ($total) {
    printf('<table border=1><tr><td colspan=4 align=center>%s</td></tr><tr><td>%s</td><td>%s</td><td>
          %s</td><td>%s</td></tr></table><p><hr>', $listing, PageLink2("mviews{$url_keep}", "&lt;&lt;", "start=0"), PageLink2("mviews{$url_keep}", "&lt;", sprintf('start=%d', max(0, $start - MAX_USER_PP))), PageLink2("mviews{$url_keep}", "&gt;", sprintf('start=%d', min($total, $start + MAX_USER_PP))), PageLink2("mviews{$url_keep}", "&gt;&gt;", sprintf('start=%d', $total - MAX_USER_PP)));
}
$req = Sql_Query(sprintf('select userid,email,um.entered as sent,min(um.viewed) as firstview,
    max(um.viewed) as lastview, count(um.viewed) as viewcount,
    abs(unix_timestamp(um.entered) - unix_timestamp(um.viewed)) as responsetime
    from %s um, %s user, %s msg where um.messageid = %d and um.messageid = msg.id and um.userid = user.id and um.viewed is not null %s
    group by userid %s', $GLOBALS['tables']['usermessage'], $GLOBALS['tables']['user'], $GLOBALS['tables']['message'], $id, $subselect, $limit));
$summary = array();
while ($row = Sql_Fetch_Array($req)) {
    $element = '<!--' . $row['userid'] . '-->' . $row['email'];
    $ls->addElement($element, PageUrl2('userhistory&id=' . $row['userid']));
    $ls->addColumn($element, $GLOBALS['I18N']->get('sent'), formatDateTime($row['sent']));
    if ($row['viewcount'] > 1) {
        $ls->addColumn($element, $GLOBALS['I18N']->get('firstview'), formatDateTime($row['firstview'], 1));
        $ls->addColumn($element, $GLOBALS['I18N']->get('lastview'), formatDateTime($row['lastview']));
        $ls->addColumn($element, $GLOBALS['I18N']->get('views'), $row['viewcount']);

<?php

require_once dirname(__FILE__) . '/accesscheck.php';
print '<ul class="dashboard_button">';
print "<li class='statistics'>" . PageLink2("statsoverview", $GLOBALS['I18N']->get('Overview')) . "</li>";
print "<li class='statistics'>" . PageLink2("uclicks", $GLOBALS['I18N']->get('View Clicks by URL')) . "</li>";
print "<li class='statistics'>" . PageLink2("mclicks", $GLOBALS['I18N']->get('View Clicks by Message')) . "</li>";
print "<li class='statistics'>" . PageLink2("mviews", $GLOBALS['I18N']->get('View Opens by Message')) . "</li>";
print "<li class='statistics'>" . PageLink2("domainstats", $GLOBALS['I18N']->get('Domain Statistics')) . "</li>";
print '</ul>';
$num = Sql_Fetch_Row_Query(sprintf('select count(*) from %s', $GLOBALS['tables']['linktrack']));
if ($num[0] > 0) {
    print '<p class="information">' . $GLOBALS['I18N']->get('The clicktracking system has changed') . '</p>';
    printf($GLOBALS['I18N']->get('You have %s entries in the old statistics table'), $num[0]);
    print "<div class='clear'></div><div class='button'>" . PageLink2("convertstats", $GLOBALS['I18N']->get('Convert Old data to new')) . "</div>";
    print '<p class="information">' . $GLOBALS['I18N']->get('To avoid overloading the system, this will convert 10000 records at a time') . '</p>';
}

        print '<script language="Javascript" type="text/javascript"> finish(); </script>';
        # update the system pages
        while (list($type, $pages) = each($system_pages)) {
            foreach ($pages as $page) {
                Sql_Query(sprintf('replace into %s (page,type) values("%s","%s")', $tables["task"], $page, $type));
            }
        }
        # mark the database to be our current version
        if ($success) {
            SaveConfig("version", VERSION, 0);
            # mark now to be the last time we checked for an update
            Sql_Query(sprintf('replace into %s (item,value,editable) values("updatelastcheck",now(),0)', $tables["config"]));
            Info("Success");
        } else {
            Error("An error occurred while upgrading your database");
        }
    } else {
        ?>
<p>Your database requires upgrading, please make sure to create a backup of your database first.</p>

<p>When you're ready click <?php 
        echo PageLink2("upgrade", "Here", "doit=yes");
        ?>
. Depending on the size of your database, this may take quite a while. Please make sure not to interrupt the process, once you've started it.</p>
<?php 
    }
}
?>
</td></tr></table>
</div>

    }
}
#
if ($success) {
    # mark the database to be our current version
    Sql_Query(sprintf('replace into %s (item,value,editable) values("version","%s",0)', $tables["config"], VERSION));
    # mark now to be the last time we checked for an update
    Sql_Query(sprintf('replace into %s (item,value,editable) values("updatelastcheck",now(),0)', $tables["config"]));
    # add a testlist
    $info = $GLOBALS['I18N']->get("List for testing.");
    $result = Sql_query("insert into {$tables["list"]} (name,description,entered,active,owner) values(\"test\",\"{$info}\",now(),0,1)");
    $body = '
    Version: ' . VERSION . "\r\n" . ' Url: ' . getConfig("website") . $pageroot . "\r\n";
    printf('<p>' . $GLOBALS['I18N']->get('Success') . ': <a href="mailto:phplist2@tincan.co.uk?subject=Successful installation of phplist&body=%s">' . $GLOBALS['I18N']->get('Tell us about it') . '</a>. </p>', $body);
    printf('<p>
    ' . $GLOBALS['I18N']->get("Please make sure to read the file README.security that can be found in the zip file.") . '</p>');
    printf('<p>
    ' . $GLOBALS['I18N']->get("Please make sure to") . '
    <a href="http://tincan.co.uk/lists/?p=subscribe"> ' . $GLOBALS['I18N']->get("subscribe to the announcements list") . "</a> " . $GLOBALS['I18N']->get("to make sure you are updated when new versions come out. Sometimes security bugs are found which make it important to upgrade. Traffic on the list is very low.") . ' </p>');
    print "<p>" . $GLOBALS['I18N']->get("Continue with") . " " . PageLink2("setup", $GLOBALS['I18N']->get("PHPlist Setup")) . "</p>";
} else {
    print '<ul><li>' . $GLOBALS['I18N']->get("Maybe you want to") . " " . PageLink2("upgrade", $GLOBALS['I18N']->get("Upgrade")) . ' ' . $GLOBALS['I18N']->get("instead?") . '
    <li>' . PageLink2("initialise", $GLOBALS['I18N']->get("Force Initialisation"), "force=yes") . ' ' . $GLOBALS['I18N']->get("(will erase all data!)") . ' ' . "</ul>\n";
}
/*
if ($_GET["firstinstall"] || $_SESSION["firstinstall"]) {
  $_SESSION["firstinstall"] = 1;
  print "<p>".$GLOBALS['I18N']->get("Checklist for Installation")."</p>";
  require "setup.php";
}
*/

function PageLinkActionButton($name, $desc = '', $url = '', $extraclass = '', $title = '')
{
    ## as PageLink2, but add the option to ajax it in a popover window
    $link = PageLink2($name, $desc, $url);
    if ($link) {
        $link = str_replace('<a ', '<a class="action-button ' . $extraclass . '" ', $link);
        $link .= '';
    }
    return $link;
}

">
<input type="hidden" name="no_note" value="1">
<input type="hidden" name="currency_code" value="GBP">
<input type="hidden" name="tax" value="0">
<input type="hidden" name="bn" value="PP-DonationsBF">
<input type="image" src="images/paypal.gif" border="0" name="submit" alt="Make payments with PayPal - it's fast, free and secure!">
</form></p>
<p>اگر شما یک <b>کاربر همیشگی phplist</b> هستید و فکر میکنید که از پس اغلب مشکلات بر می‌آيید مي‌توانید با <a href="http://forums.phplist.com/" target="_blank">پاسخ گفتن به پرسشهای کاربران دیگر</a>. یا نوشتن برگه هایی در <a href="#docscontrib">سایت مستندات</a> کمک کنید.</p>
<p>اگر شما یک <b>کاربر تازه‌کار phplist</b> هستید و برای نصب یا به کار گرفتن PHPlist روی سایت خود با مشکلی روبرو شدید، میتوانید پیش از اینکه فوراً یک پیام "اینکه کار نمیکنه!" برای ما بفرستید، با تلاش برای پیدا کردن راه حل مناسب در مکانهایی که در بالا گفته شده به ما کمک کنید. اغلب مشکل در تنظیمات محیطی است که میخواهید PHPlist را اجرا کنید. داشتن تنها یک توسعه دهنده برای PHPlist این مشکل را هم دارد که نمیتوان آن را در همه محیط ها و برای همه ویرایش های PHP آزمایش کرد.
</p>
<h1>کارهای دیگری که میتوانید برای یاری رساندن انجام دهید</h1>
<ul>
<li><p>اگر فکر میکنید که PHPlist برای شما مفید بوده است، چرا درباره‌اش به دیگران نگویید؟‌ به احتمال زیاد شما برای پیدا کردنش خیلی تلاش کرده اید و بعد از مقایسه‌اش با سیستمهای دیگر تصمیم به استفاده از آن گرفته‌اید، پس می‌توانید با تجربه‌ای که کسب کرده‌اید به دیگران نیز سود برسانید.</p>

<p>برای اینکار، میتوانید به  PHPlist <?php 
echo PageLink2("رای دهید", "Vote");
?>
 یا در سایتهایی که نرم افزارها را معرفی میکنند برایش بنویسید. همچنین می‌توانید درباره‌اش به افرادی که می‌شناسید بگویید.
</li>
<li><p>می‌توانید PHPlist را <b>به زبان خودتان برگردانید</b> و برگردان را ارايه دهید.
برای یاری رساندن  <a href="http://docs.phplist.com/PhplistTranslation">برگه های برگردان</a> در ویکی بررسی کنید.
</p>
</li>
<li>
<p>می‌توانید همه قابلیتهای مختلف PHPlist را <b>آزمایش کنید</b> و بررسی کنید که آیا به خوبی کار میکنند یا خیر.
لطفا یافته‌های خود را در <a href="http://forums.phplist.com/" target="_blank">انجمن‌ها</a>گزارش کنید.</p></li>
<li>
<p>
شما می‌توانید PHPlist را برای مشتریان خود به کار بگیرید (اگر کارتان مرتبط با وب است) و به آنها نشان دهید که این سیستم چه ابزار خوبی برای رسیدن به اهدافشان است. سپس اگر آنها تغییراتی خواستند می‌توانید در ازای دریافت دستمزد قابلیتهای جدید را ایجاد کنید. برای آگاهی از هزینه افزودن قابلیتهای جدید  
<a href="mailto:phplist2@tincan.co.uk?subject=request for quote to change phplist">تماس بگیرید</a>.
بیشتر قابلیتهای جدید PHPlist بر اساس درخواست مشتریان ایجاد شده اند. این هم به نفع مشتریان است چون با پرداخت مبلغ اندکی به اهدافشان میرسند، هم به نفع جامعه کاربران PHPlist است چرا که قابلیتهای جدید به برنامه افزوده می‌شود و هم به نفع توسعه دهندگان که به خاطر کار کردن بر روی PHPlist کمی دستمزد می‌گیرند :-)</p></li>

<p>

<h1>Importeer emails in bestaande lijsten</h1>

Er zijn vier manieren  om bestaande informatie te importeren:

<ul>
<li><?php 
echo PageLink2("import2", "Importeer emails met verschillende waarden voor attributen");
?>
. De lijst van emails kan attributen hebben die nog niet zijn vastgelegd. Ze zullen automatisch worden aangemaakt als "textlijn" attributen. Je kunt best deze optie gebruiken als je een spreadsheet/CSV bestand wilt importeren dat de attributen voor de gebruikers in kolommen heeft en een gebruiker per lijn. <br/><br/>
<li><?php 
echo PageLink2("import1", "Importeer emails met dezelfde waarde voor attributen");
?>
. De lijst van emails zal moeten overeenkomen met de structuur die je al hebt opgezet in <?php 
echo NAME;
?>
. Je kan deze optie best gebruiken als je een eenvoudige lijst met emails wilt importeren. Je kan daarnaa de waarden voor de attributen voor elke email ingeven. Ze zullen hetzelfde zijn voor iedereen die je importeerd.<br/><br/>
<li><?php 
echo PageLink2("import3", "Importeer emails van een IMAP account");
?>
. Dit zal naar emails in jou IMAP mappen zoeken en ze toevoegen. Enkel de Naam van de persoon kan als een attribuut worden gevonden.<br/><br/>
<li><?php 
echo PageLink2("import4", "Importeer emails van een andere database");
?>
.
</ul>

</p>

$total = $req[0];
if (isset($_GET['s'])) {
    $s = sprintf('%d', $_GET['s']);
    $e = $s + $numperrun;
} else {
    $s = 0;
    $e = $numperrun;
}
$limit = ' limit ' . $s . ', ' . $numperrun;
if ($total > $numperrun && $e < $total) {
    $next = '<p>' . PageLink2('checkbouncerules&s=' . $e, sprintf($GLOBALS['I18N']->get('Process Next %d'), $numperrun)) . '</p>';
} else {
    $next = '';
}
$unmatched = 0;
$matched = 0;
$req = Sql_Query(sprintf('select * from %s where comment != "not processed" %s', $GLOBALS['tables']['bounce'], $limit));
while ($row = Sql_Fetch_Array($req)) {
    $action = matchBounceRules($row['data'], $bouncerules);
    if ($action) {
        #  print $row['comment']. " Match: $action<br/>";
        $matched++;
    } else {
        $unmatched++;
        print $GLOBALS['I18N']->get('No match') . ': ' . $row['id'] . ' ' . PageLink2("bounce&id=" . $row['id'], $row['comment']) . '<br/>';
    }
    flush();
}
print '<br/>' . $unmatched . ' ' . $GLOBALS['I18N']->get('bounces did not match any current active rule');
print '<br/>' . $matched . ' ' . $GLOBALS['I18N']->get('bounce matched current active rules');
print $next;

     $messageid = $GLOBALS['I18N']->get('System Message');
 } else {
     $messageid = $GLOBALS['I18N']->get('Unknown');
 }
 /*  if (preg_match('/Action: delayed\s+Status: 4\.4\.7/im',$bounce["data"])) {
         $ls->addColumn($element,'delayed',$GLOBALS['img_tick']);
       } else {
         $ls->addColumn($element,'delayed',$GLOBALS['img_cross']);
       }
     */
 $ls->addColumn($element, s('Campaign'), $messageid);
 if (preg_match("#([\\d]+) bouncecount increased#", $bounce['comment'], $regs)) {
     $userid = PageLink2('user&id=' . $regs[1], $regs[1]);
     #sprintf('<a href="./?page=user&amp;id=%d">%d</a>',$regs[1],$regs[1]);
 } elseif (preg_match("#([\\d]+) marked unconfirmed#", $bounce['comment'], $regs)) {
     $userid = PageLink2('user&id=' . $regs[1], $regs[1]);
     #sprintf('<a href="./?page=user&amp;id=%d">%d</a>',$regs[1],$regs[1]);
 } else {
     $userid = $GLOBALS['I18N']->get('Unknown');
 }
 $ls->addColumn($element, $GLOBALS['I18N']->get('user'), $userid);
 $ls->addColumn($element, $GLOBALS['I18N']->get('date'), $bounce['date']);
 /*
   printf( "<tr><td>[ <a href=\"javascript:deleteRec('%s');\">%s</a> |
    %s ] </td><td>%s</td><td>%s</td><td>%s</td></tr>\n",
    PageURL2("bounces",$GLOBALS['I18N']->get('delete'),"s=$start&amp;delete=".$bounce["id"]),
    $GLOBALS['I18N']->get('delete'),
    PageLinkButton("bounce",$GLOBALS['I18N']->get('Show'),"s=$start&amp;id=".$bounce["id"]),
    $messageid,
    $userid,
    $bounce["date"]

<br /><?php 
echo PageLink2("messages", "Powrót do listy wiadomości");
?>
<br /><a href="#resend">Wyślij tą wiadomość do innej listy</a>

$req = Sql_Query(sprintf('select listid,userid,count(bounce) as numbounces from %s listuser, %s umb where listuser.userid = umb.user and listuser.listid = %d and date_add(time,interval 6 month) > now() group by umb.user order by listuser.listid', $GLOBALS['tables']['listuser'], $GLOBALS['tables']['user_message_bounce'], $listid));
$total = Sql_Affected_Rows();
$limit = '';
$numpp = 150;
$s = empty($_GET['s']) ? 0 : sprintf('%d', $_GET['s']);
if ($total > 500 && $_GET['type'] != 'dl') {
    #  print Paging2('listbounces&id='.$listid,$total,$numpp,'Page');
    $listing = sprintf($GLOBALS['I18N']->get("Listing %s to %s"), $s, $s + $numpp);
    $limit = "limit {$s}," . $numpp;
    print $total . " " . $GLOBALS['I18N']->get(" Total") . "</p>";
    printf('<table border=1><tr><td colspan=4 align=center>%s</td></tr><tr><td>%s</td><td>%s</td><td>
          %s</td><td>%s</td></tr></table><p><hr>', $listing, PageLink2('listbounces&id=' . $listid, "&lt;&lt;", "s=0"), PageLink2('listbounces&id=' . $listid, "&lt;", sprintf('s=%d', max(0, $s - $numpp))), PageLink2('listbounces&id=' . $listid, "&gt;", sprintf('s=%d', min($total, $s + $numpp))), PageLink2('listbounces&id=' . $listid, "&gt;&gt;", sprintf('s=%d', $total - $numpp)));
    $req = Sql_Query(sprintf('select listid,userid,count(bounce) as numbounces from %s listuser, %s umb where listuser.userid = umb.user and listuser.listid = %d  and date_add(time,interval 6 month) > now() group by umb.user order by listuser.listid %s', $GLOBALS['tables']['listuser'], $GLOBALS['tables']['user_message_bounce'], $listid, $limit));
}
print '<p>' . PageLink2('listbounces', 'Select another list');
print '&nbsp;' . PageLink2('listbounces&type=dl&&amp;id=' . $listid, 'Download emails');
print '</p>';
if ($_GET['type'] == 'dl') {
    ob_end_clean();
    Header("Content-type: text/plain");
    $filename = 'Bounces on ' . listName($listid);
    header("Content-disposition:  attachment; filename=\"{$filename}\"");
}
$currentlist = 0;
$ls = new WebblerListing('');
while ($row = Sql_Fetch_Array($req)) {
    if ($currentlist != $row['listid']) {
        if ($_GET['type'] != 'dl') {
            print $ls->display();
        }
        $currentlist = $row['listid'];