Subversion Repositories Applications.papyrus

Compare Revisions

Ignore whitespace Rev 813 → Rev 814

/trunk/client/bottin/bibliotheque/bottin.fonct.php
248,7 → 248,10
 
function listes_inscrit(& $donnees_membres, $affiche_form_mail=1) {
$res = '';
if ($GLOBALS['AUTH']->getAuth()&&$affiche_form_mail) {$res .= '<form action="'.$GLOBALS['ins_url']->getURL().'" method="post" name="formmail">'."\n";}
if ($GLOBALS['AUTH']->getAuth()&&$affiche_form_mail) {
$res .= '<form action="'.$GLOBALS['ins_url']->getURL().'" method="post" name="formmail">'."\n";
}
$res .= '<ul>'."\n";
for ($i=0;$i<count($donnees_membres);$i++) {
$id = array_shift($donnees_membres[$i]);
272,6 → 275,7
$res .= '<p style="text-align:right;">'.INS_SUJET.'&nbsp;:&nbsp;<input style="border:1px solid #000;width:450px;" type="text" name="titre_mail"><br />'."\n".
INS_MESSAGE.'&nbsp;:&nbsp;<textarea style="border:1px solid #000;width:450px;" name="corps" rows="5" cols="60"></textarea></p>'."\n".
'<p style="width:100px;margin:4px auto;text-align:center;"><input type="submit" value="'.INS_ENVOYER.'" /></p>'."\n".
'<input type="hidden" name="fin" value="true" /><input type="hidden" name="mailer" value="1" />'.
'</form>'."\n";
} else {
if ($affiche_form_mail) $res .='<br /><p class="zone_info">'.INS_PAS_IDENTIFIE.'</p>'."\n";
554,20 → 558,31
die ($resultat->getMessage().'<br />'.$resultat->getDebugInfo());
}
$ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC);
$entete = "From: <".$ligne[INS_CHAMPS_MAIL].">\n";
 
include_once 'Mail.php' ;
$entetes['From'] = $ligne[INS_CHAMPS_MAIL];
 
$objet_mail =& Mail::factory('smtp');
$entetes['Subject'] = $GLOBALS['titre_mail'];
$entetes['Date'] = date("m-d-Y H:i") ;
$GLOBALS['corps'] .= INS_TEXTE_FIN_MAIL;
$GLOBALS['corps'] = stripslashes($GLOBALS['corps']) ;
$liste = "" ;
$destinataire = array() ;
foreach ($GLOBALS['select'] as $key => $value) {
mail ($value, stripslashes($GLOBALS['titre_mail']), $GLOBALS['corps'] , $entete) ;
$liste .= $value."\n" ;
$requete = 'select '.INS_CHAMPS_MAIL.' from '.INS_ANNUAIRE.' where '.INS_CHAMPS_ID.'="'.$value.'"';
$mail = $GLOBALS['ins_db']->getOne($requete) ;
array_push ($destinataire, $mail) ;
$liste .= $mail."\n" ;
}
$objet_mail->send($destinataire, $entetes, $GLOBALS['corps']);
$GLOBALS['corps'] .= "\n----------------------------------------------------------------------------";
$GLOBALS['corps'] .= "\n".INS_MESSAGE_ENVOYE_A." :\n $liste" ;
$GLOBALS['corps'] .= "
----------------------------------------------------------------------------".INS_MESSAGE_ENVOYE_A."
$liste" ;
mail(INS_MAIL_ADMIN, stripslashes(INS_SURVEILLANCE_ENVOI_MAIL.$GLOBALS['titre_mail']), $GLOBALS['corps'], $entete);
mail(INS_MAIL_ADMIN, stripslashes(INS_SURVEILLANCE_ENVOI_MAIL.$GLOBALS['titre_mail']), $GLOBALS['corps'], $entetes);
$GLOBALS['corps'] = '';
$GLOBALS['titre_mail'] = '';
}
574,6 → 589,9
//-- Fin du code source ------------------------------------------------------------
/*
* $Log$
* Revision 1.3 2006/04/10 14:21:51 florian
* correction bug affichage formulaire de mail en double
*
* Revision 1.2 2006/04/10 14:15:10 florian
* les cases à cocher apparaissent à nouveau
*