[Sommaire] [Imprimer]

   1  <?php
   2  /*****************************************************
   3  * This file is part of Agora, web based content management system.
   4  *
   5  * Agora is free software; you can redistribute it and/or modify
   6  * it under the terms of the GNU General Public License as published by
   7  * the Free Software Foundation; version 2 of the License.
   8  *
   9  * Agora is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  * GNU General Public License for more details (file "COPYING").
  13  *
  14  * Copyright © Arnaud Martin, Antoine Pitrou et Philippe Rivière.
  15  * List of authors detailed in "copyright_fr.html" file.
  16  * E-mail : agora@sig.premier-ministre.gouv.fr
  17  * Web site : http://www.agora.gouv.fr
  18  *****************************************************/
  19  //************ Exportation des destinataire ayant reçu leur lettre d'information
  20  //  $id$
  21  //  Choix du nom de fichier pour l'exportation au format CSV
  22  
  23  require_once("PEAR.php");
  24  
  25  include ("inc.php");
  26  include_ecrire ("inc_mots.php");
  27  require_once(dirname(__FILE__). "/include/bd/inc_subscriber_cm_factory.php");
  28  require_once(dirname(__FILE__). "/include/bd/inc_newsletter_cm_list_factory.php");
  29  require_once(dirname(__FILE__). '/include/bd/inc_newsletter_list_factory.php');
  30  require_once(dirname(__FILE__). '/include/bd/inc_newsletter_instance_factory.php');
  31  
  32  header('Content-Type: text/x-csv');
  33  
  34  if (ereg("MSIE", $_SERVER['HTTP_USER_AGENT'])) {
  35      header('Content-Disposition: inline; filename="destinataires.csv"');
  36  }
  37  else {
  38      header('Content-Disposition: attachment; filename="destinataires.csv"');
  39  }
  40  
  41  $pstExport = &recuperer_instance_newsletter_instance();
  42  $tabUserPostDone = $pstExport->consult_pst_done($_GET['id_pst'], $_GET['id_newsletter']);
  43  echo "E-mail, First Name, Middle Name, Last Name, Title, Mode d'inscription\n";
  44  
  45  foreach ($tabUserPostDone as $row) {
  46      echo $row['email']. "," . $row['sub_first_name']. "," . $row['sub_middle_name']. "," . $row['sub_last_name']. "," . $row['title']. "," . ($row['lsr_mode'] == 1 ? 'HTML' : 'TXT'). "\n";
  47  }
  48  ?>