用vbs提取一个XML下一个标签里面的值
取objNode.text的时候报错缺少对象,查了很多方法没解决,求各位支招
XML文档和代码放下面了
代码如下
Dim objNode,xmlDOC
Set xmlDOC =CreateObject("MSXML.DOMDocument")
xmlDOC.load("D:\123.xml")
Set objNode = xmlDOC.selectSingleNode("//soap:Envelope/soap:Body/ns2:appInterfaceResponse/ns2:UserRightVerifyResult/ns3:ErrorMessage")
bb = objNode.text
if objNode = "成功" then
msgbox "1"
else
msgbox "2"
end if
xml文档
<soap:Envelope xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/">
<soap:Body>
<ns2:UserRightVerifyResponse xmlns="http://schemas.datacontract.org/2004/07/CalbUserRightVerifyService" xmlns:ns2="http://tempuri.org/" xmlns:ns3="http://schemas.datacontract.org/2004/07/EdgeUtility" xmlns:ns4="http://schemas.microsoft.com/2003/10/Serialization/">
<ns2:UserRightVerifyResult>
<ns3:ErrorCode>200</ns3:ErrorCode>
<ns3:ErrorMessage>成功</ns3:ErrorMessage>
<ns3:Success>0</ns3:Success>
</ns2:UserRightVerifyResult>
</ns2:UserRightVerifyResponse>
</soap:Body>
</soap:Envelope>