2
我正在嘗試使用經典ASP讀取此XML的根節點中的「ts」屬性,但似乎無法獲得正確的語法。我能夠讀取下面各個節點和嵌套節點中的屬性,但我需要從根節點獲取信息。如何使用經典ASP讀取XML根節點中的屬性?
任何人都可以提出解決方案嗎?
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
非常感謝! – daveo 2012-04-27 17:31:10