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
*