正 文

用ASP和Microsoft.XMLDOM分析远程XML文件


www.7dspace.com  更新日期:2005-8-17 4:14:34  七度空间


  用xmldom方法打开xml文件,如果是本地的没有问题,就是用Server.MapPath("xml.xml")的方法,这时能正常分析出内容,但是直接用url却不显示出xml内容(在XMLDOM里表示是支持URL方式的),后来研究一下发现可以用XMLHTTP的方法获取XML后再分析,代码如下:

Set http=Server.CreateObject("Microsoft.XMLHTTP")
http.Open "GET","http://www.7dspace.com/xml.xml",False
http.send

Set xml=Server.CreateObject("Microsoft.XMLDOM")
xml.Async=False
xml.ValidateOnParse=False
xml.Load(http.ResponseXML)
If xml.ReadyState>2 Then
    Response.Write("文档已经准备就绪。状态:"& xml.ReadyState &"<br>")
    Set item=xml.getElementsByTagName("item")
    For i=0 To (item.Length-1)
    Set title=item.Item(i).getElementsByTagName("title")
    Set link=item.Item(i).getElementsByTagName("link")
    Response.Write("<a href="""& link.Item(0).Text &""">"& title.Item(0).Text &"</a><br>")
    Next
Else
    Response.Write("文档还未准备就绪。状态:"& xml.ReadyState &"<br>")
End If
Set http=Nothing
Set xml=Nothing


xml.xml文档的内容如下:

<?xml version="1.0" encoding="utf-8"?>
<channel>
<item>
 <title>测试文档1</title>
 <link>http://localhost/</link>
</item>
<item>
 <title>测试文档2</title>
 <link>http://localhostindex.asp</link>
</item>
</channel>


上一篇:初学者必读 ASP运行环境的搭建
下一篇:Delphi编写组件封装asp代码的基本步骤
作者:  来源:七度空间 ( 责任编辑:7dspace )
收藏此页】【打印】【关闭
站 内 搜 索
 

热 点 导 读
特 别 推 荐