Envoyer l’article par mail (évolution et suite)

All contributions published for previous SPIP versions

Ce script est une évolution du script de philippe Envoyer à un ami, mais avec une mise en page “à la SPIP”. C’est à dire dans un bloc dépliable.

Ce script, comme son nom l’indique permet d’envoyer l’article à un ami, mais avec une mise en page “à la SPIP”.


Captures d’écran

“Envoyer...” replié
“Envoyer...” replié
“Envoyer...” déplié
“Envoyer...” déplié

Le script

fichier envoyer_par_mail.html

<?

/*
 *   +----------------------------------+
 *    Nom :    Envoyer l'article par mail
 *    Fichier : envoyer_par_mail.html
 *   +----------------------------------+
 *    Date : jeudi 19 juin 2003
 *    Auteur :	Aurélien PIERARD 
 *    aurelien.pierard@sig.premier-ministre.gouv.fr                                      
 *    Modifié le 4/2/2004 par Bionet (corrections)
 *   +-------------------------------------+
 *    Fonctions :
 *     Envoyer l'article par mail avec une mise en en page "à la SPIP"
 *   +-------------------------------------+ 
 *  
 * Pour toute suggestion, remarque, proposition d'ajout
 * reportez-vous au forum de l'article :
 * http://www.uzine.net/spip_contrib/article.php3?id_article=187
*/

Function VerifMail ($Mail)
{
  $Retour = eregi("^[[:alpha:]]{1}[[:alnum:]]*((\.|_|-)[[:alnum:]]+)*@".
                  "[[:alpha:]]{1}[[:alnum:]]*((\.|-)[[:alnum:]]+)*".
                  "(\.[[:alpha:]]{2,})$",
                  $Mail);
  Return $Retour;
}

 if (VerifMail($adresse) && $statut=="ok") { 
	$charset = lire_meta('charset');
	$headers = "From: $from\n".
		"MIME-Version: 1.0\n".
		"Content-Type: text/plain; charset=$charset\n".
		"Content-Transfer-Encoding: 8bit\n$headers";

		echo '<img src="biopics/mail.png" alt="L\'article a été envoyé" />&nbsp;<strong>L\'article a été envoyé</strong>';
		
		// Destinataire
		
		$message = "Ce message a été envoyé par le site [(#NOM_SITE_SPIP|addslashes)]\n\n";
		$message .= "Bonjour,\n\nCette page, extraite du site [(#NOM_SITE_SPIP|addslashes)], vous est recommandée "; 
		$message .= "par ".$nom." - ".$from." \n\n";
		$message .= "Titre de la page : ".$titre."\n";
		$message .= "Adresse de la page : ".$url."\n";
		$message .= "Vous pouvez consulter cette page en cliquant sur le lien ci-dessus.\n";
		$message .= "Merci de votre visite\n\n [(#NOM_SITE_SPIP|addslashes)]";
		$objet = "Une page du site [(#NOM_SITE_SPIP|addslashes)] vous est recommandée par ".$nom." , ".$from." ";
		envoyer_mail($adresse,$objet,$message,"","");
		
		// Expéditeur
		
		$message ="VOICI LE MESSAGE QUI A ETE ENVOYE A : $adresse\n";
		$message .="______________________________________________________________________\n\n\n";
		$message .= "Ce message a été envoyé par le site [(#NOM_SITE_SPIP|addslashes)]\n\n";
		$message .= "Bonjour,\n\nCette page, extraite du site [(#NOM_SITE_SPIP|addslashes)], vous est recommandée "; 
		$message .= "par ".$nom." - ".$from." \n\n";
		$message .= "Titre de la page : ".$titre."\n";
		$message .= "Adresse de la page : ".$url."\n";
		$message .= "Vous pouvez consulter cette page en cliquant sur le lien ci-dessus.\n";
		$message .= "Merci de votre visite\n\n [(#NOM_SITE_SPIP|addslashes)]";
		$objet = "Votre message a bien été envoyé! : [(#NOM_SITE_SPIP|addslashes)]";
		envoyer_mail($from,$objet,$message,"","");
 }
