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

Ceci est une ARCHIVE, peut-être périmée. Vérifiez bien les compatibilités !

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... » 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.

Discussion

32 discussions

Ajouter un commentaire

Avant de faire part d’un problème sur un plugin X, merci de lire ce qui suit :

  • Désactiver tous les plugins que vous ne voulez pas tester afin de vous assurer que le bug vient bien du plugin X. Cela vous évitera d’écrire sur le forum d’une contribution qui n’est finalement pas en cause.
  • Cherchez et notez les numéros de version de tout ce qui est en place au moment du test :
    • version de SPIP, en bas de la partie privée
    • version du plugin testé et des éventuels plugins nécessités
    • version de PHP (exec=info en partie privée)
    • version de MySQL / SQLite
  • Si votre problème concerne la partie publique de votre site, donnez une URL où le bug est visible, pour que les gens puissent voir par eux-mêmes.
  • En cas de page blanche, merci d’activer l’affichage des erreurs, et d’indiquer ensuite l’erreur qui apparaît.

Merci d’avance pour les personnes qui vous aideront !

Par ailleurs, n’oubliez pas que les contributeurs et contributrices ont une vie en dehors de SPIP.

Qui êtes-vous ?
[Se connecter]

Pour afficher votre trombine avec votre message, enregistrez-la d’abord sur gravatar.com (gratuit et indolore) et n’oubliez pas d’indiquer votre adresse e-mail ici.

Ajoutez votre commentaire ici

Ce champ accepte les raccourcis SPIP {{gras}} {italique} -*liste [texte->url] <quote> <code> et le code HTML <q> <del> <ins>. Pour créer des paragraphes, laissez simplement des lignes vides.

Ajouter un document

Suivre les commentaires : RSS 2.0 | Atom