Subversion Repositories Sites.tela-botanica.org

Rev

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

Rev 493 Rev 507
Line 212... Line 212...
212 
		$resultat = $GLOBALS['ins_db']->query($requete) ;
 212 
		$resultat = $GLOBALS['ins_db']->query($requete) ;
213 
		if (DB::isError ($resultat)) {
 213 
		if (DB::isError ($resultat)) {
214 
			die ('Echec de la requete : '.$requete.'<br />'.$resultat->getMessage()) ;
 214 
			die ('Echec de la requete : '.$requete.'<br />'.$resultat->getMessage()) ;
215 
		}
 215 
		}
216 
	}
 216 
	}
- 
 
 217
- 
 
 218 
	// si la case pour recevoir la lettre d'actualité est cochée
- 
 
 219 
	if(isset($valeur['lettre']))
- 
 
 220 
	{
- 
 
 221 
		$ajout_abo = file_get_contents(URL_LISTE_ACTU.'ajout_abonne.php?domaine=tela-botanica.org&liste=actu&mail='.$valeur['email']) ;
- 
 
 222 
	}
217 
}
 223 
}
Line 218... Line 224...
218 
 
 224 
 
219 
/**
 225 
/**
220 
 *  Effectue une mise à jour dans la base de donnée
 226 
 *  Effectue une mise à jour dans la base de donnée
221 
 *
 227 
 *
222 
 * @global  AUTH	un objet PEAR:Auth
 228 
 * @global  AUTH	un objet PEAR:Auth
223 
 * @global  ins_db  un objet PEAR::DB
 229 
 * @global  ins_db  un objet PEAR::DB
224 
 * @return
 230 
 * @return
225 
 */
 231 
 */
- 
 
 232 
