Subversion Repositories Applications.papyrus

Rev

Rev 448 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
448 ddelon 1
<?
2
/*vim: set expandtab tabstop=4 shiftwidth=4: */
3
// +------------------------------------------------------------------------------------------------------+
4
// | PHP version 4.1                                                                                      |
5
// +------------------------------------------------------------------------------------------------------+
6
// | Copyright (C) 2004 Tela Botanica (accueil@tela-botanica.org)                                         |
7
// +------------------------------------------------------------------------------------------------------+
8
// | This library is free software; you can redistribute it and/or                                        |
9
// | modify it under the terms of the GNU Lesser General Public                                           |
10
// | License as published by the Free Software Foundation; either                                         |
11
// | version 2.1 of the License, or (at your option) any later version.                                   |
12
// |                                                                                                      |
13
// | This library is distributed in the hope that it will be useful,                                      |
14
// | but WITHOUT ANY WARRANTY; without even the implied warranty of                                       |
15
// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU                                    |
16
// | Lesser General Public License for more details.                                                      |
17
// |                                                                                                      |
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                                  |
20
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
21
// +------------------------------------------------------------------------------------------------------+
484 alexandre_ 22
// CVS : $Id: annuaire.php,v 1.2 2005-09-29 16:07:51 alexandre_tb Exp $
448 ddelon 23
/**
24
* programme principal du module annuaire
25
*
26
* programme principal du module annuaire
27
*
28
*@package annuaire
29
//Auteur original :
30
*@author        Alexandre GRANIER <alexandre@tela-botanica.org>
31
*@author        Florian SCHMITT <florian@ecole-et-nature.org>
32
//Autres auteurs :
33
*@author        Aucun
34
*@copyright     Tela-Botanica 2000-2004
484 alexandre_ 35
*@version       $Revision: 1.2 $
448 ddelon 36
// +------------------------------------------------------------------------------------------------------+
37
*/
38
 
39
// +------------------------------------------------------------------------------------------------------+
40
// |                                            ENTETE du PROGRAMME                                       |
41
// +------------------------------------------------------------------------------------------------------+
484 alexandre_ 42
include_once 'configuration/bottin.config.inc.php';
43
include_once 'configuration/annuaire.config.inc.php';
448 ddelon 44
include_once INS_CHEMIN_APPLI.'bibliotheque/annuaire.fonct.php';
45
 
484 alexandre_ 46
if (!isset($GLOBALS['lang'])) {
47
    $GLOBALS['lang'] = INS_LANGUE_DEFAUT ;
48
}
49
include_once INS_CHEMIN_APPLI."langues/annuaire.langue.".$GLOBALS['lang'].".inc.php" ;
448 ddelon 50
 
51
/**
52
 *  Renvoie le code HTML de l'application
53
 *
54
 * @return  string  HTML
55
 */
56
function afficherContenuCorps () {
57
    $res = '<h1 class="annuaire_titre1">'.ANN_TITRE.'</h1>'."\n" ;
58
    if (!$GLOBALS['AUTH']->getAuth())  {
484 alexandre_ 59
    	include_once INS_CHEMIN_APPLI.'langues/bottin_langue_fr.inc.php';
448 ddelon 60
        include_once INS_CHEMIN_APPLI.'configuration/inscription.config.inc.php';
61
        include_once INS_CHEMIN_APPLI.'bibliotheque/inscription.fonct.php';
62
        $res .= AUTH_formulaire_login() ;
63
    } else {
64
        // Le code javascript des cases à cocher
65
        $java =
66
            'function setCheckboxes(the_form) {
67
            	var do_check = document.forms[the_form].elements[\'selecttotal\'].checked;
68
            	var elts = document.forms[the_form].elements[\'select[]\'];
69
            	var elts_cnt = (typeof(elts.length) != \'undefined\')
70
                                ? elts.length
71
                                : 0;
72
            	if (elts_cnt) {
73
			for (var i = 0; i < elts_cnt; i++) {
74
				elts[i].checked = do_check;
75
			} // Fin for
76
		} else {
77
			elts.checked = do_check;
78
		}// Fin if... else
79
		return true;
80
	    } // Fin de la fonction setCheckboxes()';
81
        GEN_stockerCodeScript($java) ;
82
 
83
        $res .= '<h2 class="annuaire_titre2">'.ANN_CLIQUEZ_LETTRE.'</h2>'."\n";
84
 
85
            // S'il y a un mail a envoyé, on l'envoie
484 alexandre_ 86
        if (isset($_POST['select']) && is_array ($_POST['select'])) $res .= envoie_mail_depuis_annuaire() ;
87
        $res .= parcourirAnnu() ;
448 ddelon 88
    }
89
    return $res;
90
}
91
 
92
/**------------------------------------------------------------------------------
93
* $Log: not supported by cvs2svn $
484 alexandre_ 94
* Revision 1.1  2005/09/22 14:02:49  ddelon
95
* nettoyage annuaire et php5
96
*
448 ddelon 97
* Revision 1.4  2005/09/22 13:30:49  florian
98
* modifs pour compatibilité XHTML Strict + corrections de bugs (mais ya encore du boulot!!)
99
*
100
*
101
*-- End of source  ------------------------------------------------------------*/
102
?>