BlueGEEK Journal

Accueil > Programmes > Projets PHP pour Sites WEB > Agendas > Cyber Agenda ++ > Cyber-Agenda++ (Projet) > Ajouter Liste

AGENDA

Ajouter Liste

PHP

mercredi 1er mars 2006, par bluegyn_spip

<?php

// *****************************************************************************

// * COMBO LISTE

// * Enregistre toute nouvelle entrée dans une liste triée

// *****************************************************************************



//require('admin/mydata.inc.php');



$texte = isset($_POST['lieu']) ? $_POST['lieu'] : "";



// =============================================================================

// LECTURE DU FICHIER DES LISTES (creation si n'existe pas)

// =============================================================================

/*

$fileliste=basename($mydata,"data.php")."lieux.php"; // Rajoute Liste au nom du fichier actif

*/



// *** Si n'existe pas le crée ***

if (!file_exists($fileliste))

{

 touch ($fileliste);    // Le fichier est cree vide

 $TAB_lignes=array();  // Le tableau des lignes est cree vide

}

// *** Si existe le lit ***

else

{

 $TAB_lignes=file($fileliste); // Les lignes lues sont placees ds le tableau

}



// *****************************************************************************



if (strlen(trim($texte))); // Si le texte est argumenté

{

 $max = count($TAB_lignes);    // Compte les lignes

 //print $max;

   foreach ($TAB_lignes as $ligne)

   {

     $ligne = str_replace("\n","",$ligne);   // Attention au saut de ligne

 //    $tab[]=strtolower($ligne);            // Comparaison insensible à la casse

     @$tab[]=$ligne;                          // Remplit un Tableau Temporaire

   }

   //if (!array_search(strtolower($texte),$tab)) // Si l'occurnece est dans le tableau

   if (!@array_search($texte,$tab)) // Si l'occurence est dans le tableau

   {

     $TAB_lignes = array_pad($TAB_lignes, $max+1,$texte); // Ajoute le texte

     sort($TAB_lignes);  // Tri par ordre



     $_F = fopen ($fileliste, "w+");    // Ecrit dans un fichier

     reset($TAB_lignes);               // Pointe le début

     foreach($TAB_lignes as $ligne)

     {

       $ligne = trim($ligne); // elimine les lignes vides

       if (strlen($ligne))

       {

         fputs($_F,$ligne."\n"); // Rajoute un saut de ligne comme séparateur

       };

     }; // FOREACH

     fclose ($_F);

   }

};

// echo '<meta http-equiv="refresh" content="0;URL=index.php?mode=0">';

// *****************************************************************************

?>