Размер файла: 2.7Kb
<?
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';
if($login!="" & $login==$admin){
if($step==2){
$nkpost=trim(htmlspecialchars(stripslashes(str_replace($ztex1, $ztex2, $nkpost))));
$fp=@fopen("$perfix$r/name","w");
@fputs($fp,$nkpost);
@fclose($fp);
@chmod("$perfix$r/name",0777);
print"Сохранено.";
} else {
$shet=@file("razdel");
$shet=$shet[0]+1;
$fp=@fopen("razdel","wb");
@fputs($fp,$shet);
@fclose($fp);
$flag=@mkdir("$perfix$shet", 0777);
if($flag){
@chmod("$perfix$shet",0777);
print"Каталог для нового раздела успешно создан. Для продолжения введите имя нового раздела:<br/>";
if($ver!="wml"){print"<form method=\"post\" action=\"nrazdel.php?ver=$ver&pas=$pas&login=$login&step=2&r=$shet\" name=\"login\">";}
print"
<input name=\"nkpost\" maxlength=\"70\"/> <br/>";
if($ver=="wml"){print"<anchor title=\"ok\">продолжить
<go href=\"nrazdel.php?ver=$ver&pas=$pas&login=$login&step=2&r=$shet\" method=\"post\">
<postfield name=\"nkpost\" value=\"$(nkpost)\"/>
</go>
</anchor><br/>";}
else{print"<input class=\"button\" type=\"submit\" value=\"продолжить\"/></form>";}
} else {print"Неудается создать новый раздел. Проверьте правильность установленных прав доступа.";}
}
} else {print"Для создания нового раздела необходимы права администратора";}
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\">";}
print"<a href=\"index.php?ver=$ver&pas=$pas&login=$login\">Вернутся на форум</a><br/>";
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=\"$gen_link\">На главную</a>";
if($ver=="html"){print"</td>
</tr>
</tbody>
</table>
</body>
</html>
";}
else{print"</p></card></wml>";}
?>