else {
?>


<script LANGUAGE="JavaScript">
function VerifForm(){
	adresse = document.news_form.adresse.value;
	var place = adresse.indexOf("@",1);
	var point = adresse.indexOf(".",place+1);
	from = document.news_form.from.value;
	var place2 = from.indexOf("@",1);
	var point2 = from.indexOf(".",place+1);
	if (((place > -1)&&(adresse.length >2)&&(point > 1)) && (document.news_form.nom.value!="") && ((place2 > -1)&&(from.length >2)&&(point2 > 1)))
		{
		document.news_form.submit();
		}
	else
		{	
			var erreurMsg='';
			if (!((place > -1)&&(adresse.length >2)&&(point > 1)))
				erreurMsg = '- Entrez l\'adresse e-mail du destinataire!\n';
			if (document.news_form.nom.value=="")
				erreurMsg = erreurMsg + '- Entrez votre nom!\n';
			if (!((place2 > -1)&&(from.length >2)&&(point2 > 1)))
				erreurMsg = erreurMsg + '- Entrez votre adresse e-mail!';			
			alert(erreurMsg);
		}
}
</script>
<?
	// inclusion du script de gestion des layers de SPIP
		include 'inc_layer.php3';
		afficher_script_layer();
		
		
		// Titre du bloc
		echo bouton_block_invisible('envoyer_par_mail');
			echo "<a href=\"javascript:swap_couche('$compteur_block', '$spip_lang_rtl');\" title=\"cliquer ici pour déplier le formulaire\">Envoyer l'article à un ami</a>";

		// Bloc invisible
		echo debut_block_invisible('envoyer_par_mail');
			echo "<div style=\"margin-left:14px;\">";
			echo "<form action=\"".$url2."\" method=\"post\" name=\"news_form\">";
			echo "<strong>Destinataire&nbsp; :</strong><br />";
			echo "(entrez l'email du destinataire)";
			echo "<br /><input name=\"adresse\" size=\"20\" value=\"\" /><br />";
			echo "<strong>De la part de&nbsp;</strong><br />";
			echo "(entrez votre nom)";
			echo "<br /><input name=\"nom\" size=\"20\" value=\"\" />";
			echo "<br />(entrez votre email)";
			echo "<br /><input name=\"from\" size=20 value=\"\" />";
			echo "<br />";
			echo "<input type=\"Hidden\" name=\"statut\" value=\"ok\" />";
			echo "<input type=\"button\" onClick=\"VerifForm()\" value=\"Envoyer\" style=\"font-family: Arial; font-size:7.1pt; font-style: normal; font-weight: bold\ />";
			echo "</form>";
			echo "</div>";
			
		// Fin du bloc
		echo fin_block('envoyer_par_mail');
}
?>

Installation

Pour utiliser ce script, vous devez copier ces fichers à la racine de votre site :

  • envoyer_par_mail.html ;
  • envoyer_par_mail.php3 ;
  • inc_layer.php3 ;
  • layer.js.

et le répertoire /biopics/ qui contient les images.

Ces fichiers sont dans l’archive attachée à cet article.


Utilisation du script

Voici les instructions à placer dans vos squelettes “article” pour utiliser ce script

<!-- Envoyer l'article par mail -->
<?
   // Titre de l'article pour générer le corps du mail
   $titre='[(#TITRE|texte_script)]';
   // URL de l'article pour générer le corps du mail
   $url="[(#URL_SITE_SPIP)]/article.php3?id_article=#ID_ARTICLE";
   // URL de l'article pour recharger la page
   $url2="article.php3?id_article=#ID_ARTICLE";
?>
<INCLURE(envoyer_par_mail.php3){adresse=$adresse}{statut=$statut}{url=$url}{url2=$url}{titre=$titre}>

