File size: 1.98Kb
<?
include "../config.php";
header("Content-type:text/vnd.wap.wml;charset=utf-8"); //////// тип и кодировка документа
$gl="$homepage/"; /////////// ссылка на главную
$zag="Каталог"; /////////// Загаловок
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>";
///////////// выводим вмл заголовок
$vsego = @implode("",@file("rekord/$op.dat")); ///// окрываем счетчик деректории
///////если он равен нулю, говорим мол: нету здесь ничего:
if($vsego<=0){print"В этой категории пока нет ни одного сайта.<br/>";}
if($nach=="") {$nach=1;} /////////определяем начальную позицию
$i=1;
while($i <= 10)
{$text = @implode("",@file("rekord/$nach=$op.dion"));
$text=trim($text);
$nach=$nach+1;
if($text!="") {print "$text";
$i=$i+1; }
if($nach>$vsego) {$i=12;}
}; /////выводи ссылки и описания сайтов
print"<br/>";
if($nach < $vsego) {print"<a href=\"katalog.php?op=$op&nach=$nach\">Next>></a><br/>";}
/////////выводим ссылки на главную и тд:
print "<a href=\"$homepage\">На главную</a><br/>
<a href=\"./\">Назад</a></p></card></wml>";
?>