$documentroot=$_SERVER['DOCUMENT_ROOT']; $links_path="$documentroot/links"; $flinks=fopen("$links_path/links.txt","r"); while($rec=fgets($flinks)) { $ary_links[]=$rec; } fclose($flinks); print "
"; print "
Home
"; print "
Raggiungibile
Reachable
siti/sites
"; print "
"; foreach($ary_links as $rec) { list($link,$linkdesc)=explode(';',$rec); $ary_url=explode('/',$link); $host=$ary_url[2]; // if($host!="www.iw3hvb.it") $checklink=@fopen($link,"r"); // $checklink=@fsockopen($host,80,$errno,$errstr,10); // if($checklink) { $img_link="link_ok.gif"; $linktitle="OK - raggiungibile/reachable"; $linkcolor="navy"; // } // else { // $img_link="link_ko.gif"; // $linktitle="KO! - non raggiungibile/not reachable"; // $linkcolor="darkred"; // } // if($checklink && $host!="www.iw3hvb.it") @fclose($checklink); // if($ok) unset($ok); print "
"; $linkdesc!=''?print "
":print " "; print "
$linkdesc
"; } print "
Home
"; print "
" ?>