<!--- Partie OPTIONNELLE, c'est ce qui est présenté dans la capture d'écran : imprimer l'article et l'envoyer en PDF - à supprimer - --->

<br><a href="imprimersans.php3?id_article=#ID_ARTICLE&nom_site=[(#NOM_SITE_SPIP|texte_script)]&url_site=[(#URL_SITE_SPIP|texte_script)]" title="afficher une version imprimable de cet article"><img src="biopics/imprimante.png" alt="afficher une version imprimable de cet article" width=16 height=16 class=iconelien border=0 ></a>&nbsp;<a href="imprimersans.php3?id_article=#ID_ARTICLE&nom_site=[(#NOM_SITE_SPIP|texte_script)]&url_site=[(#URL_SITE_SPIP|texte_script)]" title="afficher une version imprimable de cet article">Imprimer l'article</a>

<br><a href="article_pdf.php3?id_article=#ID_ARTICLE" title="générer une version PDF de cet article"><img src="biopics/pdf.png" alt="générer une version PDF de cet article" width=16 height=16 class=iconelien border=0 ></a>&nbsp;<a href="article_pdf.php3?id_article=#ID_ARTICLE" title="générer une version PDF de cet article">Article au format PDF</a>

<!--- Fin de la partie OPTIONNELLE - à supprimer- --->

Cette fonctionnalité est intégrée dans BioSPIP et Bio-squelettes 2.6. Pour constater son fonctionnement vous pouvez visiter n’importe quel site utilisant ces squelettes.

updated on 24 September 2004

Discussion

