Subversion Repositories Applications.projet

Rev

Rev 249 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
208 neiluj 1 
<?php
2 
 
359 aperonnet 3 
$repertoire = '/home/vpopmail/domains/'.$domaine.'/'.$liste ;
4 
exec ('ezmlm-list '.$repertoire, $output, $ret) ;
208 neiluj 5 
 
6 
include_once 'XML/Util.php' ;
7 
 
8 
$xml = XML_Util::getXMLDeclaration('1.0', 'ISO-8859-15', 'no') ;
9 
 
359 aperonnet 10 
$xml .= XML_Util::createStartElement ('ezmlm_liste_abonnes', array('domaine' => $domaine, 'liste' => $liste)) ;
208 neiluj 11 
 
359 aperonnet 12 
foreach ($output as $mail) $xml .= XML_Util::createTag('email', '', $mail) ;
208 neiluj 13 
 
359 aperonnet 14 
$xml .= XML_Util::createEndElement('ezmlm_liste_abonnes') ;
208 neiluj 15 
header ('Content-type: text/xml');
16 
echo $xml ;
359 aperonnet 17 
?>