File size: 1.98Kb
<?
Error_Reporting(E_ALL & ~E_NOTICE); /////////////// игнорируем ошибки
header("Content-type:text/vnd.wap.wml;charset=utf-8"); //////// тип и кодировка документа
include 'dan.php';
include 'uzdan.php';
include 'rumdan.php';
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>";
if($login!="" & $statys=="admin"){
print"Комната / матерный фильтр
/Включить ключ/ ключ
<br/>";
include 'rumad.php';
print"<br/><anchor title=\"ok\">Сохранить
<go href=\"rumsave.php\" method=\"post\">
<postfield name=\"login\" value=\"$login\"/>
<postfield name=\"pas\" value=\"$pas\"/>
<postfield name=\"key\" value=\"$key\"/>
";
$tr=0;
while($tr<=4){
print"<postfield name=\"sr[$tr]\" value=\"$(sr$tr)\"/>
<postfield name=\"nar[$tr]\" value=\"$(nar$tr)\"/>
<postfield name=\"ditr[$tr]\" value=\"$(ditr$tr)\"/>
<postfield name=\"kluch[$tr]\" value=\"$(kluch$tr)\"/>";
$tr=$tr+1;
}
print"</go>
</anchor><br/>";
}else{print"Данные не верны. Попробуйте ввести их снова.<br/>
<a href=\"index.php\">Попробывать еще</a><br/>";}
print"<br/><a href=\"$gl\">На главную</a><br/>
</p></card></wml>";
?>