2008年12月22日 星期一

讀取RSS練習


function simplerss($xml) {
$_x = array();
$reels = '/<(\w+)\s*([^\/>]*)\s*(?:\/>|>(.*)<\/\s*\\1\s*>)/s';
preg_match_all($reels, $xml, $elements);
foreach ($elements[1] as $ie => $xx) {
$_x[$xx]=$elements[3][$ie];
}
return $_x;
}

$url = "http://rd.tyc.edu.tw/rss.php?f=21";

$f=fopen($url,"r");
$content='';
while (!feof($f)) {
$content .= fread($f,4096);
}
fclose($f);
//echo $content;

//$a= strpos($content,'');
//$b= strrpos($content,'
');
//$real_content=substr($content,$a+6,$b-$a);
//echo $real_content;
$arr = explode('',$content);

$all=array();
foreach ($arr as $i=>$v) {
$real_arr=explode('',$v);
if ($real_arr[1]) {
//print_r(simplerss($real_arr[1]));
$all[]=simplerss($real_arr[1]);
}
}


foreach ($all as $i=>$v){
echo '<table border=1 width=100%>';
echo ''.'標題:'.''.$v['title'].'';
echo ''.'時間:'.''.$v['pubDate'].'';
echo ''.'連結:'.''.$v['link'].'';
$desc = str_replace('<','<',str_replace('>','>',$v['description']));
echo ''.$desc.'';
}