File size: 4.05Kb
<?
// ////// // // // //
// // // // ///// /////
///// \\ // // // // // // // // // // // //
// // \\ // // // // // // // // // ////// // //
// // \\ // // // // // // // // // // // //
///// \// ////// // // // // // ///// // //
// /////
//
/////////////////////////// [email protected] ///////////////////////////////
Error_Reporting(E_ALL & ~E_NOTICE); /////////////// игнорируем ошибки
header("Content-type:text/vnd.wap.wml;charset=utf-8"); //////// тип и кодировка документа
//////////////////////////////////////////////////////////////////////////
$gl="http://da1.hoha.ru/index.wml"; /////////// ссылка на главную
$zag="Dionisij"; /////////// Загаловок
//////////////////////////////////////////////////////////////////////////
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=\"$uz\"><p>";
///////////// выводим вмл заголовок
$text = @file("profil/$uz.prof");
if ($text!=""){
$udata = explode(":||:",$text[0]);
$otkel=trim($udata[2]);
$osebe=trim($udata[3]);
$mail=trim($udata[4]);
$site=trim($udata[5]);
$datar=$udata[6];
$kmes = @implode("",@file("profil/$uz.st"));
if ($site=="http://") {$site="";} else{}
print"Анкета $uz <br/> Откуда: $otkel<br/> Сам $uz о себе любимом: $osebe <br/>Его е-мэил: $mail <br/> Оставил сообщений на форуме: $kmes<br/>Дата регистрации: $datar<br/><a href=\"otpr.php?razd=$razd&prazd=$prazd&tem=$tem&nmes=$nmes&log=$log&par=$par&uz=$uz&mest=$mest\">Отправить приватное сообщение</a><br/>";
if ($site!="") {print"<a href=\"$site\">Перейти на сайт $uz</a><br/>";} else{}}
else {print"Пользователь $uz не зарегестрирован<br/>";}
print "________<br/><a href=\"$mest.php?razd=$razd&prazd=$prazd&tem=$tem&nmes=$nmes&log=$log&par=$par\">Форум</a><br/>
<a href=\"$gl\">На главную</a><br/>
</p></card></wml>";
?>