ASP调用远程XML数据的代码(alexa排名数据)

所属分类: 网络编程 / ASP编程 阅读数: 1582
收藏 0 赞 0 分享
复制代码 代码如下:

<%
URL="http://news.163.com/special/00011K6L/rss_newstop.xml"
Set xml = Server.CreateObject("Microsoft.XMLHTTP")
xml.Open "GET", url, False
xml.Send
Set xmlDom = server.createObject("microsoft.xmldom")
xmlDom.async=False
xmlDom.ValidateOnParse=false
xmlDom.load(xml.responseXML)
if xmlDom.ReadyState>2 Then
set oItem=xmlDom.getElementsByTagName("item")
%>
<table width="550" border="0" cellpadding="3" cellspacing="1" bgcolor="#ECEFF4">
<%
for i=0 to oItem.length-1
word=oItem(i).childNodes(0).text
title=oItem(i).childNodes.item(0).text
Link=oItem(i).childNodes.item(1).text
pubDate=oItem(i).childNodes.item(3).text
%>
<tr>
<td height="24" bgcolor="#FFFFFF">·<a href="<%=link%>" target="_blank"><font style="font-size:14px;" color="#003366"><%=word%> </font><font color="#999999">(<%=pubdate%>)</font></a></td>
</tr>
<%
next
end if
%>
</table>

远程文件的内容如下:
复制代码 代码如下:

<?xml version="1.0" encoding="GBK"?>
<?xml-stylesheet type="text/css" href="http://news.163.com/css/allrss.css"?>
<rss version="2.0">
<channel>
<title>网易头条新闻</title>
<link>http://news.163.com/</link>
<description>网易头条新闻</description>
<pubDate>Wed, 16 Feb 2011 02:59:02 GMT</pubDate>
<lastBuildDate>Wed, 16 Feb 2011 02:59:02 GMT</lastBuildDate>
<item id="1">
<title><![CDATA[一线城市房租连涨]]></title>
<link>http://news.163.com/11/0216/10/6T0NIHOA00014JB6.html</link>
<description><! [CDATA[从去年底开始掀起的租金涨价潮,在春节后继续放大。记者在春节后接连接到租金上涨的消息,北京、上海、广州等一线城市房屋的租金持续上涨,很多中介开年后,重新刷新了年前房屋的出租价格,住房、商铺、写字楼的租金都上涨了10%左右不等。记者昨日走访了广州的多家中介,中介普遍反映租赁市场火热,成交单中租单已是卖单五 ]]>......</description>
<pubDate>2011-02-16 10:59:02</pubDate>
</item>
<item id="2">
<title><![CDATA[山东部分面粉厂因农民惜售商人囤粮停产]]></title>
<link>http://focus.news.163.com/11/0216/11/6T0R9MIE00011SM9.html</link>
<description><! [CDATA[民以食为天,粮价乃百价之基。 2010年下半年开始的粮价上涨引发中国经济的连锁反应,又因去秋以来的北方大旱加剧粮价上涨预期,最近国际粮价屡创新高。 稳定物价坐上了今年中国经济的“头把交椅”。春节期间,国务院总理温家宝专程奔赴粮食主产区作出最新指示,国务院常务会议则迅速出台保护粮食生产的“国十条”。 那么百 ]]>......</description>
<pubDate>2011-02-16 11:30:40</pubDate>
</item>
</channel>
</rss>
更多精彩内容其他人还在看

asp(vbs)fso OpenTextFile方法参数说明

OpenTextFile是asp语言中的一个方法,打开指定的文件并返回一个 TextStream 对象,可以通过这个对象对文件进行读、写或追加
收藏 0 赞 0 分享

IIS7.5调用asp页面出现800a0e7a的解决办法

本文给大家分享的是在windows2008R2 64位系统中出现了ADODB.Connection 错误 '800a0e7a'的解决办法,方法很简单,可是处理过程却很曲折,这里推荐给大家,有需要的小伙伴可以参考下。
收藏 0 赞 0 分享

ImageMagickObject获取图片的信息无返回值的解决办法

这篇文章主要介绍了ImageMagickObject获取图片的信息无返回值的解决办法,非常简单,加上format参数即可,需要的朋友可以参考下
收藏 0 赞 0 分享

ASP实现强制图片下载函数

最近做的一个asp项目需要强制下载图片,我在网上找了很多关于下载远程图片的ASP代码,但测试结果都不行。没办法只好自己操刀了,有什么纰漏的地方还请大家指出。
收藏 0 赞 0 分享

asp实现禁止搜索引擎蜘蛛访问的代码

这篇文章主要介绍了asp实现禁止搜索引擎蜘蛛访问的代码,十分的简单实用,有需要的小伙伴可以参考下。
收藏 0 赞 0 分享

asp、html、js 禁止缓存的代码

本文给大家分享的是在asp、html、js中强制不缓存的方法,十分的简单实用,有需要的小伙伴可以参考下。
收藏 0 赞 0 分享

asp实现带刷新功能的验证码代码

本文给大家分享的是一段使用asp实现的验证码功能,而且是带刷新的,代码非常简洁,非常实用,有需要的小伙伴可以参考下。
收藏 0 赞 0 分享

asp获得浏览器agent信息代码

最近做的一个项目中需要使用asp来获取浏览器的agent信息,好久都不玩ASP了,先度娘一下吧,把结果总结一下分享给大家。
收藏 0 赞 0 分享

ASP中只有UrlEncode,没有Urldecode问题的解决方法?

这篇文章主要介绍了ASP中只有UrlEncode,没有Urldecode问题的解决方法? ,需要的朋友可以参考下
收藏 0 赞 0 分享

对象不支持此属性或方法: Session.CodePage = 936 解决方法

这篇文章主要介绍了对象不支持此属性或方法: Session.CodePage = 936 解决方法,需要的朋友可以参考下
收藏 0 赞 0 分享
查看更多