<?php
// ------------------------------------------------------------------------- //
// Affiche les n dernières discussions de Phorum. //
// ------------------------------------------------------------------------- //
// Auteur: J-Pierre DEZELUS //
// Email: jpdezelus@phpinfo.net //
// Web: http://www.phpinfo.net/ //
// ------------------------------------------------------------------------- //
$cfgHote = "localhost";
$cfgUser = "user";
$cfgPass = "password";
$cfgBase = "base";
$cfgTable = "messages";
$cfgRep = "phorum/";
$cfgRead = "read.php3";
$nbMsgForum = 10; // Nbre de discussions à afficher
// connexion à la base
mysql_connect($cfgHote, $cfgUser, $cfgPass);
echo "Les ".$nbMsgForum." dernières discussions - ";
// Nb msg aujourd'hui
$sql = "SELECT COUNT(id) ";
$sql .= "FROM ".$cfgTable." ";
$sql .= "WHERE approved = 'Y' AND datestamp LIKE '".date("Y-m-d")."%'";
$resultat = mysql_db_query($cfgBase, $sql);
$enr = mysql_fetch_array($resultat);
echo "<B>".($nb = $enr[0])."</B> message".($nb > 1 ? "s" : "");
echo " posté".($nb > 1 ? "s" : "")." aujourd'hui";
// Nb msg hier
$date = date("d/m/Y");
$elts = explode("/", $date);
$hier = mktime(0, 0, 0, $elts[1], $elts[0]-1, $elts[2]);
$sql = "SELECT COUNT(id) ";
$sql .= "FROM ".$cfgTable." ";
$sql .= "WHERE approved = 'Y' AND datestamp LIKE '".date("Y-m-d", $hier)."%'";
$resultat = mysql_db_query($cfgBase, $sql);
$enr = mysql_fetch_array($resultat);
echo " [<B>".$enr[0]."</B> hier]";
echo "<BR><BR>\n";
// Affichage des fils de discussion et du nombre de réponses
$sql = "SELECT id,subject,datestamp ";
$sql .= "FROM ".$cfgTable." ";
$sql .= "WHERE approved = 'Y' AND parent = 0 ";
$sql .= "ORDER BY id DESC LIMIT 0,".$nbMsgForum;
$resultat = mysql_db_query($cfgBase, $sql);
while ($message = mysql_fetch_array($resultat)) {
$sql2 = "SELECT count(*) ";
$sql2 .= "FROM ".$cfgTable." ";
$sql2 .= "WHERE approved = 'Y' AND thread=".$message[0]." AND parent <> 0";
$resultat2 = mysql_db_query($cfgBase, $sql2);
$nbRep = mysql_fetch_array($resultat2);
echo " - ";
$date = substr($message[2], 8, 2) . "/";
$date .= substr($message[2], 5, 2) . " ";
$date .= substr($message[2], 11, 5);
echo "[<B>".$date."</B>] ";
if (strlen($message[1]) > 40)
$msg = substr($message[1], 0, 40)." ...";
else
$msg = $message[1];
$lien = $cfgRep.$cfgRead."?f=1&loc=0&i=".$message[0]."&t=".$message[0];
echo "<A HREF='".$lien."' TARGET='_self'>".$msg."</A>";
// nb de réponses
if ($nbRep[0] > 0) echo " [".$nbRep[0]."]";
echo "<BR>\n";
}
?>