File size: 5.09Kb
<?
Error_Reporting(E_ALL & ~E_NOTICE); /////////////// игнорируем ошибки
header("Content-type:text/vnd.wap.wml;charset=utf-8"); //////// тип и кодировка документа
include 'dan.php';
include 'uzdan.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=\"Опции\"><p>";
///////////// выводим вмл заголовок
if($login != ""){
print"<anchor title=\"ok\">Анкета $obr
<go href=\"infa.php\" method=\"post\">
<postfield name=\"login\" value=\"$login\"/>
<postfield name=\"pas\" value=\"$pas\"/>
<postfield name=\"nr\" value=\"$nr\"/>
<postfield name=\"obr\" value=\"$obr\"/>
<postfield name=\"key\" value=\"$key\"/>
</go></anchor><br/>";
if( @file("$foto/$obr.foto") ){print"<anchor title=\"ok\">Смотреть фото $obr
<go href=\"sfoto.php\" method=\"post\">
<postfield name=\"login\" value=\"$login\"/>
<postfield name=\"pas\" value=\"$pas\"/>
<postfield name=\"nr\" value=\"$nr\"/>
<postfield name=\"obr\" value=\"$obr\"/>
<postfield name=\"key\" value=\"$key\"/>
</go></anchor><br/><br/>";}
if($statys=="admin" || $forst=="moder"){
print"<anchor title=\"zvan\">Звание
<go href=\"zvan.php\" method=\"post\">
<postfield name=\"login\" value=\"$login\"/>
<postfield name=\"pas\" value=\"$pas\"/>
<postfield name=\"nr\" value=\"$nr\"/>
<postfield name=\"obr\" value=\"$obr\"/>
<postfield name=\"key\" value=\"$key\"/>
</go></anchor><br/>
<anchor title=\"zvan\">Управление фотографиями
<go href=\"upfoto.php\" method=\"post\">
<postfield name=\"login\" value=\"$login\"/>
<postfield name=\"pas\" value=\"$pas\"/>
<postfield name=\"nr\" value=\"$nr\"/>
<postfield name=\"obr\" value=\"$obr\"/>
<postfield name=\"key\" value=\"$key\"/>
</go></anchor><br/><br/>
<anchor title=\"ban\">Закрыть доступ
<go href=\"ban.php\" method=\"post\">
<postfield name=\"login\" value=\"$login\"/>
<postfield name=\"pas\" value=\"$pas\"/>
<postfield name=\"nr\" value=\"$nr\"/>
<postfield name=\"obr\" value=\"$obr\"/>
<postfield name=\"key\" value=\"$key\"/>
</go></anchor><br/>";}
if($statys=="admin"){$textu=@file("$uzer/$obr.log");
$textu=explode(":||:",$textu[0]);
$fortu=trim($textu[10]);
if($fortu=="moder"){print"<anchor title=\"mod\">Снять статус модератора
<go href=\"statysof.php\" method=\"post\">
<postfield name=\"login\" value=\"$login\"/>
<postfield name=\"pas\" value=\"$pas\"/>
<postfield name=\"nr\" value=\"$nr\"/>
<postfield name=\"obr\" value=\"$obr\"/>
<postfield name=\"key\" value=\"$key\"/>
</go></anchor><br/>";}
else{print"<anchor title=\"mod\">Назначить модератором
<go href=\"statyson.php\" method=\"post\">
<postfield name=\"login\" value=\"$login\"/>
<postfield name=\"pas\" value=\"$pas\"/>
<postfield name=\"nr\" value=\"$nr\"/>
<postfield name=\"obr\" value=\"$obr\"/>
<postfield name=\"key\" value=\"$key\"/>
</go></anchor><br/>";}}
if($statys=="admin" || $forst=="moder"){
$arip=@file("ip/$obr.zap");
$arip=explode(":||:",$arip[0]);
$ipadr=trim($arip[0]);
$brauz=trim($arip[1]);
print"<anchor title=\"ban\">Запретить регу с $ipadr/$brauz
<go href=\"ipban.php\" method=\"post\">
<postfield name=\"login\" value=\"$login\"/>
<postfield name=\"pas\" value=\"$pas\"/>
<postfield name=\"nr\" value=\"$nr\"/>
<postfield name=\"obr\" value=\"$obr\"/>
<postfield name=\"key\" value=\"$key\"/>
</go></anchor><br/>";
}
print"<br/>=======<br/><anchor title=\"ok\">В комнату
<go href=\"chat.php\" method=\"post\">
<postfield name=\"login\" value=\"$login\"/>
<postfield name=\"pas\" value=\"$pas\"/>
<postfield name=\"nr\" value=\"$nr\"/>
<postfield name=\"key\" value=\"$key\"/>
</go></anchor><br/>";
print"<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>";
?>