asp appendChild xml解决方法

asp appendChild xml

VBScript code

'创建XML文档Set xmlDoc = Server.CreateObject("Microsoft.XMLDOM")'关闭异步执行xmlDoc.Async = False '加载XML文件xmlDoc.load(Server.MapPath("demo.xml"))set rootNode = xmlDoc.documentElement'请问下面这条语句可以这样写吗rootNode.childnodes.item(0).appendChild(rootNode.childnodes.item(1))

VBScript code

<%Set oDoc    = CreateObject("Msxml2.DOMDocument")With oDoc    .async              = False    .validateOnParse    = False    .preserveWhiteSpace = False    .resolveExternals   = False    .load Server.MapPath("demo.xml")    If .parseError.errorCode <> 0 Then        sErrMsg     = .parseError.errorCode & "|" & .parseError.srcText & "|" & .parseError.reason        Response.Write sErrMsg    Else        Set root = .documentElement        root.childNodes(0).appendChild(root.childNodes(1))    End If    .save .urlEnd WithSet oDoc    = Nothing%>