Как вывести на главной странице сайта последние 10-20 объявлений со скрипта доски WR-Board Lite или LUX версии 1.8 и выше?


     При добавлении сообщений и тем на доску объявлений в отдельный файл newmsg.dat записывается информация, которая потом и выводится в разделе - последние объявлений доски. Так как это всего один файл, то можно информацию о последних объявлениях выводить в любом разделе Вашего сайта. Единственный нюанс - нужно указывать относительный путь до папки доски и папки со скином (указывается внутри скрипта).

Ниже приведён код для главной сайта (для скрипта WR-Board версии 1.8 и выше лайт и ЛЮКС). А вот ссылка на загрузку готового файла с кодом ссылка:

<? // КОД для вставки на php-страницу ОДИН УРОВЕНЬ ВЫШЕ для отображения последней 10-20 объявлений доски.
   // Например, доска тут: https://www.wr-script.ru/board/
   // Этот код для вставки на страницу https://www.wr-script.ru

$showten=10; // Сколько объявлений отображать 10 или 20
$datadir="board_LUX_1.9"; // Название папки с доской
$brdskin="skin-liteblue"; // скин доски

// Выводим 10-20 последних объявлений
$shapka20="<TABLE align=center cellPadding=3 cellSpacing=0 width=98%>";
$shapka10="<TABLE align=center cellPadding=3 cellSpacing=0 width=98%>";
if (is_file("$datadir/data/newmsg.dat") and $showten>="1") { // проверяем есть ли такой файл
$linesn = file("$datadir/data/newmsg.dat"); $in=count($linesn);
if ($in > 0) {
$newdat=file("$datadir/data/newmsg.dat");
$in=count($newdat)-1; $iall=$in; $ia=$in+1;
print"<TABLE cellPadding=2 cellSpacing=1 align=center width=98%>";
if ($showten=="20") {print "<TR class=toptable height=18><TD colspan=4 align=center><B>Последние 
$ia объявлений:</B></TD></TR><TR><TD valign=top>$shapka20";}
    else {print "<TR><TD> </td><TD align=center><TABLE align=center cellPadding=3 cellSpacing=0 
    width=468><TR class=toptable height=18><TD colspan=4 align=center><B>Последние $ia объявлений:</B></TD></TR>";}

do {$dtn=explode("|", $newdat[$in]);
$tdt=explode("[ktname]", $dtn[1]);

$url="$datadir/index.php?id=$dtn[10]";
$dtn[5]=substr($dtn[5],0,150); // образаем сообщение до 150 символов
$dtn[5]=str_replace("<br>","\r\n",$dtn[5]);
$dtn[7]=date("H:i",$dtn[7]);
if ($dtn[4]=="П") {$colorsp="#ff3333";} else {$colorsp="#1414CD";}
if (round($iall/2)==($in+1) & $showten>10) {print"</table></td><td width=50% valign=top>$shapka10";}
if ($dtn[9]=="vip") {$st1="<B>"; $st2="VIP-объявление \r\n";} else {$st1=""; $st2="";}
print"
<TR height=20 onmouseover=trtover(this) onmouseout=trtout(this)>
<TD><FONT color=$colorsp><B>$dtn[4]</B></FONT></TD>
<TD>$dtn[6]</TD>
<TD width=100%>$st1<A href='$url' title='$dtn[5] \r\r\n $tdt[0] --> 
$tdt[1] \r\r\n $st2\r\n размещено $dtn[6] г.'>$dtn[3]</A></TD>
<TD><IMG alt='перейти' border=0 src='$datadir/$brdskin/go.gif'></TD>
</TR>";
$in--;
} while($in >"-1");
} print"</table></td></tr></table>";
}

?>

У вас ещё есть вопросы? Заходите ко мне на сайт, в форум: www.wr-script.ru/forum/ - здесь много разных тем о скрипте форума ;-)

Автор - Гаврилов Михаил
Дата - 13 июня 2016 г.
Аренда компрессора с отбойными молотками в пушкино аренда компрессора пушкино.


При перепечатке информации делайте, пожалуйста, ссылку на наш сайт (либо поделиться вконтакте, гугл+ или ретвит статьи). Спасибо!

Источник: www.wr-script.ru©, 2004-2020г.

Делитесь с друзьями в соцсетях. Активные комментаторы получают свежие скрипты и бесплатные доработки от WR-Script.ru!

Вернуться к статьям помощи WEB-мастеру

WR-Счётчик