Размер файла: 2.12Kb
<?
include 'dan.php';
/*
by Dionisij (c) 2006
[email protected]
Скрипт не предназначен для продажи!
При распространении необходимо обговорить условия распространения с автором скрипта.
Нарушение авторских прав преследуется по закону и по понятиям!
*/
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&pas=$pas&login=$login&r=$n\">(mod)</a></small> ";}
print"<a href=\"forum.php?ver=$ver&pas=$pas&login=$login&r=$n\">$rname</a> (тем: $koltem)<br/>";}
$n++;}
if($login==$admin){print"<br/><a href=\"nrazdel.php?ver=$ver&pas=$pas&login=$login\">[Создать новый раздел]</a> <br/>";}
print"</p><p align=\"center\">";
if($ver=="html"){print"<table style=\"text-align: center; width: 98%;\"
border=\"1\" cellpadding=\"2\" cellspacing=\"2\">
<tbody>
<tr>
<td
style=\"background-color: rgb($color2);\" align=\"center\"
valign=\"top\">";}
if($login=="") { print"<a href=\"vxod.php?ver=$ver\">Вход</a><br/>";}
else {print"<a href=\"opc.php?ver=$ver&pas=$pas&login=$login\">[$login]</a><br/>";}
print"<a href=\"index.php?ver=$ver&pas=$pas&login=$login\">К новым сообщениям</a> <br/>";
if($ver=="wml"){print"<a href=\"razdely.php?ver=html&pas=$pas&login=$login\">wap 2.0</a><br/>";}
else{print"<a href=\"razdely.php?ver=wml&pas=$pas&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>";}
?>