mailator
pour envoyer un paquet de mails personnalisés
<?php /* [[mailator.php]] create personalized emails from a list of email and a list of personnal informations Required: php, sendmail Author: Fred Radeff, radeff@akademia.ch, radeff.red History mercredi 21 mai 2008, 16:38:55 (UTC+0200): FR, created */ $separateur=";"; $from=$_POST['Email']; $ccEmail=$_POST['ccEmail']; $messageTop=$_POST['messageTop']; $messageMid=$_POST['messageMid']; $messageEnd=$_POST['messageEnd']; $txtperso=$_POST['txtperso']; $mailperso=$_POST['mailperso']; //$separateur=$_POST['separateur']; $titreEmail=$_POST['titreEmail']; if($from&&strlen($from)>0&&$messageTop&&strlen($messageTop)>0) { //donnees saisies, on envoie le mal $pieces=explode("$separateur",$txtperso); $piecesmailperso=explode("$separateur",$mailperso); if(count($pieces)!=count($piecesmailperso)) { echo "Problem, the number of lines of both fields is not the same!"; exit; } /* echo nl2br($txtperso); echo "<br>séparateur: "; echo $separateur; echo "<hr>"; //tests echo "nb mél: " .count($pieces) ."<br>"; //test */ $text = ""; for($i=0;$i<count($pieces);$i++){ $login=$pieces[$i]; $to=$piecesmailperso[$i]; $headers ='From: ' .$from ."\r\n"; $headers .='Reply-To: ' .$from ."\r\n"; $headers .='Content-Type: text/plain; charset="iso-8859-1"'.'\r\n'; $headers ='Cc: ' .$ccEmail ."\r\n"; /* //tests $letexte=" $headers to: $to cc: $ccEmail subject: $titreEmail message: $text $messageTop $messageMid$login $messageEnd "; echo "<pre>" .stripslashes($letexte) ."</pre><hr>"; */ $txt=stripslashes($text."\r\n" .$messageTop ."\r\n" .$messageMid.$login."\r\n" .$messageEnd); $couriel=mail($to, $titreEmail , $txt, $headers); // Stoppe pour 0,05 secondes, utile pour pas surcharger le serveur mail usleep(50000); if($couriel) { #echo "The mail has been sent from $from to $to"; echo "The mail to $to has been send"; } else { echo "Il y a eu un problème lors de l'envoi du mail"; } } } else { //rien de saisi, on affiche le formulaire ?> <form method="post"> Votre adresse email : <input name="Email" type="text" value="'fradeff@akademia.ch'"/><br /> adresse email en copie: <input name="ccEmail" type="text" value="copiera@truc.org"/><br /> Le titre de votre email : <input name="titreEmail" type="text" value="Votre compte sur ..."/><br /> Votre message (début): <textarea name="messageTop" cols="50" rows="10"> Bonjour, Pour travailler sur votre ..., rendez-vous sur http://l... Et entrez les informations suivantes: </textarea><br /> Votre message (milieu): <textarea name="messageMid" cols="50" rows="10">nom d'utilisateur: </textarea><br /> Votre message (fin): <textarea name="messageEnd" cols="50" rows="10"> mot de passe: mdp Nous vous recommandons de modifier ce mot de passe Nous restons à votre disposition pour toute information complémentaire Meilleures salutations, ... </textarea><br /> Mettre ici sur les emails des destinataires, séparés par un ;<br> <textarea rows="10" cols="80" name="mailperso"> joe@truc.ch;jane@bli.ch </textarea><br /> Mettre ici sur les informations personnalisées séparées par des ;<br> <textarea rows="10" cols="80" name="txtperso"> joe;jane </textarea><br /> <input type="reset" name="Annuler" /><br /> <input type="submit" name="Envoyer" /> </form> <? } //fin affichage formulaire ?>