<?
require("functionChat.ssp");
$r = GetRandom();
openDB();
$expirelogin = msk_time() - $expirehours*3600;
// более $expirehours часов темы и их ответы не хранятся
// ------------------------ Удаление старых тем
$sqlSel="select num from forum where tonick LIKE 'T#%' and messtime < '$expirelogin'";
// находим старые темы
$result=mysql_query($sqlSel) or die(mysql_error());
$CountT=mysql_num_rows($result);
if ($CountT > 0)
{
while ($row=mysql_fetch_row($result))
{
$num_ = $row[0];
$sqlDel="delete from forum where num='$num_'";
// удаляем тему
mysql_query($sqlDel) or die(mysql_error());
$ReplyName = GetReplyID($num_);
$sqlDel="delete from forum where tonick='$ReplyName'";
// удаляем все сообщения в теме
mysql_query($sqlDel) or die(mysql_error());
}
}
// -------------------------------------------------
//$sqlDel="delete from forum where tonick LIKE 'R#%' and messtype='$ReplyDel' and messtime < '$expirelogin'";
// удаляем старые удалённые сообщения
//$result=mysql_query($sqlDel) or die(mysql_error());
// Ник не может быть пустым
$nn=ReplaceChar($login);
$pass = ReplaceChar($pass);
$result = checkpass($login,$pass,"");
require("headerwml.ssp");
echo "<card id=\"$MagForum\" title=\"".utf(25)."\" newcontext=\"true\">";
echo "<p align=\"center\">";
//echo "<a href=\"forums2.php?login=$login&pass=$pass\">Новый форум "Мир и Религия"</a><br/>\n";
for ($i=0; $i<$firstpage; $i++)
{
$s = "T#".($i+1)."____";
$CountAdvs = CountRec("select count(*) from forum where tonick LIKE '$s' and messtype='$ThemeType'");
echo "<a href=\"subforums.php?login=$login&pass=$pass&lev1=$i\">". win2utf($forum[$i][0])." ($CountAdvs)</a><br/>\n";
}
mysql_close();
echo "</p><p>";
echo "<a href=\"forums2.php?login=$login&pass=$pass\">- ".utf(72)."</a><br/>\n";
echo "<a href=\"http://worldwap.info\">- На главную</a><br/>\n";
echo "</p>"
?>
</card>
</wml>