4 require 'connect.db.inc.php';
8 $res = XDB
::iterRow("SELECT DATE(a.registration_date), a.hruid, GROUP_CONCAT(DISTINCT r.redirect SEPARATOR ', ')
10 INNER JOIN account_profiles AS ap ON (ap.uid = a.uid AND FIND_IN_SET('owner', ap.perms))
11 INNER JOIN profile_display AS pd ON (ap.pid = pd.pid)
12 LEFT JOIN email_source_account AS s ON (a.uid = s.uid)
13 LEFT JOIN email_redirect_account AS r ON (a.uid = r.uid)
14 WHERE a.registration_date > {?}
17 date("Ymd000000", strtotime('last Monday')));
18 if ($count = $res->total()) {
19 $message .= "$count INSCRIPTIONS CONFIRMÉES CETTE SEMAINE :\n";
20 while (list($date, $hruid, $email, $redirect) = $res->next()) {
21 $message .= "$date, $hruid, $email, $redirect\n";
25 $res = XDB
::iterRow("SELECT r.date, a.hruid, r.email
26 FROM register_pending AS r
27 INNER JOIN accounts AS a ON (a.uid = r.uid)
28 INNER JOIN account_profiles AS ap ON (ap.uid = a.uid AND FIND_IN_SET('owner', ap.perms))
29 INNER JOIN profile_display AS pd ON (ap.pid = pd.pid)
30 WHERE r.hash != 'INSCRIT'
33 if ($count = $res->total()) {
34 $message .= "\n$count INSCRIPTIONS NON CONFIRMÉES :\n";
35 while (list($date, $hruid, $email) = $res->next()) {
36 $message .= "$date, $hruid, $email\n";
40 $res = XDB
::query('SELECT COUNT(DISTINCT uid), COUNT(*)
41 FROM register_marketing');
42 list($a, $b) = $res->fetchOneRow();
43 $message .= "\nINSCRIPTIONS SOLLICITÉES :\n";
44 $message .= " $a utilisateurs\n $b adresses email\n";
48 $mailer = new PlMailer();
49 $mailer->setSubject('Rapport des inscriptions de la semaine');
50 $mailer->setFrom($globals->register
->notif
);
51 $mailer->addTo($globals->register
->notif
);
52 $mailer->setTxtBody($message);
55 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8: