微信公众号搜"智元新知"关注
微信扫一扫可直接关注哦!

vbscript – 跳过第一个节点并从VBS中的xml的第二个节点进行迭代

任何人都可以建议跳过第一次出现 XML的第一个节点并从第二个节点开始迭代的最佳方法.
在下面的示例中,我想跳过第一次出现的节点“word”并开始迭代从第二次出现的节点“word”.提前致谢.

<words>
 <word>
  <name>Vowel</name>
 </word>
 <word>
  <value>a</value>
 </word>
 <word>
  <value>Vowel</value>
 </word>
</words>

解决方法

节点的子节点在其childNodes集合中收集.要跳过节点,您需要按编号/索引循环遍历childNodes,而不是更频繁的For Each方法.在代码中:

Option Explicit

Dim sXPath : sXPath    = "/words"
Dim oXDoc  : Set oXDoc = CreateObject("Msxml2.DOMDocument.6.0")
oXDoc.setProperty "SelectionLanguage","XPath"
oXDoc.async = False
oXDoc.load "35359922.xml"

If 0 = oXDoc.ParseError Then
   Dim ndWords : Set ndWords = oXDoc.selectSingleNode(sXPath)
   If ndWords Is nothing Then
      WScript.Echo "|",sXPath,"| not found"
   Else
      WScript.Echo "found " & ndWords.childNodes.length & " nodes."
      Dim i
      For i = 1 To ndWords.childNodes.length - 1
          WScript.Echo i,ndWords.childNodes(i).text
      Next
   End If

Else
   WScript.Echo oXDoc.ParseError.Reason
End If

输出

cscript 35359922.vbs
found 3 nodes.
1 a
2 Vowel

版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。