File size: 2.98Kb
<?
// ////// // // // //
// // // // ///// /////
///// \\ // // // // // // // // // // // //
// // \\ // // // // // // // // // ////// // //
// // \\ // // // // // // // // // // // //
///// \// ////// // // // // // ///// // //
// /////
//
/////////////////////////// [email protected] ///////////////////////////////
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 != ""){if($statys=="admin" || $forst=="moder"){
if($tiprum[$nr]!="on" || $key==$rumkey[$nr]){
$fp=@fopen("$rek/$nr.rum","w");
@fputs($fp,"");
@fclose($fp);
@chmod ("$rek/$nr.rum", 0777);
print"Очищена";} else{
print"Невозможно. Требуестя войти в комнату и ввести правильный ключ.";}
print"<br/><anchor title=\"ok\">К списку комнат
<go href=\"rum.php\" method=\"post\">
<postfield name=\"login\" value=\"$login\"/>
<postfield name=\"pas\" value=\"$pas\"/>
<postfield name=\"key\" value=\"$key\"/>
</go>
</anchor>
";
}}
print "
<br/><br/><a href=\"$gl\">На главную</a><br/>
</p></card></wml>";
?>