Subversion Repositories Applications.papyrus

Rev

Rev 857 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 857 Rev 913
Line 19... Line 19...
19 
// |                                                                                                      |
 19 
// |                                                                                                      |
20 
// | You should have received a copy of the GNU General Public License                                    |
 20 
// | You should have received a copy of the GNU General Public License                                    |
21 
// | along with Foobar; if not, write to the Free Software                                                |
 21 
// | along with Foobar; if not, write to the Free Software                                                |
22 
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
 22 
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
23 
// +------------------------------------------------------------------------------------------------------+
 23 
// +------------------------------------------------------------------------------------------------------+
24 
// CVS : $Id: adwi_wikini.fonct.php,v 1.7 2006-06-02 09:12:16 florian Exp $
 24 
// CVS : $Id: adwi_wikini.fonct.php,v 1.8 2006-07-19 13:55:01 ddelon Exp $
25 
/**
 25 
/**
26 
* Contient les fonctions de l'application gestion des Wikini
 26 
* Contient les fonctions de l'application gestion des Wikini
27 
*
 27 
*
28 
*
28 
*
29 
*
29 
*
Line 33... Line 33...
33 
//Auteur original :
 33 
//Auteur original :
34 
*@author        David Delon <david.delon@tela-botanica.org>
 34 
*@author        David Delon <david.delon@tela-botanica.org>
35 
//Autres auteurs :
 35 
//Autres auteurs :
36 
*@author        Aucun
 36 
*@author        Aucun
37 
*@copyright     Tela-Botanica 2000-2004
 37 
*@copyright     Tela-Botanica 2000-2004
38 
*@version       $Revision: 1.7 $
 38 
*@version       $Revision: 1.8 $
39 
// +------------------------------------------------------------------------------------------------------+
 39 
// +------------------------------------------------------------------------------------------------------+
40 
*/
 40 
*/
Line 41... Line 41...
41 
 
 41 
 
42 
// +------------------------------------------------------------------------------------------------------+
 42 
// +------------------------------------------------------------------------------------------------------+
Line 94... Line 94...
94 
	                    'Fichier n° : '. __FILE__ .'<br /><p>';
 94 
	                    'Fichier n° : '. __FILE__ .'<br /><p>';
95 
	        print  $message;
 95 
	        print  $message;
96 
	    }
 96 
	    }
Line 97... Line 97...
97
97
98 
	    $chemin_wikini = PAP_FTP_RACINE.ADWI_CHEMIN_WIKINI.$valeur['code_alpha_wikini'].GEN_SEP;
 - 
 
99
- 
 
Line -... Line 98...
- 
 
 98 
	    $chemin_wikini = PAP_FTP_RACINE.ADWI_CHEMIN_WIKINI.$valeur['code_alpha_wikini'].GEN_SEP;
- 
 
 99
- 
 
 100 
	    if ($valeur['code_alpha_wikini']!='') {
- 
 
 101
100 
	    $resultat = $objet_pear_ftp->rm($chemin_wikini, $chemin_wikini, true);
 102 
		    $resultat = $objet_pear_ftp->rm($chemin_wikini, true);
101
103
102 
	    if (PEAR::isError($resultat)) {
 104 
		    if (PEAR::isError($resultat)) {
103 
	        $message =  '<p class="pap_erreur"> ERREUR Papyrus admin : impossible de copier le wikini de reference par ftp.<br />'.
 105 
		        $message =  '<p class="pap_erreur"> ERREUR Papyrus admin : impossible de copier le wikini de reference par ftp.<br />'.
104 
	                    'Wikini : '. $chemin_wikini .'<br />'.
 106 
		                    'Wikini : '. $chemin_wikini .'<br />'.
105 
	                    'Erreur origine : '. $resultat->getMessage() .'<br />'.
 107 
		                    'Erreur origine : '. $resultat->getMessage() .'<br />'.
106 
	                    'Ligne n° : '. __LINE__ .'<br />'.
 108 
		                    'Ligne n° : '. __LINE__ .'<br />'.
- 
 
 109 
		                    'Fichier n° : '. __FILE__ .'<br /></p>';
107 
	                    'Fichier n° : '. __FILE__ .'<br /></p>';
 110 
		            print $message;
- 
 
 111 
		    }
108 
	            print $message;
 112 
	    }
Line 109... Line 113...
109 
	    }
 113
Line 110... Line 114...
110 
	}
 114 
	}
Line 415... Line 419...
415 
 
 419 
 
416 
 
 420 
 
417 
/* +--Fin du code ----------------------------------------------------------------------------------------+
 421 
/* +--Fin du code ----------------------------------------------------------------------------------------+
- 
 
 422 
*
- 
 
 423 
* $Log: not supported by cvs2svn $
- 
 
 424 
* Revision 1.7  2006/06/02 09:12:16  florian
418 
*
 425 
* ajout constante chemin
419 
* $Log: not supported by cvs2svn $
 426 
*
420 
* Revision 1.6  2006/04/28 12:41:26  florian
 427 
* Revision 1.6  2006/04/28 12:41:26  florian
421 
* corrections erreurs chemin
 428 
* corrections erreurs chemin
422 
*
 429 
*