connetti(); //$mode = $_GET['t']; set_time_limit(5000); if (isset($_GET['lim'])) { $lim = strip_tags($_GET['lim']); if (!filter_var($lim, FILTER_VALIDATE_INT)) ScriviErrore("$lim", "LeggiAdesioni - Parametro lim limite messaggio non numerico"); } else $lim=1200; $tabba = strip_tags($_GET['doc']); // controlli su $tabba if (file_exists("/Commenti/{$tabba}.TTT")) { $fileTTT = parse_ini_file("/Commenti/{$tabba}.TTT", true); $titolof = trim($fileTTT['variabili']['Titolo']); } else ScriviErrore("/Commenti/{$tabba}.TTT", "LeggiAdesioni - file TTT non esistente"); // testata echo "\n"; echo "\n"; echo "\n"; echo "Il Dialogo - Adesioni all'appello : " . htmlspecialchars($titolof) . " \n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "

www.ildialogo.org
\n"; echo "

Adesioni all'appello:
\n"; echo " " . $titolof . "

\n"; $oraaggiorna = date("d/m/Y - H:i:s.", filemtime("/Commenti/$tabba.txt")); echo "

Ultimo aggiornamento: $oraaggiorna

\n"; echo "

Le ultime adesioni sono poste alla fine

\n"; echo "
\n"; echo "
    \n"; $tab = $tabba . "mailinglist"; // tabella lista appello $sqlr = 'SELECT * FROM `' . $dbntat[2] . '` WHERE `NomeFileInteressato`=\'' . $tabba . '\'order by `Data`,`Ora` asc'; $idu = array(); $vetdup = array(); $result = $data->query($sqlr); $n = 0; $kd = 0; $utimadata = '0000-00-00'; if (mysql_num_rows($result) > 0) { // estrazione dei record tramite ciclo while ($row = $data->estrai($result)) { // verifica se l'utente è stato già scritto if (in_array($row->IDutente, $idu)) { $vetdup[] = $row->IDutente . " " . $row->Nome . " " . $row->Cognome . " " . $row->Data . " " . $row->Ora; $kd++; continue; } else { if ($row->Data != $utimadata) { printf("

    Adesioni del: %s

    \n", $row->Data); $utimadata = $row->Data; } $n++; $idu[] = $row->IDutente; $sqlip = "SELECT `Citta` FROM `" . $dbntat[0] . "` WHERE `IdUtente`='" . $row->IDutente . "'"; $resultip = $data->query($sqlip); $rowip = $data->estrai($resultip); $MMMM = $rowip->Citta; $lme = strlen($row->Messaggio); if ($lme != 0) { if ($lme > $lim) $messaggio = substr($row->Messaggio, 0, $lim); else $messaggio=$row->Messaggio; printf("
  1. %s %s, %s, il: %s - %s
    Messaggio : %s
    2. \n", $row->Nome, $row->Cognome, $MMMM, $row->Data, $row->Ora, $messaggio); } else printf("
  2. %s %s, %s, il: %s - %s
    3. \n", $row->Nome, $row->Cognome, $MMMM, $row->Data, $row->Ora); } } printf("
Numero Totale sottoscrittori: %d
\n", $n); flush(); } else { // notifica in assenza di record echo "Per il momento non sono disponibili dati."; } $data->disconnetti(); $d = strip_tags($_GET['dup']); if ($d == 'y') { // stampa i duplicati echo "
\n"; printf("

Sottoscrittori duplicati

\n"); echo "
    \n"; $co = count($vetdup); for ($i = 0; $i < $co; $i++) { printf("
  1. %s
    2. \n", $vetdup[$i]); } printf("
Numero Totale sottoscrittori duplicati: %d
\n", $co); } ?>