Subversion Repositories eFlore/Applications.bibliobota

Rev

Rev 2 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 2 Rev 30
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: bb_lien_favoris.php,v 1.1 2005-11-23 10:22:25 jp_milcent Exp $
 24 
// CVS : $Id: bb_lien_favoris.php,v 1.1 2005/02/28 14:23:51 jpm Exp $
25 
/**
 25 
/**
26 
* Application affichant des listes des sites web
 26 
* Application affichant des listes des sites web
27 
*
 27 
*
28 
* Fournit la liste des sites web favoris de Tela Botanica.
 28 
* Fournit la liste des sites web favoris de Tela Botanica.
29 
* Il est possible d'afficher une liste de sites web :
 29 
* Il est possible d'afficher une liste de sites web :
Line 34... Line 34...
34 
//Auteur original :
 34 
//Auteur original :
35 
*@author        Jean-Charles GRANGER <tela@vecteur.org>
 35 
*@author        Jean-Charles GRANGER <tela@vecteur.org>
36 
//Autres auteurs :
 36 
//Autres auteurs :
37 
*@author        Jean-Pascal MILCENT <jpm@clapas.org>
 37 
*@author        Jean-Pascal MILCENT <jpm@clapas.org>
38 
*@copyright     Tela-Botanica 2000-2004
 38 
*@copyright     Tela-Botanica 2000-2004
39 
*@version       $Revision: 1.1 $ $Date: 2005-11-23 10:22:25 $
 39 
*@version       $Revision: 1.1 $ $Date: 2005/02/28 14:23:51 $
40 
// +------------------------------------------------------------------------------------------------------+
 40 
// +------------------------------------------------------------------------------------------------------+
41 
*/
 41 
*/
Line 42... Line 42...
42 
 
 42 
 
43 
// +------------------------------------------------------------------------------------------------------+
 43 
// +------------------------------------------------------------------------------------------------------+
Line 53... Line 53...
53 
} else {
 53 
} else {
54 
    /** Inclusion du fichier de traduction fr par défaut. */
 54 
    /** Inclusion du fichier de traduction fr par défaut. */
55 
    include_once BBLF_CHEMIN_LANGUES.'bblf_langue_fr.inc.php';
 55 
    include_once BBLF_CHEMIN_LANGUES.'bblf_langue_fr.inc.php';
56 
}
 56 
}
Line 57... Line -...
57 
 
 - 
 
58 
// Initialisation de la variable à retourner
 - 
 
59 
$var_to_ret = '';
 - 
 
60 
$var_to_ret .= '<!-- BiblioBota - Partenaire : DEBUT -->'."\n";
 - 
 
61 
 
 57 
 
62 
// +------------------------------------------------------------------------------------------------------+
 58 
// +------------------------------------------------------------------------------------------------------+
63 
// |                                            CORPS du PROGRAMME                                        |
 59 
// |                                            CORPS du PROGRAMME                                        |
64 
// +------------------------------------------------------------------------------------------------------+
 60 
// +------------------------------------------------------------------------------------------------------+
- 
 
 61 
global $GS_GLOBAL;
- 
 
 62 
 
Line 65... Line 63...
65 
global $GS_GLOBAL, $TransTab;
 63 
global $TransTab;
66 
 
 64 
 
67 
if ((isset($TransTab)) && ($TransTab != '')) {
 65 
if ((isset($TransTab)) && ($TransTab != '')) {
68 
    $tableau = FRAG_decoupageChaine($TransTab);
 66 
    $tableau = FRAG_decoupageChaine($TransTab);
Line 79... Line 77...
79 
// Récupèration des arguments de l'application pour la page donnée
 77 
// Récupèration des arguments de l'application pour la page donnée
80 
$tableau['selecteur'] = $GLOBALS['_GEN_commun']['info_application']->selecteur;
 78 
$tableau['selecteur'] = $GLOBALS['_GEN_commun']['info_application']->selecteur;
Line 81... Line 79...
81 
 
 79 
 
82 
// +------------------------------------------------------------------------------------------------------+
 80 
// +------------------------------------------------------------------------------------------------------+
- 
 
 81 
// Création du contenu
- 
 
 82 
 
- 
 
 83 
// Initialisation de la variable à retourner
- 
 
 84 
$var_to_ret = '';
83 
// Création du contenu
 85 
 
84 
if ($tableau['selecteur'] == 'ref') {
 86 
if ($tableau['selecteur'] == 'ref') {
85 
    $add_to_query = 'B_L_REFERENCE';
 87 
    $add_to_query = 'B_L_REFERENCE';
86 
    $le_titre = ' de référence';
 88 
    $le_titre = ' de référence';
87 
    $le_texte = '&nbsp;';
 89 
    $le_texte = '&nbsp;';
Line 92... Line 94...
92 
} else {
 94 
} else {
93 
    $le_titre = '';
 95 
    $le_titre = '';
94 
    $le_texte = '';
 96 
    $le_texte = '';
95 
}
 97 
}
Line -... Line 98...
- 
 
 98 
 
- 
 
 99 
$var_to_ret .= '<!-- BiblioBota - Partenaire : DEBUT -->';
96 
 
 100 
 
97 
// Titre de la page
 101 
// Titre de la page
98 
$var_to_ret .= '<h1>'.'Sites '.$le_titre.'</h1>';
 102 
$var_to_ret .= '<h1>'.'Sites '.$le_titre.'</h1>';
99 
// Petit descriptif
 103 
// Petit descriptif
Line 182... Line 186...
182 
    }
 186 
    }
183 
} else {
 187 
} else {
184 
    $var_to_ret .= '<p>'.'Echec d\'exécution du script : pas de paramètre valide [réf|part].'.'</p>'."\n";
 188 
    $var_to_ret .= '<p>'.'Echec d\'exécution du script : pas de paramètre valide [réf|part].'.'</p>'."\n";
185 
}
 189 
}
Line -... Line 190...
- 
 
 190 
 
- 
 
 191 
$var_to_ret .= '<!-- BiblioBota - Partenaire : FIN -->';
- 
 
 192 
 
- 
 
 193 
$sortie .= $var_to_ret;
186 
 
 194 
 
187 
// +------------------------------------------------------------------------------------------------------+
 195 
// +------------------------------------------------------------------------------------------------------+
188 
// |                                            PIED du PROGRAMME                                         |
 196 
// |                                            PIED du PROGRAMME                                         |
189 
// +------------------------------------------------------------------------------------------------------+
 - 
 
190 
$var_to_ret .= '<!-- BiblioBota - Partenaire : FIN -->'."\n";
 - 
 
- 
 
 197 
// +------------------------------------------------------------------------------------------------------+
Line 191... Line 198...
191 
$sortie .= $var_to_ret;
 198 
 
192 
 
 199 
 
193 
/* +--Fin du code ----------------------------------------------------------------------------------------+
 200 
/* +--Fin du code ----------------------------------------------------------------------------------------+
194 
*
 - 
 
195 
* $Log: not supported by cvs2svn $
 - 
 
196 
* Revision 1.3  2005/03/01 15:18:37  jpm
 - 
 
197 
* Ajout de commentaire html de début et fin d'appli.
 - 
 
198 
*
 - 
 
199 
* Revision 1.2  2005/02/28 14:34:10  jpm
 - 
 
200 
* Changement du nom de l'appli en Lien Favoris.
 201 
*
201 
*
 202 
* $Log: bb_lien_favoris.php,v $
202 
* Revision 1.1  2005/02/28 14:23:51  jpm
 203 
* Revision 1.1  2005/02/28 14:23:51  jpm
203 
* Ajout des fichiers de l'application Lien Favoris.
 204 
* Ajout des fichiers de l'application Lien Favoris.
204 
*
 205 
*