53 lines
1.9 KiB
PHP
53 lines
1.9 KiB
PHP
|
<?php
|
|||
|
|
/*
|
|||
|
|
$Id: lst_downsub.php,v 1.1.1.1 2003/03/26 17:41:29 root Exp $
|
|||
|
|
----------------------------------------------------------------------
|
|||
|
|
AlternC - Web Hosting System
|
|||
|
|
Copyright (C) 2002 by the AlternC Development Team.
|
|||
|
|
http://alternc.org/
|
|||
|
|
----------------------------------------------------------------------
|
|||
|
|
Based on:
|
|||
|
|
Valentin Lacambre's web hosting softwares: http://altern.org/
|
|||
|
|
----------------------------------------------------------------------
|
|||
|
|
LICENSE
|
|||
|
|
|
|||
|
|
This program is free software; you can redistribute it and/or
|
|||
|
|
modify it under the terms of the GNU General Public License (GPL)
|
|||
|
|
as published by the Free Software Foundation; either version 2
|
|||
|
|
of the License, or (at your option) any later version.
|
|||
|
|
|
|||
|
|
This program is distributed in the hope that it will be useful,
|
|||
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|||
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|||
|
|
GNU General Public License for more details.
|
|||
|
|
|
|||
|
|
To read the license please visit http://www.gnu.org/copyleft/gpl.html
|
|||
|
|
----------------------------------------------------------------------
|
|||
|
|
Original Author of file: Louis Sylvain
|
|||
|
|
Purpose of file: download the subscribers list of a mailing-list
|
|||
|
|
----------------------------------------------------------------------
|
|||
|
|
*/
|
|||
|
|
require_once("../class/config.php");
|
|||
|
|
|
|||
|
|
|
|||
|
|
// on r<>cup<75>re le nom de la liste et on la met au format qui est utilis<69>e dans la table
|
|||
|
|
$r=$sympa->get_ml($id);
|
|||
|
|
if ($r["premier"]==1) {
|
|||
|
|
$temp=explode("@", $r["list"]);
|
|||
|
|
$liste=$temp[0];
|
|||
|
|
} else {
|
|||
|
|
$liste=str_replace("@","_",$r["list"]);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
header("Content-Type: text/plain");
|
|||
|
|
// header("Content-Type: text/html");
|
|||
|
|
header("Content-disposition: Attachment;filename=\"liste_".$liste.".txt\"");
|
|||
|
|
/*
|
|||
|
|
header("Pragma: no-cache");
|
|||
|
|
header("Expires: 0"); */
|
|||
|
|
|
|||
|
|
$db->query("SELECT user_subscriber from subscriber_table where list_subscriber='$liste';");
|
|||
|
|
while ($db->next_record()) {
|
|||
|
|
echo $db->Record["user_subscriber"]."\r\n";
|
|||
|
|
}
|
|||
|
|
?>
|