2

我正在尝试使用经典 ASP 读取此 XML 的根节点中的“ts”属性，但我似乎无法获得正确的语法。我能够读取下面各种节点和嵌套节点中的属性，但我需要来自根节点的信息。

任何人都可以提出解决方案吗？

XML 代码片段：

<?xml version="1.0" encoding="utf-8"?>
<results ts="2012-04-24 17:10:45" nm="Test project" fin="0" bal="131494" vot="131494" tab="614" cltab="172" pol="1737" clpol="72" stpol="1735">
    <choices>
        <choice id="1" tot="1" vot="211" e="1" />
        <choice id="2" tot="1" vot="196" e="-1" />
    </choices>
    <area id="1" bal="131494" vot="131494" bal2="131494" vot2="131494" tab="614" cltab="172" pol="1737" clpol="72" stpol="1735">
        <tab>
            <cg cgId="1" tot="132" clos="131" />
            <cg cgId="2" tot="23" clos="23" />
            <cg cgId="3" tot="459" clos="18" />
        </tab>
    </area>
    </areas>
</results>

用于读取工作正常的典型节点的 ASP 代码片段...

Dim objResultXML
Set objResultXML = Server.CreateObject("Microsoft.XMLDOM")
objResultXML.async = False
objResultXML.Load (Server.MapPath("FileToParse.xml"))

ReDim ResultArray(3,0)
Set NodeList = objResultXML.documentElement.selectNodes("choices/choice")
For Each Node In NodeList
    If CStr(ResultArray(0,0))<>"" Then  ''< Balance signs
        ReDim Preserve ResultArray(3,UBound(ResultArray,2)+1)
    End if
    ResultArray(0,UBound(ResultArray,2)) =CLng(Node.getAttribute("id"))
    ResultArray(1,UBound(ResultArray,2)) =CLng(Node.getAttribute("tot"))
    ResultArray(2,UBound(ResultArray,2)) =CLng(Node.getAttribute("vot"))
    ResultArray(3,UBound(ResultArray,2)) =CStr(Node.getAttribute("e"))

Next
Set NodeList=Nothing
4

1 回答 1

5

.documentElement是results元素。

您所需要的只是：objResultXML.documentElement.getAttribute("ts")

于 2012-04-25T22:55:25.420 回答