-1

我是编程新手,所以想问一个问题,因为这个问题暂时停止了我的工作......我有一个 .xml 文件(下面是一个片段):

<?xml version="1.0"?>
<JAMonXML>
...................................
<row rowID="3"> 
<Modify>3</Modify> 
<Label>/registration/app/main, ms.</Label> 
<Hits>2</Hits> 
<Avg>1,164</Avg> 
<Total>2,327</Total> 
<StdDev>13</StdDev> 
<LastValue>1,154</LastValue> 
<Min>1,154</Min> 
<Max>1,173</Max> 
<Active>0</Active> 
<AvgActive>1</AvgActive> 
<MaxActive>1</MaxActive> 
<FirstAccess>5/8/13 2:21:40 PM</FirstAccess> 
<LastAccess>5/8/13 2:21:41 PM</LastAccess> 
<Enabled>true</Enabled> 
<Primary>false</Primary> 
<HasListeners>false</HasListeners> 
</row>
.......................
</JAMonXML>

这次我需要获取一个名为 LastValue: 1,154 的值。我有一台 Windows 计算机,所以我需要一个 VBScript 来执行此操作并通过运行此脚本获得 1,154

如果您能帮我解决这个问题,我将非常高兴!

4

1 回答 1

0

现在可以了!:D

Dim xmlDoc, objNodeList, plot

Set xmlDoc = CreateObject("Msxml2.DOMDocument")
xmlDoc.load("C:\...\jamon.xml")
Set objNodeList = xmlDoc.getElementsByTagName("LastValue")

If objNodeList.length > 0 then
For each x in objNodeList
plot=x.Text
msgbox plot
Next
Else
msgbox chr(34) & "LastValue" & chr(34) & " not found."
End If
于 2013-05-09T11:18:05.133 回答