Subversion Repositories Applications.papyrus

Compare Revisions

Ignore whitespace Rev 484 → Rev 485

/trunk/client/bottin/bibliotheque/annuaire.fonct.php
19,7 → 19,7
// | License along with this library; if not, write to the Free Software |
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |
// +------------------------------------------------------------------------------------------------------+
// CVS : $Id: annuaire.fonct.php,v 1.1 2005-09-22 14:02:49 ddelon Exp $
// CVS : $Id: annuaire.fonct.php,v 1.2 2005-09-29 16:13:54 alexandre_tb Exp $
/**
* Fonctions du module annuaire
*
31,7 → 31,7
//Autres auteurs :
*@author Aucun
*@copyright Tela-Botanica 2000-2004
*@version $Revision: 1.1 $
*@version $Revision: 1.2 $
// +------------------------------------------------------------------------------------------------------+
*/
 
69,24 → 69,26
// si une lettre est selectionne
if (!empty($_REQUEST['lettre'])) {
$requete = 'SELECT '.INS_CHAMPS_ID;
foreach($GLOBALS['annuaire_champs_visibles']['champs_db'] as $i) {
foreach($GLOBALS['annuaire_champs_visibles']['champs_db'] as $i) {
$requete .= ', '.$i;
}
$requete .= ' FROM '.INS_ANNUAIRE.' WHERE ';
}
$requete .= ' FROM '.INS_ANNUAIRE.' WHERE ';
if ($_REQUEST['lettre'] != 'tous') {
$requete .= INS_CHAMPS_NOM.' LIKE "'.$_REQUEST['lettre'].'%"';
} else {
$requete .= '1';
}
} else {
$requete .= '1';
}
$requete .= ' ORDER BY '.INS_CHAMPS_NOM ;
$resultat = $GLOBALS['ins_db']->query($requete);
if ($resultat->numRows()>0) {
$i=0;
while ($ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC)) {
$donnees_membres[$i++]=$ligne;
$resultat = $GLOBALS['ins_db']->query($requete);
if ($resultat->numRows()>0) {
$i=0;
while ($ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC)) {
$donnees_membres[$i++]=$ligne;
}
$res .= listes_inscrit($donnees_membres, $GLOBALS['annuaire_champs_visibles']['label_champs']);
} else {
$res .= ANN_PAS_D_INSCRITS;
}
$res .= listes_inscrit($donnees_membres, $GLOBALS['annuaire_champs_visibles']['label_champs']);
} else {$res .= ANN_PAS_D_INSCRITS;}
}
return $res ;
}
156,27 → 158,32
*/
 
function envoie_mail_depuis_annuaire() {
$requete = "select ".ANN_CHAMPS_MAIL." from ".ANN_ANNUAIRE.
" where ".ANN_CHAMPS_ID."='".$GLOBALS['AUTH']->getAuthData (ANN_CHAMPS_ID)."'";
$resultat = $GLOBALS['ann_db']->query($requete);
$requete = "select ".INS_CHAMPS_MAIL." from ".INS_ANNUAIRE.
" where ".INS_CHAMPS_ID."='".$GLOBALS['AUTH']->getAuthData (INS_CHAMPS_ID)."'";
$resultat = $GLOBALS['ins_db']->query($requete);
if (DB::isError($resultat)) {
die ($resultat->getMessage().'<br />'.$resultat->getDebugInfo());
}
$ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC);
$entete = "From: <".$ligne[ANN_CHAMPS_MAIL].">\n";
$entete = "From: <".$ligne[INS_CHAMPS_MAIL].">\n";
$_POST['corps'] .= ANN_PIED_MESSAGE;
$_POST['corps'] = stripslashes($_POST['corps']) ;
$liste = "" ;
foreach ($_POST['select'] as $key => $value) {
mail ($value, stripslashes($_POST['titre_mail']), $_POST['corps'] , $entete) ;
$liste .= $value."\n" ;
$liste_numero = implode (',', $_POST['select']) ;
$requete_liste_mail = 'select '.INS_CHAMPS_MAIL.' from '.INS_ANNUAIRE.' where '.INS_CHAMPS_ID.
' in ('.$liste_numero.')' ;
$resultat_liste_mail = $GLOBALS['ins_db']->query($requete_liste_mail);
while ($ligne_liste_mail = $resultat_liste_mail->fetchRow(DB_FETCHMODE_ASSOC)) {
mail ($ligne_liste_mail[INS_CHAMPS_MAIL], stripslashes($_POST['titre_mail']), $_POST['corps'] , $entete) ;
$liste .= $ligne_liste_mail[INS_CHAMPS_MAIL]."\n" ;
}
$_POST['corps'] .= "\n----------------------------------------------------------------------------";
$_POST['corps'] .= "\n".ANN_MESSAGE_ENVOYE_A." :\n $liste" ;
mail (CAR_MAIL_ADMIN, stripslashes($_POST['titre_mail']), $_POST['corps'], $entete);
mail (INS_MAIL_ADMIN_APRES_INSCRIPTION, stripslashes($_POST['titre_mail']), $_POST['corps'], $entete);
$_POST['corps'] = '';
$_POST['titre_mail'] = '';
return '<div>'.ANN_MAIL_ENVOYER.'</div>' ;
185,6 → 192,9
/* +--Fin du code ----------------------------------------------------------------------------------------+
*
* $Log: not supported by cvs2svn $
* Revision 1.1 2005/09/22 14:02:49 ddelon
* nettoyage annuaire et php5
*
* Revision 1.4 2005/09/22 13:30:49 florian
* modifs pour compatibilité XHTML Strict + corrections de bugs (mais ya encore du boulot!!)
*