View file dobkat.php

<?

                   
Error_Reporting(E_ALL & ~E_NOTICE);          /////////////// игнорируем ошибки
header("Content-type:text/vnd.wap.wml;charset=utf-8");      //////// тип и кодировка документа
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=\"GOWAP"><p>";
							///////////// выводим вмл заголовок
//////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////
							//
$parol="1234gowapcatalog";              ///////// измените parol на свой пароль!!!//
							//
//////////////////////////////////////////////////////////
//////////////////////////////////////////////////////////

if($par!=$parol){print"&#x0412;&#x0435;&#x0434;&#x0438;&#x0442;&#x0435; &#x043F;&#x0430;&#x0440;&#x043E;&#x043B;&#x044C;:<br/>

<input title=\"par\" name=\"par\" value=\"\"/><br/>
<anchor title=\"Ok\">&#x0415;&#x0441;&#x0442;&#x044C;
<go href=\"admin.php\" method=\"post\">
<postfield name=\"par\" value=\"$(par)\"/>
</go>
</anchor>
";}
if($par==$parol){
if ($dob!="da"){
print"&#x0412;&#x0432;&#x0435;&#x0434;&#x0438;&#x0442;&#x0435; &#x043D;&#x0430;&#x0437;&#x0432;&#x0430;&#x043D;&#x0438;&#x0435; &#x043D;&#x043E;&#x0432;&#x043E;&#x0439; &#x043A;&#x0430;&#x0442;&#x0435;&#x0433;&#x043E;&#x0440;&#x0438;&#x0438;:
<br/>
<input title=\"kategor\" name=\"kategor\" value=\"\"/><br/>
<anchor title=\"Ok\">&#x0415;&#x0441;&#x0442;&#x044C;
<go href=\"dobkat.php?par=$par&amp;dob=da\" method=\"post\">
<postfield name=\"kategor\" value=\"$(kategor)\"/>
</go>
</anchor>
";}

if($dob=="da"){
if($kategor!=""){
$kategor=trim($kategor);
$kat = @implode("",@file("rekord/kat.dat"));

 $i = 0;
   while($i <= $kat)
   {
$text = @implode("",@file("rekord/$i.txt"));                                           
$text=trim($text);
if ($text==$kategor) {$kategor="reg";}
$i=$i+1;
};                             //////////////// проверяем отсутствие такой категории
if($kategor!="reg"){
$counterarray = file("rekord/kat.dat");
$id = $counterarray[0]+1;
$fp = @fopen("rekord/kat.dat","wb");        /////////////увеличеваем на 1 счетчик категорий
@fputs($fp,$id);
@fclose($fp);

$fp=fopen("rekord/$id.txt","w");          ///////////  создаем файл с именем деректории о категории                                                       
fputs($fp,"$kategor \r\n");
fclose($fp);  
chmod ("rekord/$id.txt", 0777);          
$nol=0;
$fp=fopen("rekord/$id.dat","w");          ///////////  создаем счетчик категории                                                      
fputs($fp,"$nol \r\n");
fclose($fp);  
chmod ("rekord/$id.dat", 0777);          


print"&#x041A;&#x0430;&#x0442;&#x0435;&#x0433;&#x043E;&#x0440;&#x0438;&#x044F; $kategor &#x0443;&#x0441;&#x043F;&#x0435;&#x0448;&#x043D;&#x043E; &#x0434;&#x043E;&#x0431;&#x0430;&#x0432;&#x043B;&#x0435;&#x043D;&#x043D;&#x0430;";

}

////// сообщения об ошибках:
else{print"&#x0422;&#x0430;&#x043A;&#x0430;&#x044F; &#x043A;&#x0430;&#x0442;&#x0435;&#x0433;&#x043E;&#x0440;&#x0438;&#x044F; &#x0443;&#x0436;&#x0435; &#x0441;&#x0443;&#x0449;&#x0435;&#x0441;&#x0442;&#x0432;&#x0443;&#x0435;&#x0442;!";}
}else{print"&#x0412;&#x044B; &#x043D;&#x0435; &#x0432;&#x0432;&#x0435;&#x043B;&#x0438; &#x043D;&#x0430;&#x0437;&#x0432;&#x0430;&#x043D;&#x0438;&#x0435; &#x043A;&#x0430;&#x0442;&#x0435;&#x0433;&#x043E;&#x0440;&#x0438;&#x0438;";}
}




}print "<br/><a href=\"admin.php?par=$par\">&#x0410;&#x0434;&#x043C;&#x0438;&#x043D;-&#x043F;&#x0430;&#x043D;&#x0435;&#x043B;&#x044C;</a><br/></p></card></wml>";

?>