//Autres auteurs : *@author Aucun *@copyright Tela-Botanica 2000-2004 *@version $Revision: 1.1 $ // +------------------------------------------------------------------------------------------------------+ */ // +------------------------------------------------------------------------------------------------------+ // | ENTETE du PROGRAMME | // +------------------------------------------------------------------------------------------------------+ // A faire include_once 'configuration/projet.config.inc.php' ; include_once ('classes/ezmlmAccessObject.class.php') ; include_once 'Mail/mimeDecode.php' ; $num_rep = array_shift ($actionargs) ; $num_message = array_shift($actionargs) ; $xml_parser = &new ezmlmAccessObject('message', PROJET_DOMAINE_LISTE, $nom_liste, $GLOBALS['lang']) ; $xml_parser->setIdMessage($num_rep, $num_message) ; $xml_parser->load(); ob_start (); $xml_parser->parse() ; $mail = ob_get_contents() ; ob_end_clean(); /* $mail = file_get_contents (PROJET_CHEMIN_LISTES.PROJET_DOMAINE_LISTE.'/'.$nom_liste.'/'.'archive/'.$num_rep.'/'.$num_message) ; */ $decodeur = new Mail_mimeDecode($mail) ; $mailDecode = $decodeur->decode(array ('decode_bodies' => 'true', 'include_bodies' => 'true')) ; //var_dump ($mailDecode) ; function getParts(&$part, $num_part) { $part = $part->parts[$num_part] ; return $part ; } for ($i = 0; $i < count ($actionargs); $i++) { $part = getParts($mailDecode, $actionargs[$i]) ; } $content_type = $part->ctype_primary.'/'.$part->ctype_secondary ; // Certain fichiers attaché n'ont pas de ctype_primary et ctype_secondary if ($content_type == '/') { $content_type = $part->content_type; } $nom_du_fichier = isset($part->d_parameters['filename']) ? $part->d_parameters['filename'] : $part->ctype_parameters['name'] ; //echo $content_type ; header('Expires: Wen, 01 Dec 1999 01:00:00 GMT');// Date du passé header('Last-Modified: ' . gmdate('D, d M Y H:i:s') . ' GMT');// toujours modifié header('Cache-Control: Public');// HTTP/1.1 header ('Content-Type: '.$content_type."\r\n") ; header("Content-Length: ".strlen($part->body).";\r\n"); header ('Content-Disposition: attachment; filename="'.$nom_du_fichier.'"'."\r\n"); header('Content-Transfer-Encoding: '.$part->content-transfer-encoding); echo $part->body ; exit(0) ; ?>