File size: 2.11Kb
<?
header("Content-type:text/vnd.wap.wml;charset=utf-8");
print "<?xml version=\"1.0\"?>
<!DOCTYPE wml PUBLIC \"-//WAPFORUM//DTD WML 1.1//EN\" \"http://www.wapforum.org/DTD/wml_1.1.xml\">";
print "<wml>\n";
print "<card title=\"Анкеты\">\n";
// $text = "$name::$mail::$mess::$file_o";
//$text=strip_tags($file_o);
// $xfile = fopen($file_o, "r") ;
$xfile = @file("guestWW.dat");
$p = 20;
if ($npage == ""){$npage = "1";}
$first = count($xfile) - ($p * ($npage - 1));
$second = count($xfile) - ($p * $npage) + 1;
if ($second < 1) {$second = 1;}
$npages = (int)(count($xfile) / $p);
if ($news_limiter>((int) ($npages*$p))) $npages = $npages+1;
if ($npage <= $npages and $npage>1) $gline_rew = "<a href=\"wievWWsn.php?npage=".($npage-1)."\">назад</a>";
if ($npages > 1 and $npage<$npages) $gline_next = "<a href=\"wievWWsn.php?npage=".($npage+1)."\">далее</a>";
// $line = " | ";
// for ($p = 1; $p <= $npages; $p++) {
// if ($p != $npage) { $line .= "<a href=\"wiev.php?npage=$p\"> $p </a>|";}
// if ($p == $npage) { $line .= "$p |"; }
// }
// print $line;
for ($i = $first-1; $i >= $second-1; $i--) {
$ii = $i;
$ii++;
$udata = explode("::",$xfile[$i]);
// print "$udata[0]";
if ($udata[0]==$nikname) {
print "
<p><img src=\"icon7.jpg\" /><anchor>
$udata[0]
<go href=\"wievWW2.php\" method=\"post\">
<postfield name=\"anketa\" value=\"$udata[0]\"/>
<postfield name=\"id2\" value=\"$udata[10]\"/>
</go>
</anchor></p>";
}
}
print "<br/>";
print "<p>".$gline_rew."</p>";
print "<p>".$gline_next."</p>";
print "<br/>";
print "
<p><a href=\"index.php\">На главную</a></p>
<p><a href=\"znak_gl.wml\">К разделам</a></p>
</card>
</wml>";
?>