32 discussions

  • Salut,

    Comment pourrait-on réaliser facilement une interface plus complète qui permette aux visiteurs d’ajouter autant de lignes “destinataires” supplémentaires qu’ils le désirent avant de cliquer ensuite sur envoyer ?

    Y a-t-il un projet de plugin à ce sujet ?

    Tina

    Reply to this message

  • 3
    Olivier

    Bonjour,

    Même problème que Thierry ci dessous. Tout allait sans pb sous SPIP 1.7.2. Ca plante depuis que je suis passé à la version SPIP 1-8pr1. En fait tout ce passe bien jusqu’à l’envoi, où j’ai un message d’erreur (et pas de d’email envoyé) :

    Fatal error: Call to undefined function: envoyer_mail() in /var/alternc/html/i/ipam/liberationafrique/inc-public.php3(20) : eval()’d code on line 48

    Quelqu’un a-t-il une idée ? Merci d’avance.

    • Pour spip 1.8, il faut ajouter une ligne dans le script, avant l’appel de la fonction envoyer_mail()

      include('ecrire/inc_mail.php3');
      envoyer_mail($adresse,$objet,$message,"","");
    • mais après le mail est envoyé trois fois...

    • Bonjour,

      Avec Spip 1.8.
      Effectivement, trois courriels partent :
      -  1 pour l’émetteur qui a confirmation de l’envoi,
      -  2 pour le destinataire : un exemplaire correct et un exemplaire strictement blanc (pas d’objet, pas de corps de message.

      Pour supprimer ce message blanc, il suffit d’appliquer la correction de BoOz ci-dessus en ajoutant la seule ligne
      include('ecrire/inc_mail.php3');
      juste après la ligne
      $url2="article.php3?id_article=#ID_ARTICLE";
      dans le squelette “article” qui utilise ce script.

      Et là, ça fonctionne ;-)

    Reply to this message

  • 2

    Bonjour,

    Ce formulaire est-il abandonné? dommage il est parfait mais il ne fonctionne pas sur spip1.9.2 même en supprimant le php3, mais l’idéal serait que quelqu’un ait la capacité d’en faire un plugin, pourquoi pas!!

    @+
    et merci de la réponse

    • adnane

      Bonjour,
      en fait moyennant deux petites modif, on peut faire marcher ce scripts sur la version 1.9.1

      la première est : dans votre squelette, et ce pour correspondre à la nouvelle manière de spip d’ecrire les balise inclure

      la deuxième est :
      include ’inc/layer.php’; au lieu de include ’inc_layer.php3’; dans envoyer_par_mail.html

      faire attention à virer du fichier envoyer_par_mail.html de tout les commentaire contenant des #.

      Adnane.

    • Gilmar

      Bonjour Adnane,

      Merci pour ces explications mais pourrais-tu préciser ta première modification, elle ne me semble pas très claire.

      Merci :)

      Gilmar

    Reply to this message

  • 1

    Bonjour,

    Un an aprés (presque) le dernier message, je viens sur ce forum car depuis spip a évolué en 1.9.1.

    Mon problème, j’ai téléchargé la version pour spip 1.8.2 et visiblement pas compatible avec la 1.9.1, que dois-je faire, modifier la version téléchargée et je ne sais pas comment faire, ou alors existe-t-il une version compatible avec spip 1.9.1

    merci

    • Bonjour,

      mon message complète celui posté en janvier, je suis sous spip 1.9.2 et je n’arrive pas à utiliser ce script qui est plutôt pas mal d’ailleurs.

      En esperant une mise à jour bientôt...

    Reply to this message

  • ça marche pas sous MAC !! (safari, mozilla, même combat...)

    Fatal error: Cannot redeclare test_layer() in /var/alternc/html/c/couac/inc_layer.php3 on line 33

    Reply to this message

  • 3
    thierry

    salut,
    tout se passe bien jusqu’à l’envoi de mail, le serveur me renvoyant :

    L'article a été envoyé
    Fatal error: Call to undefined function: envoyer_mail() in /domain/inc-public.php3(20) : eval()'d code on line 48

    une idée ?
    merci
    T.

    ps: je suis sur une version 1.8bXX de spip

    Reply to this message

  • 1

    Bonjour et surtout merci aux auteurs de cette contrib.
    Je l’ai utilisé et ça marche sauf que lors de l’ouverture d’un article pour la première fois, le bouton qui permet de dérouler le formulaire d’envoie de l’article à un ami n’apparait pas. Sa zone est bien là mais ce bouton n’apparait pas. Par la suite, il apparait très bien et ne disparait que lorsque je clique à nouveau sur un article pour la première fois.

    merci de m’aider à faire apparaitre ce bouton au premier clic sur un article.
    Aussi je cherche sans trouver le fichier article_pdf.

    Reply to this message

  • 1

    Très bonne contribution. Un petit problème cependant. Le message qui est reçu dans la boite à lettre du destinataire, fait apparaitre dans la colonne expéditeur, l’adresse du destinataire au lieu de l’adresse du véritable expéditeur. A mon avis c’est le script envoyer_mail(...) qui se trouve dans envoyer_par_mail.html qu’il faudra revoir. Malheureusement je ne sais pas où il se trouve. Quelqu’un a t-il une idée ?

    Merci.

    Reply to this message

  • Bonjour à tous,

    Merci pour cette excellente contrib qui s’installe en 5mn clés en mains.
    Je suis sous SPIP 1.7.2 hébergé chez free, elle fonctionne parfaitement.

    Site : Football Club de Croixrault

    Reply to this message

  • Baron Noir

    J’ai installé avec succès cette contribution aussi efficace que pratique. Bravo aux auteurs et aux correcteurs !

    J’ai juste une petite question : peut-on utiliser le script sur les brèves ?

    Reply to this message

Comment on this article

Who are you?
  • [Log in]

To show your avatar with your message, register it first on gravatar.com (free et painless) and don’t forget to indicate your Email addresse here.

Enter your comment here

This form accepts SPIP shortcuts {{bold}} {italic} -*list [text->url] <quote> <code> and HTML code <q> <del> <ins>. To create paragraphs, just leave empty lines.

Add a document

Follow the comments: RSS 2.0 | Atom