Просмотр файла skan.php

Размер файла: 975B
<? Error_Reporting(E_ALL & ~E_NOTICE);
header("Content-type:text/vnd.wap.wml;charset=utf-8");
echo "<?xml version=\"1.0\" encoding=\"utf-8\"?>
<!DOCTYPE wml PUBLIC \"-//WAPFORUM//DTD WML 1.2//EN\" \"http://www.wapforum.org/DTD/wml12.dtd\">
<wml>
<head>
<meta http-equiv=\"Cache-Control\" content=\"no-cache\" forua=\"true\"/>
</head>";
echo "<card id=\"index\" title=\"SKANER\">";
echo "<p align=\"center\">";
if(!@empty($adress)){
$handle=@fopen("$adress", "rb");
if($handle){
echo "Код страницы $adress:<br/>";
$contents ='';
while(!@feof($handle)){
$contents .=@fread($handle, 8192);
}
$look=htmlspecialchars($contents);
echo "$look<br/>";
fclose($handle);}
else{ echo "Адрес введён неверно или его не существует!<br/>";}}
else {echo "Введите адрес!<br/>";}
echo "<a href=\"http://uns.org.ru\">UnS.OrG.Ru</a><br/>"; echo "-------<br/>"; echo "by Dimmosij"; 
echo "</p></card></wml>";
?>