Subversion Repositories Applications.papyrus

Rev

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

Rev 4 Rev 17
Line 17... Line 17...
17
// |                                                                                                      |
17
// |                                                                                                      |
18
// | You should have received a copy of the GNU Lesser General Public                                     |
18
// | You should have received a copy of the GNU Lesser General Public                                     |
19
// | License along with this library; if not, write to the Free Software                                  |
19
// | License along with this library; if not, write to the Free Software                                  |
20
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
20
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
21
// +------------------------------------------------------------------------------------------------------+
21
// +------------------------------------------------------------------------------------------------------+
22
// CVS : $Id: selecteur_sites.php,v 1.1 2004-06-15 15:05:47 jpm Exp $
22
// CVS : $Id: selecteur_sites.php,v 1.2 2004-06-21 07:37:50 alex Exp $
23
/**
23
/**
24
* Applette : selecteur sites
24
* Applette : selecteur sites
25
*
25
*
26
* Génère un formulaire contenant un menu déroulant permettant de choisir un site parmis les disponibles.
26
* Génère un formulaire contenant un menu déroulant permettant de choisir un site parmis les disponibles.
27
* Nécessite :
27
* Nécessite :
Line 36... Line 36...
36
//Auteur original :
36
//Auteur original :
37
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
37
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
38
//Autres auteurs :
38
//Autres auteurs :
39
*@author        Aucun
39
*@author        Aucun
40
*@copyright     Tela-Botanica 2000-2004
40
*@copyright     Tela-Botanica 2000-2004
41
*@version       $Revision: 1.1 $ $Date: 2004-06-15 15:05:47 $
41
*@version       $Revision: 1.2 $ $Date: 2004-06-21 07:37:50 $
42
// +------------------------------------------------------------------------------------------------------+
42
// +------------------------------------------------------------------------------------------------------+
43
*/
43
*/
Line 44... Line 44...
44
 
44
 
45
// +------------------------------------------------------------------------------------------------------+
45
// +------------------------------------------------------------------------------------------------------+
Line 80... Line 80...
80
    $indent_pas     = 4;// Pas d'indentation en nombre d'espace
80
    $indent_pas     = 4;// Pas d'indentation en nombre d'espace
Line 81... Line 81...
81
    
81
    
82
    // Texte à traduire
82
    // Texte à traduire
83
    $etiquette_legende = 'Sélecteur de monde';
83
    $etiquette_legende = 'Sélecteur de monde';
84
    $etiquette_option_defaut = 'changer de monde';
84
    $etiquette_option_defaut = 'changer de monde';
85
    $etiquette_bouton_valider = 'OK';
85
    $etiquette_bouton_valider = 'ok';
Line 86... Line 86...
86
    $etiquette_erreur = 'Un seul site disponible dans Génésia.';
86
    $etiquette_erreur = 'Un seul site disponible dans Génésia.';
87
    
87
    
88
    // On recherche l'ensemble des sites principaux en excluant le site admin (administration de Génésia).
88
    // On recherche l'ensemble des sites principaux en excluant le site admin (administration de Génésia).
Line 111... Line 111...
111
        $res .= str_repeat(' ', $indent_origine + ($indent_pas * 1)).
111
        $res .= str_repeat(' ', $indent_origine + ($indent_pas * 1)).
112
                '<fieldset>'."\n";
112
                '<fieldset>'."\n";
113
        $res .= str_repeat(' ', $indent_origine + ($indent_pas * 2)).
113
        $res .= str_repeat(' ', $indent_origine + ($indent_pas * 2)).
114
                '<legend>'.$etiquette_legende.'</legend>'."\n";
114
                '<legend>'.$etiquette_legende.'</legend>'."\n";
115
        $res .= str_repeat(' ', $indent_origine + ($indent_pas * 2)).
115
        $res .= str_repeat(' ', $indent_origine + ($indent_pas * 2)).
116
                '<select id="'.$url_cle_site.'" name="'.$url_cle_site.'">'."\n";
116
                '<select id="'.$url_cle_site.'" name="'.$url_cle_site.'" onchange="javascript:this.form.submit();">'."\n";
117
        $res .= str_repeat(' ', $indent_origine + ($indent_pas * 3)).
117
        $res .= str_repeat(' ', $indent_origine + ($indent_pas * 3)).
118
                '<option value="'.$code_site.'" selected="selected">'.$etiquette_option_defaut.'</option>'."\n";
118
                '<option value="'.$code_site.'" selected="selected">'.$etiquette_option_defaut.'</option>'."\n";
119
        while ($ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC)) {
119
        while ($ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC)) {
120
            // Initialisation des variables
120
            // Initialisation des variables
121
            $nom = '';
121
            $nom = '';
Line 163... Line 163...
163
 
163
 
164
 
164
 
165
/* +--Fin du code ----------------------------------------------------------------------------------------+
165
/* +--Fin du code ----------------------------------------------------------------------------------------+
-
 
166
*
-
 
167
* $Log: not supported by cvs2svn $
-
 
168
* Revision 1.1  2004/06/15 15:05:47  jpm
166
*
169
* Changement de nom et d'arborescence de Genesia en Papyrus.
167
* $Log: not supported by cvs2svn $
170
*
168
* Revision 1.5  2004/05/05 08:27:12  jpm
171
* Revision 1.5  2004/05/05 08:27:12  jpm
169
* Ajout du paramétrage de l'indentation et l'utilisation de variable pour contenir les textes de l'appli.
172
* Ajout du paramétrage de l'indentation et l'utilisation de variable pour contenir les textes de l'appli.
170
*
173
*