php 分析rss代码一段
时间:2007-02-17 来源:PHP爱好者
php 分析rss代码一段<?php
function my_headlines($url) {
$rdf = parse_url($url);
$fp = fsockopen($rdf['host'], 80, $errno, $errstr, 15);
if (!$fp) {
$content = "<font class="content">Problema!</font>";
return;
}
if ($fp) {
fputs($fp, "GET " . $rdf['path'] . "?" . $rdf['query'] . " HTTP/1.0rn");
fputs($fp, "HOST: " . $rdf['host'] . "rnrn");
$string = "";
while(!feof($fp)) {
$pagetext = fgets($fp,300);
$string .= chop($pagetext);
}
fputs($fp,"Connection: closernrn");
fclose($fp);
$items = explode("</item>",$string);
$content = "<font class="content">";
for ($i=0;$i<10;$i++) {
$link = ereg_replace(".*<link>","",$items[$i]);
$link = ereg_replace("</link>.*","",$link);
$title2 = ereg_replace(".*<title>","",$items[$i]);
$title2 = ereg_replace("</title>.*","",$title2);
if ($items[$i] == "") {
$content = "";
return;
} else {
if (strcmp($link,$title)) {
$cont = 1;
$content .= "<img src="images/arrow.gif" border="0" hspace="5"><a href="$link" target="new">$title2</a><br>n";
}
}
}
}
echo "$content";
}my_headlines("http://bbs.chinaunix.net/rss/46.xml");
?>
php爱好者站 http://www.phpfans.net 为phper提供一切资讯.
function my_headlines($url) {
$rdf = parse_url($url);
$fp = fsockopen($rdf['host'], 80, $errno, $errstr, 15);
if (!$fp) {
$content = "<font class="content">Problema!</font>";
return;
}
if ($fp) {
fputs($fp, "GET " . $rdf['path'] . "?" . $rdf['query'] . " HTTP/1.0rn");
fputs($fp, "HOST: " . $rdf['host'] . "rnrn");
$string = "";
while(!feof($fp)) {
$pagetext = fgets($fp,300);
$string .= chop($pagetext);
}
fputs($fp,"Connection: closernrn");
fclose($fp);
$items = explode("</item>",$string);
$content = "<font class="content">";
for ($i=0;$i<10;$i++) {
$link = ereg_replace(".*<link>","",$items[$i]);
$link = ereg_replace("</link>.*","",$link);
$title2 = ereg_replace(".*<title>","",$items[$i]);
$title2 = ereg_replace("</title>.*","",$title2);
if ($items[$i] == "") {
$content = "";
return;
} else {
if (strcmp($link,$title)) {
$cont = 1;
$content .= "<img src="images/arrow.gif" border="0" hspace="5"><a href="$link" target="new">$title2</a><br>n";
}
}
}
}
echo "$content";
}my_headlines("http://bbs.chinaunix.net/rss/46.xml");
?>
php爱好者站 http://www.phpfans.net 为phper提供一切资讯.
相关阅读 更多 +