ASP 订阅所有【ASP】的日志

ASP读取远程XML并输出相应数据

不管你把SEO本身的页面做地多么完美,一定数量且优质的反向也是必不可少的(虽然我不喜欢这个,并且这个BLOG也没有可以加过一个反响,但是,对于一些客户的网站,还是没有办法的),何况咱这水平,也没法把页面做的多完美...
刚开始做的时候,由于客户不多,就手动的在各个网站上,给需要SEO的网站加上反向,但是后来客户多了,就感觉这样的做法效率很低。很多时候,为了加一个词,就要花上几个小时,在手动连接几十个FTP,并且修改页面。
于是今天想把需要SEO的数据统计存在一个文件里,然后在各个需要被优化的网站上,通过程序来读取这个文件,并且输出相应的反向。
远程include文件是肯定不可能了,于是就写了一个XML以及读取程序,如下。

读取XML并输出超级链接的ASP代码:

<%
url = "http://www.czbin.cn/Seo_01.xml"
Set http=Server.CreateObject("Microsoft.XMLHTTP")
http.Open "GET",url,False
http.send
Set xmldom=Server.CreateObject("Microsoft.XMLDOM")
xmldom.Async=true
xmldom.ValidateOnParse=False
xmldom.Load(http.ResponseXML)

set nodeGather = xmldom.getElementsByTagName("S")
tagCount = nodeGather.length
for i = 0 to tagCount -1
nodeContent = nodeGather(i).ChildNodes(0).text
nodeValue = nodeGather(i).getAttribute("v")
Response.Write ""&nodeContent&""&Chr(10)
next
set nodeGather = nothing
%>

XML文件:



http://www.czbin.cn">Czbin's Blog
http://www.google.cn">Google
http://www.Yahoo.com.cn">Yahoo中国


顺带提一下,如果不是读取远程的XML文件,ASP代码可以简化成这样:
<%
xmlconfig = "SEO_01.xml"
set xmldom = Server.CreateObject("Microsoft.xmldom")
xmldom.load(server.MapPath(xmlconfig))

set nodeGather = xmldom.getElementsByTagName("S")
tagCount = nodeGather.length
for i = 0 to tagCount -1
nodeContent = nodeGather(i).ChildNodes(0).text
nodeValue = nodeGather(i).getAttribute("v")
Response.Write ""&nodeContent&""&Chr(10)
next
set nodeGather = nothing
%>

上一篇: asp读写xml函数
下一篇: 怎么让PHP在64位Windows 2003上运行
文章来自: 本站原创
引用通告: 查看所有引用 | 我要引用此文章
Tags:
相关日志:
评论: 0 | 引用: 0 | 查看次数: 2946
发表评论
昵 称:
密 码: 游客发言不需要密码.
邮 箱: 邮件地址支持Gravatar头像,邮箱地址不会公开.
网 址: 输入网址便于回访.
内 容:
验证码:
选 项:
虽然发表评论不用注册,但是为了保护您的发言权,建议您注册帐号.
字数限制 1000 字 | UBB代码 关闭 | [img]标签 关闭