root/alternc-sympa/trunk/bureau/admin/lst_downsub.php

Revision 1432, 1.8 kB (checked in by benjamin, 6 years ago)

Initial revision

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
Line 
1 <?php
2 /*
3  $Id$
4  ----------------------------------------------------------------------
5  AlternC - Web Hosting System
6  Copyright (C) 2002 by the AlternC Development Team.
7  http://alternc.org/
8  ----------------------------------------------------------------------
9  Based on:
10  Valentin Lacambre's web hosting softwares: http://altern.org/
11  ----------------------------------------------------------------------
12  LICENSE
13
14  This program is free software; you can redistribute it and/or
15  modify it under the terms of the GNU General Public License (GPL)
16  as published by the Free Software Foundation; either version 2
17  of the License, or (at your option) any later version.
18
19  This program is distributed in the hope that it will be useful,
20  but WITHOUT ANY WARRANTY; without even the implied warranty of
21  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
22  GNU General Public License for more details.
23
24  To read the license please visit http://www.gnu.org/copyleft/gpl.html
25  ----------------------------------------------------------------------
26  Original Author of file: Louis Sylvain
27  Purpose of file: download the subscribers list of a mailing-list
28  ----------------------------------------------------------------------
29 */
30 require_once("../class/config.php");
31
32
33 // on récupère le nom de la liste et on la met au format qui est utilisée dans la table
34 $r=$sympa->get_ml($id);
35 if ($r["premier"]==1) {
36     $temp=explode("@", $r["list"]);
37     $liste=$temp[0];
38 } else {
39     $liste=str_replace("@","_",$r["list"]);
40 }
41
42 header("Content-Type: text/plain");
43 // header("Content-Type: text/html");
44 header("Content-disposition: Attachment;filename=\"liste_".$liste.".txt\"");
45 /*
46 header("Pragma: no-cache");
47 header("Expires: 0"); */
48
49 $db->query("SELECT user_subscriber from subscriber_table where list_subscriber='$liste';");
50 while ($db->next_record()) {
51    echo $db->Record["user_subscriber"]."\r\n";
52 }
53 ?>
Note: See TracBrowser for help on using the browser.