Subversion Repositories Sites.tela-botanica.org

<?php

/***************************************************************************\

 *  SPIP, Systeme de publication pour l'internet                           *

 *                                                                         *

 *  Copyright (c) 2001-2005                                                *

 *  Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James  *

 *                                                                         *

 *  Ce programme est un logiciel libre distribue sous licence GNU/GPL.     *

 *  Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne.   *

\***************************************************************************/

include ("inc.php3");

include_ecrire ("inc_index.php3");

include_ecrire ("inc_logos.php3");

$query = "SELECT titre, id_rubrique FROM spip_articles WHERE id_article='$id_article'";

$result = spip_query($query);

while($row = spip_fetch_array($result)) {

	$titre = $row["titre"];

	$id_rubrique = $row["id_rubrique"];

}

debut_page($titre, "documents", "articles");

debut_grand_cadre();

afficher_hierarchie($id_rubrique);

fin_grand_cadre();

debut_gauche();

debut_boite_info();

echo "<FONT FACE='Verdana,Arial,Sans,sans-serif' SIZE=2>";

echo "<P align=left>"._T('info_gauche_suivi_forum');

echo aide ("suiviforum");

echo "</FONT>";

fin_boite_info();

debut_droite();

echo "\n<table cellpadding=0 cellspacing=0 border=0 width='100%'>";

echo "<tr width='100%'>";

echo "<td>";

	icone(_T('icone_retour'), "articles.php3?id_article=$id_article", "article-24.gif", "rien.gif");

echo "</td>";

echo "<td>" . http_img_pack('rien.gif', " ", "width='10'") ."</td>\n";

echo "<td width='100%'>";

echo _T('texte_messages_publics');

gros_titre($titre);

echo "</td></tr></table>";

echo "<p>";

// Ne pas donner les cles du forum a des non-admins

if (! ($connect_statut=='0minirezo' AND acces_rubrique($id_rubrique)))

	return;

echo "<div class='serif2'>";

// reglages

if (!$debut) $debut = 0;

$pack = 5;		// nb de forums affiches par page

$enplus = 200;	// intervalle affiche autour du debut

$limitdeb = ($debut > $enplus) ? $debut-$enplus : 0;

$limitnb = $debut + $enplus - $limitdeb;

$query_forum = "SELECT id_forum FROM spip_forum WHERE id_article='$id_article' AND id_parent=0 AND statut IN ('publie', 'off', 'prop') LIMIT $limitdeb, $limitnb";

$result_forum = spip_query($query_forum);

$i = $limitdeb;

if ($i>0)

	echo "<A HREF='articles_forum.php3?id_article=$id_article&page=$page'>0</A> ... | ";

while ($row = spip_fetch_array($result_forum)) {

	// barre de navigation

	if ($i == $pack*floor($i/$pack)) {

		if ($i == $debut)

			echo "<FONT SIZE=3><B>$i</B></FONT>";

		else

			echo "<A HREF='articles_forum.php3?id_article=$id_article&debut=$i&page=$page'>$i</A>";

		echo " | ";

	}

	// elements a controler

	$i ++;

}

echo "<A HREF='articles_forum.php3?id_article=$id_article&debut=$i&page=$page'>...</A>";

echo "</div>";

$mots_cles_forums = lire_meta("mots_cles_forums");

if ($connect_statut == "0minirezo") {

	$query_forum = "SELECT pied.*, max(thread.date_heure) AS date

		FROM spip_forum AS pied, spip_forum AS thread

		WHERE pied.id_article='$id_article'

		AND pied.id_parent=0

		AND pied.statut IN ('publie', 'off', 'prop')

		AND thread.id_thread=pied.id_forum

		GROUP BY id_thread

		ORDER BY date DESC LIMIT $debut, $pack";

	$result_forum = spip_query($query_forum);

	afficher_forum($result_forum, $forum_retour, $id_article);

}

echo "</FONT>";

fin_page();

?>