Subversion Repositories Sites.tela-botanica.org

Rev

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

Rev 409 Rev 410
Line 512... Line 512...
512 
	}
 512 
	}
513 
	$ligne  = $resultat->fetchRow(DB_FETCHMODE_ASSOC);
 513 
	$ligne  = $resultat->fetchRow(DB_FETCHMODE_ASSOC);
Line 514... Line 514...
514
514
515 
	$body = INS_MAIL_COORD_CORPS."\n" ;
 515 
	$body = INS_MAIL_COORD_CORPS."\n" ;
516 
	$body .= "------------------------------------------\n";
 516 
	$body .= "------------------------------------------\n";
517 
	$body .= INS_EMAIL.": ".unhtmlentities($ligne[INS_CHAMPS_MAIL])." \n" ;
 517 
	$body .= INS_EMAIL.unhtmlentities($ligne[INS_CHAMPS_MAIL])." \n" ;
518 
	$body .= INS_NOM.": ".unhtmlentities($ligne[INS_CHAMPS_NOM])." \n" ;
 518 
	$body .= INS_NOM.unhtmlentities($ligne[INS_CHAMPS_NOM])." \n" ;
519 
	$body .= unhtmlentities(INS_PRENOM).' : '.unhtmlentities($ligne[INS_CHAMPS_PRENOM])." \n" ;
 519 
	$body .= unhtmlentities(INS_PRENOM).unhtmlentities($ligne[INS_CHAMPS_PRENOM])." \n" ;
520 
	$body .= INS_PAYS." : ".unhtmlentities($ligne[INS_CHAMPS_LABEL_PAYS])." \n" ;
 520 
	$body .= INS_PAYS.unhtmlentities($ligne[INS_CHAMPS_LABEL_PAYS])." \n" ;
521 
	$body .= INS_ADRESSE_1." : ".unhtmlentities($ligne[INS_CHAMPS_ADRESSE_1])." \n" ;
 521 
	$body .= INS_ADRESSE_1.unhtmlentities($ligne[INS_CHAMPS_ADRESSE_1])." \n" ;
522 
	$body .= INS_ADRESSE_2." : ".unhtmlentities($ligne[INS_CHAMPS_ADRESSE_2])." \n" ;
 522 
	$body .= INS_ADRESSE_2.unhtmlentities($ligne[INS_CHAMPS_ADRESSE_2])." \n" ;
523 
	$body .= unhtmlentities(INS_REGION)." : ".unhtmlentities($ligne[INS_CHAMPS_REGION])." \n" ;
 523 
	$body .= unhtmlentities(INS_REGION).unhtmlentities($ligne[INS_CHAMPS_REGION])." \n" ;
524 
	$body .= INS_CODE_POSTAL." : ".unhtmlentities($ligne[INS_CHAMPS_CODE_POSTAL])." \n" ;
 524 
	$body .= INS_CODE_POSTAL.unhtmlentities($ligne[INS_CHAMPS_CODE_POSTAL])." \n" ;
525 
	$body .= INS_VILLE." : ".unhtmlentities($ligne[INS_CHAMPS_VILLE])." \n" ;
 525 
	$body .= INS_VILLE.unhtmlentities($ligne[INS_CHAMPS_VILLE])." \n" ;
526 
	$body .= INS_SITE_INTERNET." : ".unhtmlentities($ligne[INS_CHAMPS_SITE_WEB])." \n" ;
 526 
	$body .= INS_SITE_INTERNET.unhtmlentities($ligne[INS_CHAMPS_SITE_WEB])." \n" ;
527 
    $body .= INS_ORGANISME." : ".unhtmlentities($ligne['U_TITLE'])." \n" ;
 527 
    $body .= INS_ORGANISME.unhtmlentities($ligne['U_TITLE'])." \n" ;
528 
    $body .= INS_FONCTION." : ".unhtmlentities($ligne['U_FONCTION'])." \n" ;
 528 
    $body .= INS_FONCTION.unhtmlentities($ligne['U_FONCTION'])." \n" ;
529 
    $body .= unhtmlentities(INS_ETES_BOTANISTE).unhtmlentities($ligne['LABEL_NIV'])." \n" ;
 529 
    $body .= unhtmlentities(INS_ETES_BOTANISTE).unhtmlentities($ligne['LABEL_NIV'])." \n" ;
530 
    $body .= unhtmlentities(INS_ACTIVITE_PROFESSIONNELLE).unhtmlentities($ligne['LABEL_ACT'])." \n" ;
 530 
    $body .= unhtmlentities(INS_ACTIVITE_PROFESSIONNELLE).unhtmlentities($ligne['LABEL_ACT'])." \n" ;
531 
    $body .= unhtmlentities(INS_MEMBRE_ASSO).unhtmlentities($ligne['LABEL_ASS'])." \n" ;
 531 
    $body .= unhtmlentities(INS_MEMBRE_ASSO).unhtmlentities($ligne['LABEL_ASS'])." \n" ;
532 
    $body .= unhtmlentities(INS_SPECIALISTE).unhtmlentities($ligne['U_SPE'])." \n" ;
 532 
    $body .= unhtmlentities(INS_SPECIALISTE).unhtmlentities($ligne['U_SPE'])." \n" ;
Line 539... Line 539...
539 
		$headers ['Reply-To'] = INS_MAIL_ADMIN_APRES_INSCRIPTION;
 539 
		$headers ['Reply-To'] = INS_MAIL_ADMIN_APRES_INSCRIPTION;
540 
		$headers ['Subject'] = INS_MAIL_COORD_SUJET;
 540 
		$headers ['Subject'] = INS_MAIL_COORD_SUJET;
Line 541... Line 541...
541
541
542 
		$mail =& Mail::factory('mail') ;
 542 
		$mail =& Mail::factory('mail') ;
- 
 
 543 
		$mail->send($ligne[INS_CHAMPS_MAIL], $headers, $body) ;
- 
 
 544 
		// Pour les admins
543 
		$mail->send($ligne[INS_CHAMPS_MAIL], $headers, $body) ;
 545 
		$body .= INS_MESSAGE_APPLI."\n" ;
544 
		foreach ($GLOBALS['mail_admin'] as $administrateur) {
 546 
		foreach ($GLOBALS['mail_admin'] as $administrateur) {
545 
			$envoi = $mail->send($administrateur, $headers, $body) ;
 547 
			$envoi = $mail->send($administrateur, $headers, $body) ;
546 
			if (PEAR::isError($envoi)) {
 548 
			if (PEAR::isError($envoi)) {
547 
				trigger_error($envoi->getMessage(), E_USER_WARNING);
 549 
				trigger_error($envoi->getMessage(), E_USER_WARNING);