Subversion Repositories Applications.papyrus

Compare Revisions

Ignore whitespace Rev 1796 → Rev 1797

/branches/livraison_aha/client/bottin/bibliotheque/mail_tous.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: mail_tous.php,v 1.2 2006-01-02 09:51:03 alexandre_tb Exp $
// CVS : $Id: mail_tous.php,v 1.2.6.1 2008-02-08 08:26:52 alexandre_tb Exp $
/**
* Permet d'envoie un mail à une sélection dans l'annuaire
*
30,7 → 30,7
//Autres auteurs :
*@author Aucun
*@copyright Tela-Botanica 2000-2004
*@version $Revision: 1.2 $
*@version $Revision: 1.2.6.1 $
// +------------------------------------------------------------------------------------------------------+
*/
 
40,18 → 40,12
 
function putFrame() {
// configuration
global $objet, $corps, $annuaire_LABEL_STATUT, $SERVER_ADMIN ;
global $action ;
$url = $GLOBALS['ins_url']->getURL() ;
 
// Entete
$corps_debut = "RESEAU TELA BOTANICA - Le ".date("j/m/Y").
"\n\nBonjour,\n"."\n\nCordialement,\n-------------------\n".
"Tela Botanica le réseau des botanistes francophones\n".
"accueil@tela-botanica.org\nhttp://www.tela-botanica.org\n";
$corps_debut = "";
 
$res = "<h1>Envoi d'un mail &agrave; tous les membres</h1>\n" ;
 
58,16 → 52,17
if ($_GET['action'] == ANN_MAIL_TOUS_ENVOIE) $res .= envoie_mail_selection() ;
 
// formulaire
$res .= "<div><form action=\"$url&action=".ANN_MAIL_TOUS_ENVOIE."\" method=\"post\"><table>\n" ;
$res .= "<tr><td>" ;
$res .= "Objet&nbsp;:&nbsp;</td><td><input size=\"91\" name=\"objet\" type=\"text\"></td></tr>\n" ;
$GLOBALS['ins_url']->addQueryString ('action', ANN_MAIL_TOUS_ENVOIE);
$res .= '<div><form action="'.$GLOBALS['ins_url']->getURL().'" method="post"><table>'."\n" ;
$res .= '<tr><td>' ;
$res .= 'Objet&nbsp;:&nbsp;</td><td><input size="91" name="objet" type="text" /></td></tr>'."\n" ;
$res .= '<tr><td>Corps&nbsp;:&nbsp;</td><td><textarea name="corps" cols="90" rows="30">'.
$corps_debut.'</textarea></td></tr>'."\n" ;
$res .= "<tr><td></td><td><input type=\"submit\" value=\"envoyer\"" ;
$res .= '<tr><td></td><td><input type="submit" value="envoyer"' ;
$res .= " onclick=\"javascript:return confirm('Etes-vous sur de vouloir envoyer ce message !!');\"" ;
$res .= "></td></tr>\n" ;
$res .= " /></td></tr>\n" ;
$res .= "</table></form></div>\n" ;
 
$GLOBALS['ins_url']->removeQueryString ('action');
return $res ;
}
 
100,6 → 95,9
/* +--Fin du code ----------------------------------------------------------------------------------------+
*
* $Log: not supported by cvs2svn $
* Revision 1.2 2006/01/02 09:51:03 alexandre_tb
* généralisation du code et intégration au bottin
*
* +-- Fin du code ----------------------------------------------------------------------------------------+
*/
?>