/**************************************************
*
* SaveUploadedFiles
* Laurent Lacroix, 13/02/2001 00:59
*
* Sauvegarde l'ensemble des fichiers téléchargés par le serveur
* en leur donnant le nom qu'ils avaient sur le poste d'origine
*
* @param Arr Le tableau des fichiers postés (HTTP_POST_FILES à priori)
* @param Pth Le chemin d'accès au répertoire ou il faut copier les fichiers 
* @param Rpl Un booléen indiquant si il faut écraser les fichiers déjà existants
* @param Pfx Préfixe à ajouter au nom du fichier destination
* @return Le nombre de fichiers réellement créés après l'upload
*
* @see AddCarIf, (GetMultiUploadForm)
*
*************************************************/

Function SaveUploadedFiles( $Arr, $Pth, $Rpl = FALSE, $Pfx = "" )
{
 $Pth = AddCarIf( $Pth );
 $str = "";
 $nbr = 0;
 // 
 // Pour chaque fichier uploadé
 while( list( $k, $fil ) = each( $Arr ) ) 
 {
  //
  // Nom temporaire (sur le serveur) du fichier uploadé
  $temp_name = $v[tmp_name];
  //
  // Nom original (sur le poste client) du fichier uploadé
  $real_name = $Pfx . $v[name];
  //
  // Nom final du fichier à créer suite à l'upload
  $dest_name = $Pth . basename( $real_name );
  //
  // Si le fichier destination exister et qu'on ne veut pas le remplacer
  if( file_exists( $dest_name ) && ! $Rpl ) continue;
  //
  // Faire une copie, car le fichier temporaire sera supprimé par php
  copy( $temp_name, $dest_name );
  $nbr ++;
 }
 //
 // Retourne le nombre de fichiers copiés
 return $nbr;
}