Subversion Repositories Sites.tela-botanica.org

Compare Revisions

Ignore whitespace Rev 3 → Rev 4

/trunk/actu/ecrire/articles_forum.php3
New file
0,0 → 1,130
<?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();
 
?>