| 810 |
florian |
1 |
<?php
|
|
|
2 |
|
|
|
3 |
//vim: set expandtab tabstop=4 shiftwidth=4:
|
|
|
4 |
// +-----------------------------------------------------------------------------------------------+
|
|
|
5 |
// | PHP version 4.0 |
|
|
|
6 |
// +-----------------------------------------------------------------------------------------------+
|
|
|
7 |
// | Copyright (c) 1997, 1998, 1999, 2000, 2001 The PHP Group |
|
|
|
8 |
// +-----------------------------------------------------------------------------------------------+
|
|
|
9 |
// | This source file is subject to version 2.0 of the PHP license, |
|
|
|
10 |
// | that is bundled with this package in the file LICENSE, and is |
|
|
|
11 |
// | available at through the world-wide-web at |
|
|
|
12 |
// | http://www.php.net/license/2_02.txt. |
|
|
|
13 |
// | If you did not receive a copy of the PHP license and are unable to |
|
|
|
14 |
// | obtain it through the world-wide-web, please send a note to |
|
|
|
15 |
// | license@php.net so we can mail you a copy immediately. |
|
|
|
16 |
// +-----------------------------------------------------------------------------------------------+
|
|
|
17 |
/**
|
|
|
18 |
*
|
|
|
19 |
*Fichier des fonctions du bottin
|
|
|
20 |
*
|
|
|
21 |
*@package bottin
|
|
|
22 |
//Auteur original :
|
|
|
23 |
*@author Florian SCHMITT <florian@ecole-et-nature.org>
|
|
|
24 |
//Autres auteurs :
|
|
|
25 |
*@copyright Outils-reseaux 2006-2040
|
|
|
26 |
*@version 05 avril 2006
|
|
|
27 |
// +-----------------------------------------------------------------------------------------------+
|
|
|
28 |
//
|
|
|
29 |
// $Id$
|
|
|
30 |
// FICHIER : $RCSfile$
|
|
|
31 |
// AUTEUR : $Author$
|
|
|
32 |
// VERSION : $Revision$
|
|
|
33 |
// DATE : $Date$
|
|
|
34 |
*/
|
|
|
35 |
|
|
|
36 |
|
|
|
37 |
/** function inscription_onglets() Affiche les onglets de présentation de la structure
|
|
|
38 |
*
|
|
|
39 |
*
|
|
|
40 |
*
|
|
|
41 |
* @return string HTML
|
|
|
42 |
*/
|
|
|
43 |
function inscription_onglets() {
|
|
|
44 |
//on trouve l'id de la fiche en fonction de l'onglet choisi auparavant
|
|
|
45 |
if (isset($_GET['voir_fiche'])) {
|
|
|
46 |
$id_fiche=$_GET['voir_fiche'];
|
|
|
47 |
} elseif (isset($_GET['voir_abonnement'])) {
|
|
|
48 |
$id_fiche=$_GET['voir_abonnement'];
|
|
|
49 |
} elseif (isset($_GET['voir_actus'])) {
|
|
|
50 |
$id_fiche=$_GET['voir_actus'];
|
|
|
51 |
} elseif (isset($_GET['voir_ressources'])) {
|
|
|
52 |
$id_fiche=$_GET['voir_ressources'];
|
|
|
53 |
} elseif (isset($_GET['voir_competences'])) {
|
|
|
54 |
$id_fiche=$_GET['voir_competences'];
|
|
|
55 |
}
|
|
|
56 |
|
|
|
57 |
//preparation de l'affichage des onglets
|
|
|
58 |
$res='<ul id="onglets_inscription">'."\n";
|
|
|
59 |
//partie présentation
|
|
|
60 |
$GLOBALS['ins_url']->addQueryString('voir_fiche', $id_fiche);
|
|
|
61 |
$res .= '<li id="fiche"><a href="'.$GLOBALS['ins_url']->getURL().'">'.INS_PRESENTATION.'</a>'."\n".'</li>'."\n";
|
|
|
62 |
$GLOBALS['ins_url']->removeQueryString('voir_fiche');
|
|
|
63 |
if ($id_fiche==$GLOBALS['AUTH']->getAuthData(INS_CHAMPS_ID)) {
|
|
|
64 |
//partie abonnement
|
|
|
65 |
$GLOBALS['ins_url']->addQueryString('voir_abonnement', $id_fiche);
|
|
|
66 |
$res .= '<li id="abonnements"><a href="'.$GLOBALS['ins_url']->getURL().'">'.INS_ABONNEMENTS.'</a></li>'."\n" ;
|
|
|
67 |
$GLOBALS['ins_url']->removeQueryString('voir_abonnement');
|
|
|
68 |
}
|
|
|
69 |
//partie actualites
|
|
|
70 |
$GLOBALS['ins_url']->addQueryString('voir_actus', $id_fiche);
|
|
|
71 |
$res .= '<li id="actus"><a href="'.$GLOBALS['ins_url']->getURL().'">'.INS_ACTUALITES.'</a>'."\n".'</li>'."\n";
|
|
|
72 |
$GLOBALS['ins_url']->removeQueryString('voir_actus');
|
|
|
73 |
//partie ressources
|
|
|
74 |
$GLOBALS['ins_url']->addQueryString('voir_ressources', $id_fiche);
|
|
|
75 |
$res .= '<li id="ressources"><a href="'.$GLOBALS['ins_url']->getURL().'">'.INS_RESSOURCES.'</a>'."\n".'</li>'."\n";
|
|
|
76 |
$GLOBALS['ins_url']->removeQueryString('voir_ressources');
|
|
|
77 |
//partie competences
|
|
|
78 |
$GLOBALS['ins_url']->addQueryString('voir_competences', $id_fiche);
|
|
|
79 |
$res .= '<li id="competences"><a href="'.$GLOBALS['ins_url']->getURL().'">'.INS_COMPETENCES.'</a>'."\n".'</li>'."\n";
|
|
|
80 |
$GLOBALS['ins_url']->removeQueryString('voir_competences');
|
|
|
81 |
$res.= '</ul>'."\n";
|
|
|
82 |
return $res;
|
|
|
83 |
}
|
|
|
84 |
|
|
|
85 |
/** function affiche_onglet_info() sélectionne le type d'information à montrer pour une fiche
|
|
|
86 |
*
|
|
|
87 |
*
|
|
|
88 |
*
|
|
|
89 |
* @return string HTML
|
|
|
90 |
*/
|
|
|
91 |
function affiche_onglet_info() {
|
|
|
92 |
include_once INS_CHEMIN_APPLI.'bibliotheque/inscription.fonct.php';
|
|
|
93 |
include_once INS_CHEMIN_APPLI.'bibliotheque/inscription.class.php';
|
|
|
94 |
if ( isset($_GET['voir_fiche']) ) {
|
|
|
95 |
$res=info($_GET['voir_fiche'], 'fiche');
|
|
|
96 |
} elseif (isset($_GET['voir_abonnement'])) {
|
|
|
97 |
$res=info($_GET['voir_abonnement'], 'abonnement');
|
|
|
98 |
} elseif (isset($_GET['voir_actus'])) {
|
|
|
99 |
$res=info($_GET['voir_actus'], 'actus');
|
|
|
100 |
} elseif (isset($_GET['voir_ressources'])) {
|
|
|
101 |
$res=info($_GET['voir_ressources'], 'ressources');
|
|
|
102 |
} elseif (isset($_GET['voir_competences'])) {
|
|
|
103 |
$res=info($_GET['voir_competences'], 'competences');
|
|
|
104 |
}
|
|
|
105 |
return $res;
|
|
|
106 |
}
|
|
|
107 |
|
|
|
108 |
/** function Annuaire_recherche () Moteur de recherche dans l'annuaire des inscrits
|
|
|
109 |
*
|
|
|
110 |
*
|
|
|
111 |
*
|
|
|
112 |
* @return string HTML
|
|
|
113 |
*/
|
|
|
114 |
function Annuaire_recherche() {
|
|
|
115 |
$res ='<h2>'.INS_RECHERCHE_ANNUAIRE_DES_INSCRITS.'</h2>'."\n";
|
|
|
116 |
$form =& new HTML_QuickForm('form_recherche_annuaire', 'post', str_replace('&', '&', $GLOBALS['ins_url']->getURL()));
|
|
|
117 |
$squelette =& $form->defaultRenderer();
|
|
|
118 |
$squelette->setFormTemplate("\n".'<form{attributes}>'."\n".'<table>'."\n".'{content}'."\n".'</table>'."\n".'</form>'."\n");
|
|
|
119 |
$squelette->setElementTemplate( '<tr>'."\n".
|
|
|
120 |
'<td style="padding:5px;text-align:right;">{label}'.
|
|
|
121 |
'<!-- BEGIN required --><span class="symbole_obligatoire">*</span><!-- END required -->'."\n".
|
|
|
122 |
'<!-- BEGIN error --><span class="erreur">{error}</span><!-- END error -->'."\n".
|
|
|
123 |
' : </td>'."\n".
|
|
|
124 |
'<td style="padding:5px;text-align:left;">{element}</td>'."\n".
|
|
|
125 |
'</tr>'."\n" );
|
|
|
126 |
$squelette->setElementTemplate( '<tr>'."\n".'<td colspan=2 style="padding:5px;">{label}{element}</td>'."\n".'</tr>'."\n", 'bouton_rechercher');
|
|
|
127 |
|
|
|
128 |
$option_type=array ('0' => INS_PERSONNES_OU_STRUCTURES,
|
|
|
129 |
'1' => INS_PERSONNES,
|
|
|
130 |
'2' => INS_STRUCTURES);
|
|
|
131 |
$form->addElement('select', 'nom_type', INS_JE_RECHERCHE, $option_type);
|
|
|
132 |
|
|
|
133 |
//requete pour recuperer la liste des pays
|
|
|
134 |
$requete = 'SELECT '.INS_CHAMPS_ID_PAYS.', '.INS_CHAMPS_LABEL_PAYS.' FROM '.INS_TABLE_PAYS.' WHERE '.INS_CHAMPS_I18N_PAYS.'="fr-FR"';
|
|
|
135 |
$resultat = $GLOBALS['ins_db']->query($requete) ;
|
|
|
136 |
if (DB::isError($resultat)) {
|
|
|
137 |
die ("Echec de la requete : $requete<br />".$resultat->getMessage()) ;
|
|
|
138 |
}
|
|
|
139 |
$option_pays = array('zz' => INS_TOUS_PAYS) ;
|
|
|
140 |
while ($ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC)) {
|
|
|
141 |
$option_pays[$ligne[INS_CHAMPS_ID_PAYS]] = $ligne[INS_CHAMPS_LABEL_PAYS] ;
|
|
|
142 |
}
|
|
|
143 |
$form->addElement('select', 'nom_pays', INS_PAYS, $option_pays);
|
|
|
144 |
|
|
|
145 |
//requete pour recuperer la liste des départements
|
|
|
146 |
$requete = 'SELECT '.INS_CHAMPS_ID_DEPARTEMENT.', '.INS_CHAMPS_NOM_DEPARTEMENT.' FROM '.INS_TABLE_DPT;
|
|
|
147 |
$resultat = $GLOBALS['ins_db']->query($requete) ;
|
|
|
148 |
if (DB::isError($resultat)) {
|
|
|
149 |
die ("Echec de la requete : $requete<br />".$resultat->getMessage()) ;
|
|
|
150 |
}
|
|
|
151 |
$option_departements = array('0' => INS_TOUS_DEPARTEMENTS) ;
|
|
|
152 |
while ($ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC)) {
|
|
|
153 |
$option_departements[$ligne[INS_CHAMPS_ID_DEPARTEMENT]] = $ligne[INS_CHAMPS_NOM_DEPARTEMENT] ;
|
|
|
154 |
}
|
|
|
155 |
$form->addElement('select', 'nom_departement', INS_DEPARTEMENT_POUR_LA_FRANCE, $option_departements);
|
|
|
156 |
|
|
|
157 |
$form->addElement('text', 'nom_annuaire', INS_NOM_ANNUAIRE);
|
|
|
158 |
|
|
|
159 |
$form->addElement('submit', 'bouton_rechercher', INS_RECHERCHER);
|
|
|
160 |
|
|
|
161 |
//valeurs par defaut
|
|
|
162 |
$defauts=array('nom_pays'=>'fr','nom_departement'=>'0');
|
|
|
163 |
$form->setDefaults($defauts);
|
|
|
164 |
|
|
|
165 |
//affichage du formulaire
|
|
|
166 |
$res .=$form->toHtml();
|
|
|
167 |
|
|
|
168 |
//on teste si l'on affiche le resultat de la recherche ou
|
|
|
169 |
if (isset($_POST['nom_type'])) {
|
|
|
170 |
$requete = 'SELECT '.INS_CHAMPS_ID.', '.INS_CHAMPS_NOM.', '.INS_CHAMPS_PRENOM.', '.INS_CHAMPS_VILLE.', '.INS_CHAMPS_CODE_POSTAL;
|
|
|
171 |
$requete .= ' FROM '.INS_ANNUAIRE.' WHERE ';
|
|
|
172 |
$req_where=0;
|
|
|
173 |
if ($_POST['nom_type']==1) {
|
|
|
174 |
$requete .= INS_CHAMPS_EST_STRUCTURE.'=0 ';
|
|
|
175 |
$req_where=1;
|
|
|
176 |
} elseif ($_POST['nom_type']==2) {
|
|
|
177 |
$requete .= INS_CHAMPS_EST_STRUCTURE.'=1 ';
|
|
|
178 |
$req_where=1;
|
|
|
179 |
}
|
|
|
180 |
if ($_POST['nom_pays']!='0'and$_POST['nom_pays']!='zz') {
|
|
|
181 |
if ($req_where) {
|
|
|
182 |
$requete .= 'AND ';
|
|
|
183 |
} else {
|
|
|
184 |
$req_where=1;
|
|
|
185 |
}
|
|
|
186 |
$requete .= INS_CHAMPS_PAYS.'="'.$_POST['nom_pays'].'" ';
|
|
|
187 |
}
|
|
|
188 |
if ($_POST['nom_departement']!='0') {
|
|
|
189 |
if ($req_where) {
|
|
|
190 |
$requete .= 'AND ';
|
|
|
191 |
} else {
|
|
|
192 |
$req_where=1;
|
|
|
193 |
}
|
|
|
194 |
$requete .= INS_CHAMPS_DEPARTEMENT.'="'.$_POST['nom_departement'].'" ';
|
|
|
195 |
}
|
|
|
196 |
if ($_POST['nom_annuaire']!='') {
|
|
|
197 |
if ($req_where) {
|
|
|
198 |
$requete .= 'AND ';
|
|
|
199 |
} else {
|
|
|
200 |
$req_where=1;
|
|
|
201 |
}
|
|
|
202 |
$requete .= '('.INS_CHAMPS_NOM.' LIKE "%'.$_POST['nom_annuaire'].'%"'.
|
|
|
203 |
' OR '.INS_CHAMPS_PRENOM.' LIKE "%'.$_POST['nom_annuaire'].'%"'.
|
|
|
204 |
' OR '.INS_CHAMPS_SIGLE_STRUCTURE.' LIKE "%'.$_POST['nom_annuaire'].'%"'.
|
|
|
205 |
' OR '.INS_CHAMPS_DESCRIPTION.' LIKE "%'.$_POST['nom_annuaire'].'%") ';
|
|
|
206 |
}
|
|
|
207 |
if (!$req_where) $requete .= '1';
|
|
|
208 |
$requete .=' ORDER BY '.INS_CHAMPS_NOM;
|
|
|
209 |
$resultat = $GLOBALS['ins_db']->query($requete);
|
|
|
210 |
if ($resultat->numRows()>0) {
|
|
|
211 |
$res .='<h2>'.INS_RESULTATS_RECHERCHE.' ('.$resultat->numRows().' '.INS_ENTREES.')</h2>'."\n";
|
|
|
212 |
$res .='<p class="zone_info">'.INS_CLIQUER_ELEMENT_LISTE.'</p>'."\n";
|
|
|
213 |
$i=0;
|
|
|
214 |
while ($ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC)) {
|
|
|
215 |
$donnees_membres[$i++]=$ligne;
|
|
|
216 |
}
|
|
|
217 |
$res .= listes_inscrit($donnees_membres);
|
|
|
218 |
}
|
|
|
219 |
else {
|
|
|
220 |
$res .='<h2>'.INS_RESULTATS_RECHERCHE.'</h2>'."\n";
|
|
|
221 |
$res .= '<p class="zone_alert">'.INS_PAS_DE_RESULTATS.'</p>'."\n";
|
|
|
222 |
}
|
|
|
223 |
} else {
|
|
|
224 |
$res .='<h2>'.INS_DIX_DERNIERES_INSCRIPTIONS.'</h2>'."\n";
|
|
|
225 |
$requete = 'SELECT '.INS_CHAMPS_ID.', '.INS_CHAMPS_NOM.', '.INS_CHAMPS_PRENOM.', '.INS_CHAMPS_VILLE.', '.INS_CHAMPS_CODE_POSTAL;
|
|
|
226 |
$requete .= ' FROM '.INS_ANNUAIRE.' ORDER BY '.INS_CHAMPS_DATE.' DESC LIMIT 0 , 10';
|
|
|
227 |
$resultat = $GLOBALS['ins_db']->query($requete);
|
|
|
228 |
if ($resultat->numRows()>0) {
|
|
|
229 |
$i=0;
|
|
|
230 |
while ($ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC)) {
|
|
|
231 |
$donnees_membres[$i++]=$ligne;
|
|
|
232 |
}
|
|
|
233 |
$res .= listes_inscrit($donnees_membres, 0);
|
|
|
234 |
}
|
|
|
235 |
else {
|
|
|
236 |
$res .= '<p class="zone_alert">'.INS_PAS_DE_RESULTATS.'</p>'."\n";
|
|
|
237 |
}
|
|
|
238 |
}
|
|
|
239 |
return $res ;
|
|
|
240 |
}
|
|
|
241 |
|
|
|
242 |
/**
|
|
|
243 |
* Renvoie le code HTML de la liste des inscrits
|
|
|
244 |
* en fonction de la requete passé en parametre
|
|
|
245 |
*
|
|
|
246 |
* @return Renvoie le code HTML de la liste des inscrits
|
|
|
247 |
*/
|
|
|
248 |
|
|
|
249 |
function listes_inscrit(& $donnees_membres, $affiche_form_mail=1) {
|
|
|
250 |
$res = '';
|
| 814 |
alexandre_ |
251 |
if ($GLOBALS['AUTH']->getAuth()&&$affiche_form_mail) {
|
|
|
252 |
|
|
|
253 |
$res .= '<form action="'.$GLOBALS['ins_url']->getURL().'" method="post" name="formmail">'."\n";
|
|
|
254 |
}
|
| 810 |
florian |
255 |
$res .= '<ul>'."\n";
|
|
|
256 |
for ($i=0;$i<count($donnees_membres);$i++) {
|
|
|
257 |
$id = array_shift($donnees_membres[$i]);
|
|
|
258 |
$GLOBALS['ins_url']->addQueryString('voir_fiche', $id);
|
| 812 |
florian |
259 |
$res .= '<li>'."\n";
|
| 810 |
florian |
260 |
if ($GLOBALS['AUTH']->getAuth()&&$affiche_form_mail) {
|
| 811 |
florian |
261 |
$res.='<input type="checkbox" name="select[]" value="'.$id.'" />'."\n";
|
| 810 |
florian |
262 |
}
|
| 812 |
florian |
263 |
$res .= '<a href="'.$GLOBALS['ins_url']->getURL().'">'."\n";
|
| 810 |
florian |
264 |
$res .= '<strong>'.$donnees_membres[$i][INS_CHAMPS_NOM].
|
|
|
265 |
' '.$donnees_membres[$i][INS_CHAMPS_PRENOM].'</strong>'."\n".
|
|
|
266 |
' '.$donnees_membres[$i][INS_CHAMPS_CODE_POSTAL].
|
|
|
267 |
' '.$donnees_membres[$i][INS_CHAMPS_VILLE];
|
| 811 |
florian |
268 |
$res .= '</a>'."\n".'</li>'."\n";
|
| 810 |
florian |
269 |
}
|
|
|
270 |
$res .= '</ul>'."\n";
|
|
|
271 |
if ($GLOBALS['AUTH']->getAuth()&&$affiche_form_mail) {
|
|
|
272 |
$res .= INS_CHECK_UNCHECK ;
|
|
|
273 |
$res .= ' <input type="checkbox" name="selecttotal" onclick="javascript:setCheckboxes(\'formmail\');"><br />';
|
|
|
274 |
$res .= '<h3>'.INS_ENVOYER_MAIL.'</h3>'."\n";
|
|
|
275 |
$res .= '<p style="text-align:right;">'.INS_SUJET.' : <input style="border:1px solid #000;width:450px;" type="text" name="titre_mail"><br />'."\n".
|
|
|
276 |
INS_MESSAGE.' : <textarea style="border:1px solid #000;width:450px;" name="corps" rows="5" cols="60"></textarea></p>'."\n".
|
|
|
277 |
'<p style="width:100px;margin:4px auto;text-align:center;"><input type="submit" value="'.INS_ENVOYER.'" /></p>'."\n".
|
| 814 |
alexandre_ |
278 |
'<input type="hidden" name="fin" value="true" /><input type="hidden" name="mailer" value="1" />'.
|
| 810 |
florian |
279 |
'</form>'."\n";
|
|
|
280 |
} else {
|
|
|
281 |
if ($affiche_form_mail) $res .='<br /><p class="zone_info">'.INS_PAS_IDENTIFIE.'</p>'."\n";
|
|
|
282 |
}
|
|
|
283 |
return $res ;
|
|
|
284 |
}
|
|
|
285 |
|
|
|
286 |
|
|
|
287 |
|
|
|
288 |
/** envoie_mail_depuis_annuaire()
|
|
|
289 |
*
|
|
|
290 |
*
|
|
|
291 |
* @return envoie l'email
|
|
|
292 |
*/
|
|
|
293 |
|
|
|
294 |
function envoie_mail_depuis_annuaire() {
|
|
|
295 |
$requete = "select ".INS_CHAMPS_MAIL." from ".INS_ANNUAIRE.
|
|
|
296 |
" where ".INS_CHAMPS_ID."='".$GLOBALS['AUTH']->getAuthData (INS_CHAMPS_ID)."'";
|
|
|
297 |
$resultat = $GLOBALS['ins_db']->query($requete);
|
|
|
298 |
if (DB::isError($resultat)) {
|
|
|
299 |
die ($resultat->getMessage().'<br />'.$resultat->getDebugInfo());
|
|
|
300 |
}
|
|
|
301 |
$ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC);
|
|
|
302 |
$entete = "From: <".$ligne[INS_CHAMPS_MAIL].">\n";
|
|
|
303 |
|
|
|
304 |
$_POST['corps'] .= ANN_PIED_MESSAGE;
|
|
|
305 |
$_POST['corps'] = stripslashes($_POST['corps']) ;
|
|
|
306 |
$liste = "" ;
|
|
|
307 |
$liste_numero = implode (',', $_POST['select']) ;
|
|
|
308 |
$requete_liste_mail = 'select '.INS_CHAMPS_MAIL.' from '.INS_ANNUAIRE.' where '.INS_CHAMPS_ID.
|
|
|
309 |
' in ('.$liste_numero.')' ;
|
|
|
310 |
$resultat_liste_mail = $GLOBALS['ins_db']->query($requete_liste_mail);
|
|
|
311 |
|
|
|
312 |
while ($ligne_liste_mail = $resultat_liste_mail->fetchRow(DB_FETCHMODE_ASSOC)) {
|
|
|
313 |
mail ($ligne_liste_mail[INS_CHAMPS_MAIL], stripslashes($_POST['titre_mail']), $_POST['corps'] , $entete) ;
|
|
|
314 |
$liste .= $ligne_liste_mail[INS_CHAMPS_MAIL]."\n" ;
|
|
|
315 |
}
|
|
|
316 |
|
|
|
317 |
$_POST['corps'] .= "\n----------------------------------------------------------------------------";
|
|
|
318 |
$_POST['corps'] .= "\n".ANN_MESSAGE_ENVOYE_A." :\n $liste" ;
|
|
|
319 |
|
|
|
320 |
mail (INS_MAIL_ADMIN_APRES_INSCRIPTION, stripslashes($_POST['titre_mail']), $_POST['corps'], $entete);
|
|
|
321 |
$_POST['corps'] = '';
|
|
|
322 |
$_POST['titre_mail'] = '';
|
|
|
323 |
return '<div>'.ANN_MAIL_ENVOYER.'</div>' ;
|
|
|
324 |
}
|
|
|
325 |
|
|
|
326 |
/** function carto_liste_fiches()
|
|
|
327 |
*
|
|
|
328 |
*
|
|
|
329 |
* @return string HTML
|
|
|
330 |
*/
|
|
|
331 |
function carto_liste_fiches(&$monde, $nom_table1, $nom_table2, $nom_champs_pays, $nom_champs_cp, $requete_sql) {
|
|
|
332 |
|
|
|
333 |
global $mailer;
|
|
|
334 |
global $select;//utilisé dans liste_inscrit.php
|
|
|
335 |
|
|
|
336 |
$javascript = "
|
|
|
337 |
function confirmer () {
|
|
|
338 |
if (window.confirm ('Cliquez sur OK pour confirmer.')) {
|
|
|
339 |
window.formmail.submit();
|
|
|
340 |
}
|
|
|
341 |
}
|
|
|
342 |
|
|
|
343 |
function setCheckboxes(the_form)
|
|
|
344 |
{
|
|
|
345 |
var do_check=document.forms[the_form].elements['selecttotal'].checked;
|
|
|
346 |
var elts = document.forms[the_form].elements['select[]'];
|
|
|
347 |
var elts_cnt = (typeof(elts.length) != 'undefined')
|
|
|
348 |
? elts.length
|
|
|
349 |
: 0;
|
|
|
350 |
if (elts_cnt) {
|
|
|
351 |
for (var i = 0; i < elts_cnt; i++) {
|
|
|
352 |
elts[i].checked = do_check;
|
|
|
353 |
} // Fin for
|
|
|
354 |
}
|
|
|
355 |
else {
|
|
|
356 |
elts.checked = do_check;
|
|
|
357 |
} // Fin if... else
|
|
|
358 |
return true;
|
|
|
359 |
} // Fin de la fonction 'setCheckboxes()'
|
|
|
360 |
|
|
|
361 |
";
|
|
|
362 |
GEN_stockerCodeScript($javascript);
|
|
|
363 |
|
|
|
364 |
$res = '';
|
|
|
365 |
$tabmonde = explode ('*',$monde->historique);
|
|
|
366 |
|
|
|
367 |
// Premier cas, on vient de cliquer sur un pays qui n'est pas
|
|
|
368 |
// la France, on affiche les adhérents de ce pays
|
|
|
369 |
if (count($tabmonde) == 3) {
|
|
|
370 |
$argument = $tabmonde[2];
|
|
|
371 |
$query = 'SELECT * FROM carto_PAYS WHERE CP_ID_pays="'.$argument.'"';
|
|
|
372 |
$result = $GLOBALS['ins_db']->query($query);
|
|
|
373 |
if (DB::isError($result)) {
|
|
|
374 |
die ($result->getMessage().'<br />'.$result->getDebugInfo()) ;
|
|
|
375 |
}
|
|
|
376 |
$row = $result->fetchRow(DB_FETCHMODE_OBJECT) ;
|
|
|
377 |
$pays = $row->CP_Intitule_pays;
|
|
|
378 |
$monde->nom = $monde->nom.'*'.$pays;
|
|
|
379 |
$tabonglet = explode ('*', $monde->historique);
|
|
|
380 |
$tabnom = explode ('*', $monde->nom);
|
|
|
381 |
$res .='<br /><strong>'.INS_RETOUR_A_LA_CARTE."\n";
|
|
|
382 |
foreach ($tabonglet as $key => $value) {
|
|
|
383 |
if ($key == 0) {
|
|
|
384 |
$chemin = $value;
|
|
|
385 |
$value = 'monde';
|
|
|
386 |
$res .= "<a class=\"chemin_carto\" href=\"".$monde->url."&historique_cartes=$chemin\"> > ".$tabnom[$key]."</a>";
|
|
|
387 |
} else if ($key == (count($tabonglet)-1)) {
|
|
|
388 |
$res .= "<a class=\"chemin_carto\"> > $pays</a>";
|
|
|
389 |
} else {
|
|
|
390 |
$chemin .= '*'.$value;
|
|
|
391 |
$res .= "<a class=\"chemin_carto\" href=\"".$monde->url."&historique_cartes=$chemin\"> > ".$tabnom[$key]."</a>";
|
|
|
392 |
}
|
|
|
393 |
}
|
|
|
394 |
$res .= '</strong>'."\n";
|
|
|
395 |
$capitale = $row->CP_Intitule_capitale;
|
|
|
396 |
$query2 = ' SELECT count('.$nom_champs_cp.') as nbr'.
|
|
|
397 |
' FROM '.$nom_table1;
|
|
|
398 |
if ($nom_table2!=0) $query2 .= ', '.$nom_table2;
|
|
|
399 |
$query2 .= ' WHERE '.$nom_champs_pays.'="'.$argument.'"';
|
|
|
400 |
if ($requete_sql!='') $query2 .= ' AND ('.$requete_sql.')';
|
|
|
401 |
|
|
|
402 |
$result2 = $GLOBALS['ins_db']->query($query2);
|
|
|
403 |
if (DB::isError($result2)) {
|
|
|
404 |
die ($result2->getMessage().'<br />'.$result2->getDebugInfo()) ;
|
|
|
405 |
}
|
|
|
406 |
$row2 = $result2->fetchRow(DB_FETCHMODE_OBJECT) ;
|
|
|
407 |
$res .= '<br /><br /><div class="info_pays">'.$pays.' (capitale: '.$capitale.') : ' ;
|
|
|
408 |
if ($row2->nbr == 0) {
|
|
|
409 |
$res .= INS_AUCUN_INSCRIT.' '.INS_LABEL_PROJET ;
|
|
|
410 |
|
|
|
411 |
}
|
|
|
412 |
else if ($row2->nbr == 1) {
|
|
|
413 |
$res .= $row2->nbr.' '.INS_INSCRIT.' '.INS_LABEL_PROJET ;
|
|
|
414 |
}
|
|
|
415 |
else {
|
|
|
416 |
$res .= $row2->nbr.' '.INS_INSCRIT.'s '.INS_LABEL_PROJET ;
|
|
|
417 |
}
|
|
|
418 |
$res .= "</div>\n";
|
|
|
419 |
if ($row2->nbr>0) {
|
|
|
420 |
if ((INS_NECESSITE_LOGIN)and(!$GLOBALS['AUTH']->getAuth())) {
|
|
|
421 |
$res .= '<br /><p class="zone_alert">'.INS_VOUS_DEVEZ_ETRE_INSCRIT.'</p>'."\n" ;
|
|
|
422 |
}
|
|
|
423 |
else {
|
|
|
424 |
$requete = 'SELECT '.INS_CHAMPS_ID.', '.INS_CHAMPS_NOM.', '.INS_CHAMPS_PRENOM.', '.INS_CHAMPS_VILLE.', '.INS_CHAMPS_CODE_POSTAL.' FROM '.$nom_table1;
|
|
|
425 |
if ($nom_table2!=0) $requete .= ', '.$nom_table2;
|
|
|
426 |
$requete .= ' WHERE '.$nom_champs_pays.'="'.$argument.'"';
|
|
|
427 |
if ($requete_sql!='') $requete .= ' AND ('.$requete_sql.')';
|
|
|
428 |
$requete .= ' ORDER BY '.INS_CHAMPS_NOM.', '.INS_CHAMPS_PRENOM;
|
|
|
429 |
$resultat = $GLOBALS['ins_db']->query($requete);
|
|
|
430 |
$i=0;
|
|
|
431 |
while ($ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC)) {
|
|
|
432 |
$donnees_membres[$i++]=$ligne;
|
|
|
433 |
}
|
| 811 |
florian |
434 |
$res .= listes_inscrit($donnees_membres, 1);
|
| 810 |
florian |
435 |
if ($mailer==1) {
|
|
|
436 |
if (!is_array($select)) {
|
|
|
437 |
$res .= "<div>".INS_NO_DESTINATAIRE."</div>";
|
|
|
438 |
}
|
|
|
439 |
else {
|
|
|
440 |
$res .= '<div class="zone_info">'.INS_MESSAGE_ENVOYE.'</div>'."\n" ;
|
|
|
441 |
carto_envoie_mail() ;
|
|
|
442 |
}
|
|
|
443 |
}
|
|
|
444 |
else {
|
|
|
445 |
$res .= carto_texte_cocher() ;
|
|
|
446 |
}
|
|
|
447 |
$res .= carto_formulaire() ;
|
|
|
448 |
}
|
|
|
449 |
}
|
|
|
450 |
|
|
|
451 |
// 2 ème cas, on vient de cliquer sur un département français
|
|
|
452 |
} else if (count($tabmonde) == 4) {
|
|
|
453 |
$argument = $tabmonde[3];
|
|
|
454 |
$query = 'SELECT * FROM '.INS_TABLE_DPT.' WHERE '.INS_CHAMPS_ID_DEPARTEMENT.'='.$argument;
|
|
|
455 |
$result = $GLOBALS['ins_db']->query($query);
|
|
|
456 |
if (DB::isError($result)) {
|
|
|
457 |
die ($result->getMessage() .'<br />'.$result->getDebugInfo());
|
|
|
458 |
}
|
|
|
459 |
$row = $result->fetchRow(DB_FETCHMODE_ASSOC);
|
|
|
460 |
$nom = $row[INS_CHAMPS_NOM_DEPARTEMENT];
|
|
|
461 |
|
|
|
462 |
$query2 = ' SELECT count('.$nom_champs_cp.') as nbr'.
|
|
|
463 |
' FROM '.$nom_table1;
|
|
|
464 |
if ($nom_table2!=0) $query2 .= ', '.$nom_table2;
|
|
|
465 |
$query2 .= ' WHERE '.$nom_champs_cp.' LIKE "'.$argument.'%"'.
|
|
|
466 |
' AND '.$nom_champs_pays.'="FR"';
|
|
|
467 |
if ($requete_sql!='') $query2 .= ' AND ('.$requete_sql.')';
|
|
|
468 |
$result2 = $GLOBALS['ins_db']->query($query2);
|
|
|
469 |
if (DB::isError($result2)) {
|
|
|
470 |
die ($result2->getMessage().'<br />'.$result2->getDebugInfo()) ;
|
|
|
471 |
}
|
|
|
472 |
|
|
|
473 |
$row2 = $result2->fetchRow(DB_FETCHMODE_OBJECT);
|
|
|
474 |
$res .= '<br /><p class="zone_info">'."\n" ;
|
|
|
475 |
if ($row2->nbr == 0) {
|
|
|
476 |
$res .= INS_AUCUN_INSCRIT." ".INS_LABEL_PROJET ;
|
|
|
477 |
}
|
|
|
478 |
else if ($row2->nbr == 1) {
|
|
|
479 |
$res .= $row2->nbr." ".INS_INSCRIT." ".INS_LABEL_PROJET ;
|
|
|
480 |
}
|
|
|
481 |
else {
|
|
|
482 |
$res .= $row2->nbr." ".INS_INSCRIT."s ".INS_LABEL_PROJET ;
|
|
|
483 |
}
|
|
|
484 |
$res .= '</p>'."\n";
|
|
|
485 |
if ($row2->nbr>0) {
|
|
|
486 |
if ((INS_NECESSITE_LOGIN)and(!$GLOBALS['AUTH']->getAuth())) {
|
|
|
487 |
$res .= '<br /><p class="zone_alert">'.INS_VOUS_DEVEZ_ETRE_INSCRIT.'</p>'."\n" ;
|
|
|
488 |
} else {
|
|
|
489 |
$requete = 'SELECT '.INS_CHAMPS_ID.', '.INS_CHAMPS_NOM.', '.INS_CHAMPS_PRENOM.', '.INS_CHAMPS_VILLE.', '.INS_CHAMPS_CODE_POSTAL.' FROM '.$nom_table1;
|
|
|
490 |
if ($nom_table2!=0) $requete .= ', '.$nom_table2;
|
|
|
491 |
|
|
|
492 |
if (strlen($argument)==1) {
|
|
|
493 |
$argument='0'.$argument;
|
|
|
494 |
}
|
|
|
495 |
|
|
|
496 |
$requete .= ' WHERE '.$nom_champs_cp.' LIKE "'.$argument.'%"'.
|
|
|
497 |
' AND '.$nom_champs_pays.'="FR"';
|
|
|
498 |
if ($requete_sql!='') $requete .= ' AND ('.$requete_sql.')';
|
|
|
499 |
$requete .= ' ORDER BY '.INS_CHAMPS_NOM.', '.INS_CHAMPS_PRENOM;
|
|
|
500 |
$resultat = $GLOBALS['ins_db']->query($requete);
|
|
|
501 |
$i=0;
|
|
|
502 |
while ($ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC)) {
|
|
|
503 |
$donnees_membres[$i++]=$ligne;
|
|
|
504 |
}
|
| 811 |
florian |
505 |
$res .= listes_inscrit($donnees_membres, 1);
|
| 810 |
florian |
506 |
|
|
|
507 |
if ($mailer==1) {
|
|
|
508 |
if (!is_array($select)) {
|
|
|
509 |
$res.= INS_NO_DESTINATAIRE;
|
|
|
510 |
} else {
|
|
|
511 |
$res .= '<p class="zone_info">'.INS_MESSAGE_ENVOYE."</p>\n" ;
|
|
|
512 |
carto_envoie_mail() ;
|
|
|
513 |
}
|
|
|
514 |
}
|
|
|
515 |
}
|
|
|
516 |
}
|
|
|
517 |
}
|
|
|
518 |
return $res;
|
|
|
519 |
}
|
|
|
520 |
|
|
|
521 |
|
|
|
522 |
/** function carto_texte_cocher ()
|
|
|
523 |
*
|
|
|
524 |
*
|
|
|
525 |
* @return string HTML
|
|
|
526 |
*/
|
|
|
527 |
function carto_texte_cocher() {
|
|
|
528 |
$res = '<br />'.INS_CHECK_UNCHECK ;
|
|
|
529 |
$res .= ' <input type="checkbox" name="selecttotal" onclick="javascript:setCheckboxes(\'formmail\');" />'."\n";
|
|
|
530 |
return $res ;
|
|
|
531 |
}
|
|
|
532 |
|
|
|
533 |
|
|
|
534 |
/** function carto_formulaire ()
|
|
|
535 |
*
|
|
|
536 |
*
|
|
|
537 |
*
|
|
|
538 |
* @return string HTML
|
|
|
539 |
*/
|
|
|
540 |
function carto_formulaire($titre_mail="", $corps="") {
|
|
|
541 |
$res = '<br /><h2>'.INS_ENVOYER_MAIL.'</h2><br />'."\n".
|
|
|
542 |
INS_SUJET.' :<br /><input class="forml" type="text" name="titre_mail" size="60" value="'.$titre_mail.'" /><br /><br />'."\n".
|
|
|
543 |
INS_MESSAGE.' :<br /><textarea class="forml" name="corps" rows="5" cols="60">'.$corps.'</textarea><br /><br />'."\n".
|
|
|
544 |
'<input class="bouton" type="submit" onclick="javascript:confirmer();" value="'.INS_ENVOYER.'" />'."\n".
|
|
|
545 |
'</form>'."\n";
|
|
|
546 |
return $res ;
|
|
|
547 |
}
|
|
|
548 |
|
|
|
549 |
/** envoie_mail()
|
|
|
550 |
*
|
|
|
551 |
*
|
|
|
552 |
* @return envoie l'email
|
|
|
553 |
*/
|
|
|
554 |
function carto_envoie_mail() {
|
|
|
555 |
$requete = 'SELECT '.INS_CHAMPS_MAIL.' FROM '.INS_ANNUAIRE.' WHERE '.INS_CHAMPS_ID.'='.$GLOBALS['AUTH']->getAuthData(INS_CHAMPS_ID);
|
|
|
556 |
$resultat = $GLOBALS['ins_db']->query($requete);
|
|
|
557 |
if (DB::isError($resultat)) {
|
|
|
558 |
die ($resultat->getMessage().'<br />'.$resultat->getDebugInfo());
|
|
|
559 |
}
|
|
|
560 |
$ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC);
|
| 814 |
alexandre_ |
561 |
|
|
|
562 |
include_once 'Mail.php' ;
|
| 810 |
florian |
563 |
|
| 814 |
alexandre_ |
564 |
$entetes['From'] = $ligne[INS_CHAMPS_MAIL];
|
|
|
565 |
|
|
|
566 |
$objet_mail =& Mail::factory('smtp');
|
|
|
567 |
$entetes['Subject'] = $GLOBALS['titre_mail'];
|
|
|
568 |
$entetes['Date'] = date("m-d-Y H:i") ;
|
| 810 |
florian |
569 |
$GLOBALS['corps'] .= INS_TEXTE_FIN_MAIL;
|
| 814 |
alexandre_ |
570 |
|
| 810 |
florian |
571 |
$liste = "" ;
|
| 814 |
alexandre_ |
572 |
$destinataire = array() ;
|
| 810 |
florian |
573 |
foreach ($GLOBALS['select'] as $key => $value) {
|
| 814 |
alexandre_ |
574 |
$requete = 'select '.INS_CHAMPS_MAIL.' from '.INS_ANNUAIRE.' where '.INS_CHAMPS_ID.'="'.$value.'"';
|
|
|
575 |
$mail = $GLOBALS['ins_db']->getOne($requete) ;
|
|
|
576 |
array_push ($destinataire, $mail) ;
|
|
|
577 |
$liste .= $mail."\n" ;
|
| 810 |
florian |
578 |
}
|
| 814 |
alexandre_ |
579 |
$objet_mail->send($destinataire, $entetes, $GLOBALS['corps']);
|
| 810 |
florian |
580 |
|
| 814 |
alexandre_ |
581 |
$GLOBALS['corps'] .= "
|
|
|
582 |
----------------------------------------------------------------------------".INS_MESSAGE_ENVOYE_A."
|
|
|
583 |
$liste" ;
|
| 810 |
florian |
584 |
|
| 814 |
alexandre_ |
585 |
mail(INS_MAIL_ADMIN, stripslashes(INS_SURVEILLANCE_ENVOI_MAIL.$GLOBALS['titre_mail']), $GLOBALS['corps'], $entetes);
|
| 810 |
florian |
586 |
$GLOBALS['corps'] = '';
|
|
|
587 |
$GLOBALS['titre_mail'] = '';
|
|
|
588 |
}
|
|
|
589 |
//-- Fin du code source ------------------------------------------------------------
|
|
|
590 |
/*
|
|
|
591 |
* $Log$
|
| 814 |
alexandre_ |
592 |
* Revision 1.3 2006/04/10 14:21:51 florian
|
|
|
593 |
* correction bug affichage formulaire de mail en double
|
|
|
594 |
*
|
| 812 |
florian |
595 |
* Revision 1.2 2006/04/10 14:15:10 florian
|
|
|
596 |
* les cases à cocher apparaissent à nouveau
|
|
|
597 |
*
|
| 811 |
florian |
598 |
* Revision 1.1 2006/04/10 14:01:36 florian
|
|
|
599 |
* uniformisation de l'appli bottin: plus qu'un fichier de fonctions
|
| 810 |
florian |
600 |
*
|
| 811 |
florian |
601 |
*
|
| 810 |
florian |
602 |
*/
|
|
|
603 |
?>
|