Subversion Repositories Sites.tela-botanica.org

Rev

Rev 295 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 295 Rev 372
Line 36... Line 36...
36 
*/
 36 
*/
Line 37... Line 37...
37 
 
 37 
 
38 
// +------------------------------------------------------------------------------------------------------+
 38 
// +------------------------------------------------------------------------------------------------------+
39 
// |                                            ENTETE du PROGRAMME                                       |
 39 
// |                                            ENTETE du PROGRAMME                                       |
- 
 
 40 
// +------------------------------------------------------------------------------------------------------+
- 
 
 41 
include_once dirname(realpath(__FILE__)).'/../papyrus/configuration/pap_config_avancee.inc.php' ;
Line 40... Line 42...
40 
// +------------------------------------------------------------------------------------------------------+
 42 
include_once dirname(realpath(__FILE__)).'/../papyrus/configuration/pap_config.inc.php' ;
41 
 
 43 
 
Line 42... Line 44...
42 
include_once 'Mail.php';
 44 
include_once 'Mail.php';
Line 48... Line 50...
48 
 
 50 
 
49 
//Test pour vérifier que la lettre ne sera pas vide
 51 
//Test pour vérifier que la lettre ne sera pas vide
Line 50... Line 52...
50 
//Connexion a la base d'actu
 52 
//Connexion a la base d'actu
51 
 
 53 
 
52 
// TODO : pas de données de configuration embarquées dans les programmes !!!!
 54 
// TODO : pas de données de configuration embarquées dans les programmes !!!!
Line 53... Line 55...
53 
mysql_connect ("localhost", "telabotap", "mot_de_passe") ;
 55 
mysql_connect(PAP_BDD_SERVEUR, PAP_BDD_UTILISATEUR, PAP_BDD_MOT_DE_PASSE, true) or die('Impossible de se connecter à la base de données : '.mysql_error());
54 
mysql_select_db ("tela_prod_spip_actu") ;
 56 
mysql_select_db('tela_prod_spip_actu');
55 
 
 57 
 
56 
//Recherche d'articles de moins de 7 jours
 58 
//Recherche d'articles de moins de 7 jours
57 
$requete = "select * from `spip_articles` WHERE `date` >= DATE_SUB(CURRENT_DATE, INTERVAL 7 DAY)" ;
 59 
$requete = "select * from `spip_articles` WHERE `date` >= DATE_SUB(CURRENT_DATE, INTERVAL 7 DAY)" ;
58 
$resultat = mysql_query ($requete) or die ("Echec") ;
 60 
$resultat = mysql_query ($requete) or die ("Echec") ;
59 
//Si c'est vide on interrompt le script
 61 
//Si c'est vide on interrompt le script
Line 60... Line 62...
60 
if (mysql_num_rows ($resultat) == 0) {
 62 
if (mysql_num_rows ($resultat) == 0) {
61 
    exit;
 - 
 
62 
    }
 63 
	exit;
63 
 
 64 
}
64 
//Récupération de la date du jour pour l'ajouter dans le sujet du mail
 65 
 
65 
 
 66 
//Récupération de la date du jour pour l'ajouter dans le sujet du mail
66 
$traduction_mois[1] = 'Janvier';
 67 
$traduction_mois[1] = 'Janvier';
Line 91... Line 92...
91 
 
 92 
 
92 
$mois_francais = traduction ($traduction_mois,$date_mois);
 93 
$mois_francais = traduction ($traduction_mois,$date_mois);
93 
//Préparation de la chaine de caractères a intégrer dans le sujet
 94 
//Préparation de la chaine de caractères a intégrer dans le sujet
Line 94... Line 95...
94 
$date_lettre = 'du '.$date_jour.' '.$mois_francais.' '.$date_annee;
 95 
$date_lettre = 'du '.$date_jour.' '.$mois_francais.' '.$date_annee;
Line 95... Line 96...
95 
 
 96 
 
96 
//---------------------------------
 97 
// +------------------------------------------------------------------------------------------------------+
97 
 
 98 
 
Line 117... Line 118...
117 
 
 118 
 
118 
if (PEAR::isError ($mail)) {
 119 
if (PEAR::isError ($mail)) {
119 
    echo 'erreur d\'envoi' ;
 120 
    echo 'erreur d\'envoi' ;
Line 120... Line -...
120 
}
 - 
 
121 
 
 121 
}
122 
 
 122 
 
123 
// +------------------------------------------------------------------------------------------------------+
 123 
// +------------------------------------------------------------------------------------------------------+
124 
// |                                           LISTE de FONCTIONS                                         |
 124 
// |                                           LISTE de FONCTIONS                                         |
Line 139... Line 139...
139 
* Lettre actu format text + html
 139 
* Lettre actu format text + html
140 
*
 140 
*
141 
*
 141 
*
142 
* +-- Fin du code ----------------------------------------------------------------------------------------+
 142 
* +-- Fin du code ----------------------------------------------------------------------------------------+
143 
*/
 143 
*/
144 
 
 - 
 
145 
 
 - 
 
146 
 
 - 
 
147 
?>
 144 
?>
148 

            145