Subversion Repositories Applications.papyrus

Rev

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

Rev 443 Rev 460
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: adsi_site.fonct.php,v 1.23 2005-09-20 17:01:22 ddelon Exp $
22
// CVS : $Id: adsi_site.fonct.php,v 1.24 2005-09-23 14:32:54 florian Exp $
23
/**
23
/**
24
* Bibliothèque de fonctions d'admininistration des projets
24
* Bibliothèque de fonctions d'admininistration des projets
25
*
25
*
26
* Contient un ensemble de fonctions permettant à l'application Administrateur de Papyrus, de modifier des informations
26
* Contient un ensemble de fonctions permettant à l'application Administrateur de Papyrus, de modifier des informations
27
* sur les projets (=sites gérés par Papyrus).
27
* sur les projets (=sites gérés par Papyrus).
Line 32... Line 32...
32
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
32
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
33
//Autres auteurs :
33
//Autres auteurs :
34
*@author        Alexandre GRANIER <alexandre@tela-botanica.org>
34
*@author        Alexandre GRANIER <alexandre@tela-botanica.org>
35
*@author        Laurent COUDOUNEAU <lc@gsite.org>
35
*@author        Laurent COUDOUNEAU <lc@gsite.org>
36
*@copyright     Tela-Botanica 2000-2004
36
*@copyright     Tela-Botanica 2000-2004
37
*@version       $Revision: 1.23 $ $Date: 2005-09-20 17:01:22 $
37
*@version       $Revision: 1.24 $ $Date: 2005-09-23 14:32:54 $
38
// +------------------------------------------------------------------------------------------------------+
38
// +------------------------------------------------------------------------------------------------------+
39
*/
39
*/
Line 40... Line 40...
40
 
40
 
41
// +------------------------------------------------------------------------------------------------------+
41
// +------------------------------------------------------------------------------------------------------+
Line 213... Line 213...
213
    }
213
    }
214
    // Débogage :
214
    // Débogage :
215
    //$GLOBALS['_DEBOGAGE_'] .= '<pre>'.print_r($aso_valeurs, true).'</pre>';
215
    //$GLOBALS['_DEBOGAGE_'] .= '<pre>'.print_r($aso_valeurs, true).'</pre>';
216
    //-------------------------------------------------------------------------------------------------------------------
216
    //-------------------------------------------------------------------------------------------------------------------
217
    // Information précédent le formulaire (en modification)
217
    // Information précédent le formulaire (en modification)
218
    if (isset($aso_valeurs['modification'])) {
218
    if (isset($aso_valeurs['modification'])&&isset($aso_valeurs['gs_id_site'])) {
219
        $sortie .= '<p>'.'Identifiant de ce site : '.'<span id="adsi_site_id">'.$aso_valeurs['gs_id_site'].'</span></p>'."\n";
219
        $sortie .= '<p>'.'Identifiant de ce site : '.'<span id="adsi_site_id">'.$aso_valeurs['gs_id_site'].'</span></p>'."\n";
220
    }
220
    }
221
    //-------------------------------------------------------------------------------------------------------------------
221
    //-------------------------------------------------------------------------------------------------------------------
222
    // Création du formulaire
222
    // Création du formulaire
223
    $form =& new HTML_QuickForm('site', 'post', str_replace('&amp;', '&', $url));
223
    $form =& new HTML_QuickForm('site', 'post', str_replace('&amp;', '&', $url));
Line 378... Line 378...
378
    $tab_type = GEN_retournerTableauTypeSiteExterne($db);
378
    $tab_type = GEN_retournerTableauTypeSiteExterne($db);
379
    $aso_options = array('0' => 'Aucun');
379
    $aso_options = array('0' => 'Aucun');
380
    foreach ($tab_type as $cle => $val) {
380
    foreach ($tab_type as $cle => $val) {
381
        $aso_options[$val['id']] = $val['intitule'];
381
        $aso_options[$val['id']] = $val['intitule'];
382
    }
382
    }
-
 
383
    
383
    $id = 'type_site_externe';
384
    $id = 'type_site_externe';
384
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);
385
    $aso_attributs = array('id'=> $id, 'tabindex' => $tab_index++);
385
    $label = 'type : ';
386
    $label = '<label>'.'Type de site externe : '.'</label>';
386
    $groupe[] =& HTML_QuickForm::createElement('select', $id, $label, $aso_options, $aso_attributs);
387
    $form->addElement('select', $id, $label, $aso_options, $aso_attributs);
Line 387... Line 388...
387
    
388
    
388
    $id = 'gs_url';
389
    $id = 'gs_url';
389
    $aso_attributs = array('id' => $id, 'tabindex' => $tab_index++,'size' => 45, 'maxlength' => 255, 'value' => 'http://');
-
 
390
    $label = 'url : ';// Les navigateurs gères mal les labels au sein d'un même <li>
-
 
391
    $groupe[] =& HTML_QuickForm::createElement('text', $id, $label, $aso_attributs);
-
 
392
    
390
    $aso_attributs = array('id' => $id, 'tabindex' => $tab_index++,'size' => 45, 'maxlength' => 255, 'value' => 'http://');
393
    $label = '<label>'.'Site externe : '.'</label>';
391
    $label = '<label>'.'URL du site externe : '.'</label>';
Line 394... Line 392...
394
    $form->addGroup($groupe, 'double', $label, '', false);
392
    $form->addElement('text', $id, $label, $aso_attributs);
395
    
393
    
Line 396... Line 394...
396
    $partie_site_fin = '</ul>'."\n".'</fieldset>'."\n";
394
    $partie_site_fin = '</ul>'."\n".'</fieldset>'."\n";
Line 1164... Line 1162...
1164
}
1162
}
Line 1165... Line 1163...
1165
 
1163
 
1166
// +- Fin du code source  --------------------------------------------------------------------------------+
1164
// +- Fin du code source  --------------------------------------------------------------------------------+
1167
/*
1165
/*
-
 
1166
* $Log: not supported by cvs2svn $
-
 
1167
* Revision 1.23  2005/09/20 17:01:22  ddelon
-
 
1168
* php5 et bugs divers
1168
* $Log: not supported by cvs2svn $
1169
*
1169
* Revision 1.22  2005/05/27 16:06:16  jpm
1170
* Revision 1.22  2005/05/27 16:06:16  jpm
1170
* Gestion des infos sur l'admin modifiant les infos.
1171
* Gestion des infos sur l'admin modifiant les infos.
1171
*
1172
*
1172
* Revision 1.21  2005/04/08 13:29:04  jpm
1173
* Revision 1.21  2005/04/08 13:29:04  jpm