Просмотр архива Банерная сеть RBAN


<?
include 'dan.php';


include 'ver.php';

$zag="Форумы";
if($ver=="wml"){include 'wapzag.php';} else{include 'webzag.php';}

include'avt.php';

$krazdel=@file("razdel");
$krazdel=trim($krazdel[0]);

$n=0;
while($n<=$krazdel){
$rname=@file("$perfix$n/name");
$rname=trim($rname[0]);
if($rname!=""){
$koltem=0;
$dir = @opendir ("$perfix$n");
  while ( $file = @readdir ($dir)){
if ( $file != "."& $file != ".." & $file!="name"){
$koltem++;
}}
if($login==$admin){print"<small><a href="modrazdel.php?ver=$ver&amp;pas=$pas&amp;login=$login&amp;r=$n">(mod)</a></small> ";}
print"<a href="forum.php?ver=$ver&amp;pas=$pas&amp;login=$login&amp;r=$n">$rname</a> (тем: $koltem)<br/>";}
$n++;}

if($login==$admin){print"<br/><a href="nrazdel.php?ver=$ver&amp;pas=$pas&amp;login=$login">[Создать новый раздел]</a> <br/>";}

print"</p><p align="left">";
if($ver=="html"){print"<table style="text-align: left; width: 98%;"
 border="1" cellpadding="2" cellspacing="2">
  <tbody>
    <tr>
      <td
 style="background-color: rgb($color2);" align="left"
 valign="top">";}
 
if($login=="") { print"<a href="vxod.php?ver=$ver">Вход</a><br/>";}
else {print"<a href="opc.php?ver=$ver&amp;pas=$pas&amp;login=$login">[$login]</a><br/>";}
 
 print"<a href="index.php?ver=$ver&amp;pas=$pas&amp;login=$login">К новым сообщениям</a> <br/>"; 

 if($ver=="wml"){print"<a href="razdely.php?ver=html&amp;pas=$pas&amp;login=$login">wap 2.0</a><br/>";}
 else{print"<a href="razdely.php?ver=wml&amp;pas=$pas&amp;login=$login">wap 1.2</a><br/>";}

  
 print"<a href="$gen_link">На главную</a>";
 if($ver=="html"){print"</td>
    </tr>
  </tbody>
</table>
</body>
</html>
";}
else{print"</p></card></wml>";}



?>