View file wapp_antifront.com/forum/tem.php

<?
include '../config.php';
Error_Reporting(E_ALL & ~E_NOTICE);          /////////////// игнорируем ошибки
header("Content-type:text/vnd.wap.wml;charset=utf-8");      //////// тип и кодировка документа
//////////////////////////////////////////////////////////////////////////
$gl="$homepage";                                               /////////// ссылка на главную
$zag="&#x0424;&#x043E;&#x0440;&#x0443;&#x043C;";               /////////// Загаловок
//////////////////////////////////////////////////////////////////////////
print "<?xml version=\"1.0\" encoding=\"utf-8\"?>
        <!DOCTYPE wml PUBLIC \"-//WAPFORUM//DTD WML 1.2//EN\" \"http://www.wapforum.org/DTD/wml12.dtd\">
        <wml><card id=\"mas\" title=\"$zag\"><p>";
                                                        ///////////// выводим вмл заголовок

$mes = @implode("",@file("rek/$razd=$prazd.tem"));     ///// открываем счетчик с количеством тем

if ($ntem=="") {$ntem=$mes;}
$nf=1;  $st=$ntem;
while($nf <= 7)
   {

        $sort = @implode("",@file("rek/$razd=$prazd=$ntem.sort"));
        if($sort!=""){$sntem=trim($sort);
        $text = @file("rek/$razd=$prazd=$sntem.kt");       /////////// выводим ссылки на деректории
        $test=$text;
        $udata = explode(":||:",$text[0]);
        $tem= trim($udata[1]);
        $naz= trim($udata[2]);
        $time= trim($udata[3]);
        $puz= trim($udata[4]);
        if ($test != "")  {
        $nmes = @implode("",@file("rek/$razd=$prazd=$tem.mes"));
        $nmes=trim($nmes);
        print "<a href=\"mes.php?tem=$tem&amp;log=$log&amp;par=$par&amp;razd=$razd&amp;prazd=$prazd\">$naz</a> <small>[$time]</small> $puz ($nmes)<br/>";
        $nf=$nf+1;}}
        $ntem=$ntem-1;
        if ($ntem<0) {$nf=8;}
};

if($ntem>0) {print"<a href=\"tem.php?razd=$razd&amp;prazd=$prazd&amp;ntem=$ntem&amp;log=$log&amp;par=$par\">&#x0414;&#x0430;&#x043B;&#x0435;&#x0435;</a><br/>";}

$privat = @implode("",@file("profil/$log.shp"));
$privat=trim($privat);
print"<br/><a href=\"ntem.php?razd=$razd&amp;prazd=$prazd&amp;log=$log&amp;par=$par\">&#x041D;&#x0430;&#x0447;&#x0430;&#x0442;&#x044C; &#x043D;&#x043E;&#x0432;&#x0443;&#x044E; &#x0442;&#x0435;&#x043C;&#x0443;</a>";


print "<br/>__________<br/>";
if($log!="") {print"<a href=\"profil.php?mest=tem&amp;razd=$razd&amp;prazd=$prazd&amp;log=$log&amp;par=$par\">[$log]</a>    <a href=\"privat.php?mest=tem&amp;razd=$razd&amp;prazd=$prazd&amp;tem=$tem&amp;log=$log&amp;par=$par\">[$privat]</a>";} else {print"<a href=\"vxod.php?mest=tem&amp;razd=$razd&amp;prazd=$prazd&amp;tem=$tem\">[&#x0412;&#x043E;&#x0439;&#x0442;&#x0438;]</a>";}
print"<br/>__________<br/><a href=\"prazd.php?log=$log&amp;par=$par&amp;razd=$razd\">&#x041A; &#x0440;&#x0430;&#x0437;&#x0434;&#x0435;&#x043B;&#x0430;&#x043C;</a><br/><a href=\"$gl\">&#x041D;&#x0430; &#x0433;&#x043B;&#x0430;&#x0432;&#x043D;&#x0443;&#x044E;</a><br/>";


print "</p></card></wml>";

?>