先上一个简单的XML文档,如下
<?xml version="1.0"?>
<book>
<math>
<grade>grade 1</grade>
<name>math</name>
<price>$12.5</price>
</math>
<english>
<grade>grade 2</grade>
<name>english</name>
<price>$44.1</price>
</english>
</book>
Dim objXML ' object to hold the xml document
Dim objNode ' xml node object
Set objXML = CreateObject("Microsoft.XMLDOM")
objXML.load("C:\Users\Conan\Desktop\111.xml")
Set objNode = objXML.selectSingleNode("/book/english/price")
print objNode.text
输出值:$44.1
QTP---VBS 读取XML中 对应标签的 值
發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.