source: spip-zone/_plugins_/envoyer_ami_gouz/balise/envoyerami.php @ 35261

Last change on this file since 35261 was 35261, checked in by sylvain.gougouzian@…, 11 years ago

Spip 2.x :: Envoyer a un ami

  • Property svn:executable set to *
File size: 1.4 KB
Line 
1<?php 
2if (!defined("_ECRIRE_INC_VERSION"))
3    return;
4   
5function balise_ENVOYERAMI($p) {
6        return calculer_balise_dynamique($p, 'ENVOYERAMI', array('url'));
7}
8
9function balise_ENVOYERAMI_stat($args, $filtres) {
10        return array(isset($args[1]) ? $args[1] : $args[0], (isset($args[2]) ? $args[2] : ''));
11}
12
13function balise_ENVOYERAMI_dyn($url) {
14        if (!$url               # pas d'url passee en filtre ou dans le contexte
15        AND !$url = _request('url') # ni d'url passee par l'utilisateur
16        )
17                $url = parametre_url(self(), '', '', '&');
18        if (_request('valider') == 'ok') {
19        // on verifie que tous les champs sont bien renseignes
20                $page = recuperer_fond('page/mail_'. _request('lang'), array(
21                                                                                                                                        'url' => $url, 
22                                                                                                                                        'emetteur' => _request('emetteur_mail'),
23                                                                                                                                        'nom' => _request('emetteur_nom'),
24                                                                                                                                        'destinataire_nom' => _request('destinataire_nom'),
25                                                                                                                                        'message' => nl2br(_request('message')),
26                                                                                                                                )); 
27                include_spip('inc/mail');
28                include_spip('inc/charsets');
29                $charset = $GLOBALS['meta']['charset'];
30                envoyer_mail(_request('destinataire_mail'), 'Recommander à un ami', $page, _request('emetteur_mail'), "Content-Type: text/html; charset=$charset\nMIME-Version: 1.0\n");
31        return array('formulaires/envoyer_ami', 0, array('url'=>$url, 'affiche'=>"non"));
32    } else {
33        return array('formulaires/envoyer_ami', 0, array('url'=>$url));
34    }
35}
36?>
Note: See TracBrowser for help on using the repository browser.