function mise_a_jour($valeur) {
- 
 
 233
- 
 
 234 
	// ===================Changement de mail ===================
- 
 
 235 
	if($GLOBALS['AUTH']->getUsername() != $valeur['email'])
- 
 
 236 
	{
- 
 
 237 
		// dans tous les cas on désinscrit la personne de la lettre d'actualité
- 
 
 238 
		$supp_abo = file_get_contents(URL_LISTE_ACTU.'suppression_abonne.php?domaine=tela-botanica.org&amp;liste=actu&amp;mail='.$GLOBALS['AUTH']->getUsername()) ;
- 
 
 239
- 
 
 240 
		// si la case pour recevoir la lettre d'actualité est cochée
- 
 
 241 
		if(isset($valeur['lettre']))
- 
 
 242 
		{
- 
 
 243 
			$ajout_abo = file_get_contents(URL_LISTE_ACTU.'ajout_abonne.php?domaine=tela-botanica.org&amp;liste=actu&amp;mail='.$valeur['email']) ;
- 
 
 244 
		}
- 
 
 245 
	}
226 
function mise_a_jour($valeur) {
 246
227 
	// ====================Mise à jour dans l'annuaire ====================
 247 
	// ====================Mise à jour dans l'annuaire ====================
228 
	$requete = 	'UPDATE '.INS_ANNUAIRE.' '.
 248 
	$requete = 	'UPDATE '.INS_ANNUAIRE.' '.
229 
				'SET '.requete_annuaire($valeur).' '.
 249 
				'SET '.requete_annuaire($valeur).' '.
230 
				'WHERE '.INS_CHAMPS_ID.' = "'.$GLOBALS['AUTH']->getAuthData(INS_CHAMPS_ID).'"';
 250 
				'WHERE '.INS_CHAMPS_ID.' = "'.$GLOBALS['AUTH']->getAuthData(INS_CHAMPS_ID).'"';
231 
	$resultat = $GLOBALS['ins_db']->query($requete) ;
 251 
	$resultat = $GLOBALS['ins_db']->query($requete) ;
232 
	if (DB::isError($resultat)) {
 252 
	if (DB::isError($resultat)) {
- 
 
 253 
		return ($resultat->getMessage().$resultat->getDebugInfo()) ;
- 
 
 254 
	}
- 
 
 255 
	else
- 
 
 256 
	{
- 
 
 257 
		if($GLOBALS['AUTH']->getUsername() != $valeur['email']) {
- 
 
 258 
			$GLOBALS['AUTH']->setAuth($valeur['email']) ;
233 
		die ($resultat->getMessage().$resultat->getDebugInfo()) ;
 259 
		}
Line 234... Line 260...
234 
	}
 260 
	}
235
261
236 
	if (isset($valeur['lettre'])) {
 262 
	if (isset($valeur['lettre'])) {
Line 390... Line 416...
390 
    $res .= ligne_inscription (INS_REGION, $ligne[INS_CHAMPS_REGION]) ;
 416 
    $res .= ligne_inscription (INS_REGION, $ligne[INS_CHAMPS_REGION]) ;
391 
    $res .= ligne_inscription (INS_CODE_POSTAL, $ligne[INS_CHAMPS_CODE_POSTAL]) ;
 417 
    $res .= ligne_inscription (INS_CODE_POSTAL, $ligne[INS_CHAMPS_CODE_POSTAL]) ;
392 
    $res .= ligne_inscription (INS_VILLE, $ligne[INS_CHAMPS_VILLE]) ;
 418 
    $res .= ligne_inscription (INS_VILLE, $ligne[INS_CHAMPS_VILLE]) ;
393 
    $res .= ligne_inscription (INS_PAYS, $ligne[INS_CHAMPS_LABEL_PAYS]) ;
 419 
    $res .= ligne_inscription (INS_PAYS, $ligne[INS_CHAMPS_LABEL_PAYS]) ;
394 
    $res .= ligne_inscription (INS_SITE_INTERNET, $ligne[INS_CHAMPS_SITE_WEB]) ;
 420 
    $res .= ligne_inscription (INS_SITE_INTERNET, $ligne[INS_CHAMPS_SITE_WEB]) ;
- 
 
 421 
    if($ligne[INS_CHAMPS_LETTRE]) {
- 
 
 422 
    	$res .= ligne_inscription (INS_LETTRE_INSCRIT, INS_LETTRE_INSCRIT_OUI) ;
- 
 
 423 
    }
- 
 
 424 
    else {
- 
 
 425 
    	$res .= ligne_inscription (INS_LETTRE_INSCRIT, INS_LETTRE_INSCRIT_NON) ;
- 
 
 426 
    }
395 
    $res .= '</dl>' ;
 427 
    $res .= '</dl>' ;
396 
    //$res .= "<div>".INS_NOM_WIKI." : ".$ligne[INS_CHAMPS_LOGIN]."</div>\n" ;
 428 
    //$res .= "<div>".INS_NOM_WIKI." : ".$ligne[INS_CHAMPS_LOGIN]."</div>\n" ;
397 
    $res .= '<h2 class="inscription_titre2">'.INS_ADHERENT.'</h2>' ;
 429 
    $res .= '<h2 class="inscription_titre2">'.INS_ADHERENT.'</h2>' ;
398 
    $res .= '<dl>' ;
 430 
    $res .= '<dl>' ;
399 
    $res .= ligne_inscription (INS_ORGANISME, $ligne['U_TITLE']) ;
 431 
    $res .= ligne_inscription (INS_ORGANISME, $ligne['U_TITLE']) ;
Line 464... Line 496...
464 
	$requete = "select ".INS_CHAMPS_MAIL." from ".INS_ANNUAIRE." where ".INS_CHAMPS_MAIL."= \"$mail\"" ;
 496 
	$requete = "select ".INS_CHAMPS_MAIL." from ".INS_ANNUAIRE." where ".INS_CHAMPS_MAIL."= \"$mail\"" ;
465 
	$resultat = $GLOBALS['ins_db']->query ($requete) ;
 497 
	$resultat = $GLOBALS['ins_db']->query ($requete) ;
466 
	if (DB::isError ($resultat)) {
 498 
	if (DB::isError ($resultat)) {
467 
		die ($resultat->getMessage().'<br />'.$resultat->getDebugInfo()) ;
 499 
		die ($resultat->getMessage().'<br />'.$resultat->getDebugInfo()) ;
468 
	}
 500 
	}
469 
	if ($resultat->numRows() == 0) return true ;
 501 
	if ($resultat->numRows() == 0) {
- 
 
 502 
		 return true ;
- 
 
 503 
	}
- 
 
 504
470 
	return false ;
 505 
	return false ;
471 
}
 506 
}
Line 472... Line 507...
472 
 
 507 
 
473 
function envoie_passe()
 508 
function envoie_passe()