File size: 5.16Kb
<?
Error_Reporting(E_ALL & ~E_NOTICE); /////////////// игнорируем ошибки
header("Content-type:text/vnd.wap.wml;charset=utf-8"); //////// тип и кодировка документа
////////////// Параметры книги /////////////////////////////////////////////////
$gl="../index.php"; /////////ссылка на главную
$admin="Admin"; ////////админ
$parad="admin"; ////////пароль админа
$zag="Book 0.9.8.2";
//////////////////////////////////////////////////////////////////////////////
$currHour=date("H",time());///////////формат даты и времени
$currDate=date("dS F, Y", time());
$curr=date("i:s", time());
$currTime=date("$currHour:i:s", time());
if($parad!=$pas) {$log="";}
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 align=\"center\">";
///////////// выводим вмл заголовок
//<b>$currTime</b><br/><small>$currDate</small></p><p>
include ("online.php");
$ipnn = gethostbyaddr($REMOTE_ADDR);
// print "$ipnn<br/>";
print"
<anchor title=\"say\">Написать
<go href=\"say.php\" method=\"post\">
<postfield name=\"log\" value=\"$log\"/>
<postfield name=\"pas\" value=\"$pas\"/>
<postfield name=\"ipnn\" value=\"$ipnn\"/>
</go>
</anchor><br/>
<anchor title=\"ref\">Обновить
<go href=\"index.php\" method=\"post\">
<postfield name=\"log\" value=\"$log\"/>
<postfield name=\"pas\" value=\"$pas\"/>
<postfield name=\"new\" value=\"$curr\"/>
</go>
</anchor><br/>"; print'<img src="border.gif" />';
$vsego = file("vsego.shet");
$vsego=$vsego[0];
if($nmes=="") {$nmes=$vsego;}
$kp=1;
$nvs=$vsego;
while($kp <= 4) //где 4 - количество мессаг на страницу
{
$tex=@file("zapis/$nmes.mess");
$utex=explode(":||:",$tex[0]);
$obr=trim($utex[0]);
$vrem=trim($utex[1]);
$text=trim($utex[2]);
$mail=trim($utex[3]);
$site=trim($utex[4]);
$ipload=trim($utex[5]);
$brayz=trim($utex[6]);
$admins=trim($utex[7]);
if($text!=""){
if($log==$admin){print "<small><br/>POST: [$nmes]<br/>
$ipload</small>";}
print"<b><br/><anchor title=\"say\">$obr
<go href=\"say.php?user=$obr\" method=\"post\">
<postfield name=\"log\" value=\"$log\"/>
<postfield name=\"pas\" value=\"$pas\"/>
<postfield name=\"obr\" value=\"$obr\"/>
<postfield name=\"comment\" value=\"false\"/>
<postfield name=\"ipnn\" value=\"$ipnn\"/>
</go>
</anchor></b>
<small>($vrem)</small>: <br/>$text";
if($mail!=""){print"<br/>e-mail: <a href=\"mailto:$mail\">$mail</a>";}
if($site!="") {print"<br/><a href=\"$site\">$site</a>";}
if($admins!="")
{print "<br/>------------<br/><small>[Ответ]: $admins</small>";}
if($log==$admin){print"<br/><small><anchor title=\"del\">[Delete]
<go href=\"del.php\" method=\"post\">
<postfield name=\"log\" value=\"$log\"/>
<postfield name=\"pas\" value=\"$pas\"/>
<postfield name=\"nmes\" value=\"$nmes\"/>
</go>
</anchor></small>
<br/><small><anchor title=\"com\">[Comment]
<go href=\"saycomm.php\" method=\"post\">
<postfield name=\"log\" value=\"$log\"/>
<postfield name=\"pas\" value=\"$pas\"/>
<postfield name=\"nmes\" value=\"$nmes\"/>
</go>
</anchor></small>
" ;}
print'<br/><img src="border.gif" />';
$kp=$kp+1;}
$nmes=$nmes-1;
if($nmes<0){$kp=20;}}
if($nmes>0){print"<br/><anchor title=\"next\">Далее
<go href=\"index.php?nmes=$nmes\" method=\"post\">
<postfield name=\"log\" value=\"$log\"/>
<postfield name=\"pas\" value=\"$pas\"/>
<postfield name=\"ipnn\" value=\"$ipnn\"/>
</go>
</anchor>";}
// print"<br/><anchor title=\"say\">Написать
// <go href=\"say.php\" method=\"post\">
// <postfield name=\"log\" value=\"$log\"/>
// <postfield name=\"pas\" value=\"$pas\"/>
// <postfield name=\"ipnn\" value=\"$ipnn\"/>
// </go>
// </anchor><br/>";
if($log==$admin){
print"
<a href=\"adminedit.php?log=$log&pas=$pas\">AdminPanel</a>
";
print"<br/>";
print"<br/>";
}
print"<br/><a href=\"$gl\">На главную</a><br/>
</p></card></wml>";
?>