File size: 1.83Kb
<?
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.1//EN\" \"http://www.wapforum.org/DTD/wml_1.1.xml\">
<wml>
<card id=\"tes\" title=\"Mobilka.Us GB\">
<p>";
$provpar = @implode("",@file("parol/$nom.dionisij"));
$provpar = trim("$provpar");
If($provpar==$pas) {
$glav = @implode("",@file("konfig/$nom.dionisij"));
$glav = trim("$glav");
$id = @implode("",@file("cont/$nom.dat"));
if ($nomber == 0) $nomber = "$id" ;
$nomber=$nomber+1;
print "
<a href=\"obr.php?nom=$nom\">Написать</a><br/>";
$var = 3; ////////////// число сообщений на странице (чило сообщений = var + 1 !!!)
$i = 0;
while($i <= $var)
{$nomber = $nomber-1;
$text = @implode("",@file("rek/$nomber=$nom.txt")); /////////////////////// измени деректорию рекорд!
if ($text!=99999) { print "
<a href=\"del.php?del=$nomber&nom=$nom&pas=$pas\">Удалить</a>
<a href=\"otv.php?otv=$nomber&nom=$nom&pas=$pas\">Ответить</a><br/>
$text"; $i=$i+1; };
if ($nomber <= 0) {$i == $var+1;};
};
print "<br/>
<a href=\"obr.php?nom=$nom\">Написать</a><br/>
<a href=\"guest.php?nom=$nom&nomber=$nomber\">Далее</a><br/>
<a href=\"$glav\">На главную</a>
";}
else {print"Oshibka avtorizacii";};
print "</p> </card></wml>";
?>