//Autres auteurs : *@author Aucun *@copyright Tela-Botanica 2000-2004 *@version $Revision: 1.2 $ // +------------------------------------------------------------------------------------------------------+ */ // +------------------------------------------------------------------------------------------------------+ // | ENTETE du PROGRAMME | // +------------------------------------------------------------------------------------------------------+ 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"; $res = "

Envoi d'un mail à tous les membres

\n" ; if ($_GET['action'] == ANN_MAIL_TOUS_ENVOIE) $res .= envoie_mail_selection() ; // formulaire $res .= "
\n" ; $res .= "\n" ; $res .= ''."\n" ; $res .= "
" ; $res .= "Objet : 
Corps : 
query($requete) ; while ($ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC)) { if (!mail($ligne[INS_CHAMPS_MAIL], $headers['Subject'], $corps, "From: ".$headers['From'])) { return "
Une erreur s'est produite:
".$mail_object->getMessage()."
\n" ; } } return "
Le mail est parti !
\n"; } /* +--Fin du code ----------------------------------------------------------------------------------------+ * * $Log: not supported by cvs2svn $ * +-- Fin du code ----------------------------------------------------------------------------------------+ */ ?>