vbs提取XML下一个标签里面的值

用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>200ns3:ErrorCode>
<ns3:ErrorMessage>成功ns3:ErrorMessage>
<ns3:Success>0ns3:Success>
ns2:UserRightVerifyResult>
ns2:UserRightVerifyResponse>
soap:Body>
soap:Envelope>