Серый форум — VBScript: Не удаляется нода из XML

Re: VBScript: Не удаляется нода из XML

null@example.com (chilin) — Wed, 18 Jul 2012 16:39:51 +0000

Спасибо.

Re: VBScript: Не удаляется нода из XML

null@example.com (Spy00000) — Wed, 18 Jul 2012 14:19:07 +0000

Вам нужно удалять узел из его родителя, а не из корневого узла.
Примерно так:

dim  oXml, xmlFile, oNodes1
  set oXml   = CreateObject("Microsoft.XMLDOM")
  oXml.async = false
  xmlFile    = "example.xml"
  xmlFile2    = "example2.xml"
  oXml.Load(xmlFile)
'set oNodes1  = oXml.selectSingleNode("/datapack/impex/table[@id='00.00']")
'  set oNodes1  = oXml.selectSingleNode("/")
  set oNodes1  = oXml.selectSingleNode("//test[@id='01.00']")
  if oNodes1 is nothing then
    WScript.echo("Такой ноды нет")
  else 
    if oNodes1.parentNode is nothing then
      WScript.echo("Нельзя удалить корневой узел")
    else
      oNodes1.parentNode.removeChild(oNodes1)
      oXml.save(xmlFile2)
      WScript.echo("Нода удалена")
    end if
  end if

VBScript: Не удаляется нода из XML

null@example.com (chilin) — Wed, 18 Jul 2012 13:28:40 +0000

xml: example.xml

Требуется удалить всю секцию

для ID=00.00

dim  oXml, xmlFile, oNodes1
  set oXml   = CreateObject("Microsoft.XMLDOM")
  oXml.async = false
  xmlFile    = "example.xml"
  oXml.Load(xmlFile)
  'set oNodes1  = oXml.selectSingleNode("/datapack/impex/table[@id='00.00']")
  set oNodes1  = oXml.selectSingleNode("//table[@id='00.00']")
  if oNodes1 is nothing then
    WScript.echo("Такой ноды нет")
  else 
    oXml.documentElement.removeChild(oNodes1)
    oXml.save(xmlFile)
    WScript.echo("Нода удалена")
  end if

В таком виде, removeChild выдаёт ошибку "Параметрический Node не является дочерним..."
Если из XML удалить одну из секций datapack или impex - удаление происходит.
Неужели removeChild работает только с не более чем двумя вложениями?