如何使用vbscript替换节点值？

Question

请使用以下代码：

' Set up the response for the request
Set nodeTier = CreateNode(rootResponse, "RequestResponse", "")
Set nodeTierSuccess = CreateNode(nodeTier, "SuccessCode", "1")
Set nodeTierSuccess = CreateNode(nodeTier, "Order", "")

如何将'SuccessCode'值从'1'更改为'0'？

Answer 1

使用Docs查找此演示代码中使用的方法：

>> Set oX = CreateObject("msxml2.domdocument")
>> Set oX.documentElement = oX.createElement("a")
>> Set oS = oX.createElement("s")
>> oS.appendChild oX.createTextNode("0")
>> oX.documentElement.appendChild oS
>> WScript.Echo oX.xml
>> oS.text = "1"
>> WScript.Echo oX.xml
>>
<a><s>0</s></a>

<a><s>1</s></a>