原创：ASP读取XML节点对应的内容

源代码如下：

XML文件SmsDBList.xml的内容：

<?xml version="1.0" encoding="utf-8" ?>
<smsroot>
 <msg id="s58">
  <msgid>1567</msgid>
  <info>文件内容1</info>
  <stockCode>000488</stockCode>
 </msg>
 <msg id="s73">
  <msgid>2716</msgid>
  <info>文件内容2</info>
  <stockCode>601088</stockCode>
 </msg>
</smsroot>

下面读取节点属性ID为s73的stockcode的内容

读取函数如下：

' 节点，节点属性ID，下标
Function GetXmlNodes(root,id,ifx)
 dim xml,objNode,objarr,tmpval
 tmpval=""
 Set xml=Server.CreateObject("Microsoft.XMLDOM") 
 xml.Async=False
 xml.Load(Server.MapPath("SmsDBList.xml")) 
 Set objNode=xml.documentElement   
 ' 节点长度      
 newint=objNode.ChildNodes.length-1
 for i=0 To newint
  ' 节点id属性
  set objarr=objNode.ChildNodes.item(i)
  if (objarr.Attributes.item(0).Text=id) then
  ' 直接定位到节点的ID下的内容
  tmpval=xml.getElementsByTagName(root).item(i).childNodes.item(ifx).text
  exit for
  end if
  set objarr=Nothing
 next
 set objNode=Nothing
 Set xml=Nothing
 GetXmlNodes=tmpval
End Function

使用方法：

response.Write GetXmlNodes("msg","s73",2)

本文版权归学IT网（www.xueit.com）所有，任何单位与个人转载必须保留此段声明，且在文章页面明显位置给出原文连接，否则保留追究法律责任的权利。