如何减少百度的分类新闻代码输出条数

[ruiman]

下面是百度的分类新闻代码,可是出来新闻有10条,我只显示前6条,请问该怎么办?
<style type=text/css> div{font-size:12px;font-family:arial}.baidu{font-size:14px;line-height:24px;font-family:arial} a,a:link{color:#0000cc;}
.baidu span{color:#6f6f6f;font-size:12px} a.more{color:#008000;}a.blk{color:#000;font-weight:bold;}</style>
<script language="JavaScript" type="text/JavaScript" src="http://news.baidu.com/n?cmd=1&class=edunews&pn=1&tn=newsbrofcu"></script>

[xuStanly]

那就别用src指定了，在服务器端XMLHTTP获取
这个地址http://news.baidu.com/n?cmd=1&class=edunews&pn=1&tn=newsbrofcu
然后进行分析，只输出其中6行。

[xuStanly]

给弄段代码吧asp的

<%response.contenttype = "text/xml"%>
<%response.charset = "utf-8"%>
<%
function getHTTPPage(url)
	dim Http
	set Http=server.createobject("MSXML2.XMLHTTP")
	Http.open "GET",url,false
	Http.send
	if Http.readystate<>4 then 
		exit function
	end if
	getHTTPPage=bytesToBSTR(Http.responseBody,"GB2312")
	set http=nothing
	if err.number<>0 then 
		err.Clear
	end if
end function

Function BytesToBstr(body,Cset)
	dim objstream
	set objstream = Server.CreateObject("adodb.stream")
	objstream.Type = 1
	objstream.Mode =3
	objstream.Open
	objstream.Write body
	objstream.Position = 0
	objstream.Type = 2
	objstream.Charset = Cset
	BytesToBstr = objstream.ReadText 
	objstream.Close
	set objstream = nothing
End Function
response.write "<?xml version=""1.0"" encoding=""utf-8""?>" & chr(13)
response.write "<root>" & chr(13)
on error resume next
'取得数据
dim strURL, srcHTML
strURL = "http://news.baidu.com/n?cmd=1&class=edunews&pn=1&tn=newsbrofcu"
srcHTML = getHTTPPage(strURL)
if err.number <> 0 then
	response.write "<code>" & err.number & "</code>"
	response.write "<source>系统组件在服务器上没有访问网络的权限</source>"
	response.write "</root>"
	response.end
end if

'建立正则对象分析数据
dim re, matches, match
set re = new RegExp
re.IgnoreCase = true
re.Global = true
re.Pattern = "<a([\s\S]*?)/span>"
set matches = re.execute(srcHTML)
For each match in matches
	response.write "<v><![CDATA[" & match.value & "]]></v>"		
Next
response.write "</root>"
%>

用utf-8编码另存为test.asp

[西安风影]

测试了一下 基本可以
<style type=text/css> div{font-size:12px;font-family:arial}.baidu{font-size:14px;line-height:24px;font-family:arial} a,a:link{color:#0000cc;}
.baidu span{color:#6f6f6f;font-size:12px;display:none} a.more{color:#008000;}a.blk{color:#000;font-weight:bold;} </style>
<script language="JavaScript" type="text/JavaScript" src="http://news.baidu.com/n?cmd=1&class=edunews&pn=1&tn=newsbrofcu"> </script>
<script>
function SubItem()
{
var hrefs = document.getElementsByTagName("a");
for(var i=8; i<hrefs.length; i++)
{
hrefs[i].style.display="none";
}
}
window.onload=SubItem;
</script>

[西安风影]

修正：
<style type=text/css> div{font-size:12px;font-family:arial}.baidu{font-size:14px;line-height:24px;font-family:arial} a,a:link{color:#0000cc;}
.baidu span{color:#6f6f6f;font-size:12px} a.more{color:#008000;}a.blk{color:#000;font-weight:bold;} </style>
<script language="JavaScript" type="text/JavaScript" src="http://news.baidu.com/n?cmd=1&class=edunews&pn=1&tn=newsbrofcu"> </script>
<script>
function SubItem()
{
var hrefs = document.getElementsByTagName("a");
for(var i=8; i<hrefs.length-1; i++)
{
hrefs[i].style.display="none";
}
var spans = document.getElementsByTagName("span");
for(var i=6; i<spans.length; i++)
{
spans[i].style.display="none";
}
}
window.onload=SubItem;
</script>

[西安风影]

最终版本
<style type=text/css> div{font-size:12px;font-family:arial}.baidu{font-size:14px;line-height:24px;font-family:arial} a,a:link{color:#0000cc;}
.baidu span{color:#6f6f6f;font-size:12px} a.more{color:#008000;}a.blk{color:#000;font-weight:bold;} </style>
<script language="JavaScript" type="text/JavaScript" src="http://news.baidu.com/n?cmd=1&class=edunews&pn=1&tn=newsbrofcu"> </script>
<script>
function SubItem()
{
var hrefs = document.getElementsByTagName("a");
for(var i=9; i<hrefs.length; i++)
{
hrefs[i].style.display="none";
}
var spans = document.getElementsByTagName("span");
for(var i=6; i<spans.length; i++)
{
spans[i].style.display="none";
}
hrefs[8].href=hrefs[hrefs.length-1].href;
hrefs[8].innerHTML="更多>>";
hrefs[8].style.color="#008000";
}
window.onload=SubItem;
</script>

[xuStanly]

万一要是页面上的<a>和<span>标签不止这些呢？

[yixianggao]

呵呵，还来！
So Easy！
L@_@K

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
    <title> new document </title>
    <meta name="generator" content="editplus" />
    <meta name="author" content="Gao YiXiang" />
    <meta name="email" content="[e-mail]" />
    <meta name="keywords" content="javascript dhtml dom" />
    <meta name="description" content="I love web development." />
</head>
<body>
    <style type=text/css>
div
{
	font-size: 12px;
	font-family: arial;
}
.baidu
{
	font-size: 14px;
	line-height: 24px;
	font-family: arial;
}
a, a:link
{
	color: #0000cc;
}
.baidu span
{
	color: #6f6f6f;
	font-size: 12px;
}
a.more
{
	color: #008000;
}
a.blk
{
	color: #000;
	font-weight: bold;
}
    </style>
    <div id="divBaiduNews">
        <script language="JavaScript" type="text/JavaScript" src="http://news.baidu.com/n?cmd=1&class=edunews&pn=1&tn=newsbrofcu&count=6"></script>        
    </div>


<script type="text/javascript">
<!--
/*
 * 隐藏 Logo。
 */
var oImgs = divBaiduNews.childNodes[1];
oImgs.style.display = "none";
/*
 * 隐藏 新闻
 */
var iNewCount = 6;
var oNews = divBaiduNews.childNodes[2];
var delimiter = "<BR>";
var aNews = oNews.innerHTML.split(delimiter);
// 减 1 是为了保留[更多]二字。
aNews.splice(iNewCount, aNews.length-1-iNewCount);
oNews.innerHTML = aNews.join(delimiter);
//-->
</script>

    <h3>对比一下，哈</h3>
    <style type="text/css">   div{font-size:12px;font-family:arial}.baidu{font-size:14px;line-height:24px;font-family:arial}   a,a:link{color:#0000cc;} 
.baidu   span{color:#6f6f6f;font-size:12px}   a.more{color:#008000;}a.blk{color:#000;font-weight:bold;} </style>

    <script language="JavaScript" type="text/JavaScript" src="http://news.baidu.com/n?cmd=1&class=edunews&pn=1&tn=newsbrofcu"> </script>

</body>
</html>

[xiaojing7]

.

[一把编程的菜刀]

都是简单的啊
多少标签都好！

[haiyuhuang]

路过

[meiZiNick]

不会,帮顶