1 | <?php |
---|
2 | /** |
---|
3 | * Plugin Association |
---|
4 | * |
---|
5 | * Copyright (c) 2007 |
---|
6 | * Bernard Blazin & François de Montlivault |
---|
7 | * http://www.plugandspip.com |
---|
8 | * Ce programme est un logiciel libre distribue sous licence GNU/GPL. |
---|
9 | * Pour plus de details voir le fichier COPYING.txt. |
---|
10 | * |
---|
11 | **/ |
---|
12 | include_spip('inc/presentation'); |
---|
13 | function exec_relance(){ |
---|
14 | global $connect_statut, $connect_toutes_rubriques; |
---|
15 | |
---|
16 | debut_page(); |
---|
17 | |
---|
18 | $url_asso = generer_url_ecrire('association'); |
---|
19 | $url_relance = generer_url_ecrire('relance'); |
---|
20 | |
---|
21 | |
---|
22 | include_spip ('inc/navigation'); |
---|
23 | |
---|
24 | debut_cadre_relief( "", false, "", $titre = _T('Relance de cotisations')); |
---|
25 | debut_boite_info(); |
---|
26 | |
---|
27 | print('<p>Nous sommes le '.date('d-m-Y').'</p>'); |
---|
28 | |
---|
29 | //On récupère les données globales |
---|
30 | $sujet=$_POST['sujet']; |
---|
31 | $message=$_POST['message'] ; |
---|
32 | //$message=utf8_decode($_POST['message']) ; |
---|
33 | $statut=$_POST['statut']; |
---|
34 | $email_tab=(isset($_POST["email"])) ? $_POST["email"]:array(); |
---|
35 | $statut_tab=(isset($_POST["statut"])) ? $_POST["statut"]:array(); |
---|
36 | $relance_tab=(isset($_POST["relance"])) ? $_POST["relance"]:array(); |
---|
37 | $count=count ($email_tab); |
---|
38 | $query = "SELECT * FROM spip_asso_profil WHERE id_profil=1"; |
---|
39 | $val = spip_query ($query) ; |
---|
40 | |
---|
41 | while ($data = mysql_fetch_assoc($val)){ |
---|
42 | //On prépare le mail et on envoi! On peut modifier le $headers à sa guise |
---|
43 | $headers .= "From: ".$data['nom']." <".$data['mail'].">\n"; //expéditeur Association |
---|
44 | $headers .= "Reply-To: ".$data['mail']."\n"; // réponse automatique à Association |
---|
45 | $headers .= "X-Mailer: PHP/" . phpversion(); // mailer |
---|
46 | $headers .= "X-Sender: < ".$data['mail'].">\n"; } |
---|
47 | $headers .= "X-Priority: 1\n"; // Message urgent ! |
---|
48 | $headers .= "X-MSMail-Priority: High\n"; // définition de la priorité |
---|
49 | //$headers .= "Return-Path: < webmaster@ >\n"; // En cas d' erreurs |
---|
50 | //$headers .= "Errors-To: < webmaster@ >\n"; // En cas d' erreurs |
---|
51 | //$headers .= "cc: \n"; // envoi en copie à … |
---|
52 | //$headers .= "bcc: \n"; // envoi en copie cachée à … |
---|
53 | //$headers .= "Content-Type: text/html; charset=iso-8859-1\n"; // Type Mime pour un message au format HTML |
---|
54 | |
---|
55 | //On envoit le mail aux destinatairex sélectionnés, on affiche le membre relancé et on change le statut de relance |
---|
56 | |
---|
57 | for ( $i=0 ; $i < $count ; $i++ ) |
---|
58 | { |
---|
59 | $email = $email_tab[$i]; |
---|
60 | $statut = $statut_tab[$i]; |
---|
61 | $relance = $relance_tab[$i]; |
---|
62 | |
---|
63 | if ( isset ( $relance ) ) |
---|
64 | { |
---|
65 | mail($email, $sujet, $message, $headers); |
---|
66 | |
---|
67 | if ($statut=="echu"){ |
---|
68 | $sql = "UPDATE spip_asso_adherents SET statut='relance' WHERE id_adherent = '$relance' "; |
---|
69 | $req = mysql_query($sql) or die('Erreur SQL !<br>'.$sql.'<br>'.mysql_error()); |
---|
70 | } |
---|
71 | } |
---|
72 | } |
---|
73 | |
---|
74 | echo '<div><br><strong>'.$count; |
---|
75 | if ($count=1) |
---|
76 | { echo ' relance effectuée';} |
---|
77 | else |
---|
78 | { echo ' relances effectuées';} |
---|
79 | echo '</strong></div>'; |
---|
80 | |
---|
81 | |
---|
82 | |
---|
83 | |
---|
84 | |
---|
85 | //remettre le champ 0 à 1 et réactualiser la date |
---|
86 | //spip_query("UPDATE spip_adherents SET regle_le='relance',date_jour=NOW() WHERE id_ad=$id"); |
---|
87 | |
---|
88 | |
---|
89 | |
---|
90 | |
---|
91 | fin_boite_info(); |
---|
92 | |
---|
93 | fin_cadre_relief(); |
---|
94 | |
---|
95 | fin_page(); |
---|
96 | } |
---|
97 | ?> |
---|