Per vbscript neues element an xml datei einfügen

guten abend an alle

das xml file, dass dieser script bearbeitet sieht leer so aus:

<?xml version="1.0"?>
-<DynPlacement.Document>
-<Config>
<Paths/>
</Config>
</DynPlacement.Document>

nach ausführung des scripts:

<?xml version="1.0"?>
-<DynPlacement.Document>
-<Config>
<Paths/>
</Config>
-<Path>
<Path>C:\Program Files\Lockheed Martin\Prepar3D v4\Ecosystem\Europe\Italy\Ancona\scenery</Path>
</Path>
</DynPlacement.Document>

Set xmlDoc = _
  CreateObject("Microsoft.XMLDOM")  

xmlDoc.Async = "False"  
xmlDoc.Load("C:\Program Files\Lockheed Martin\Prepar3D v4\ATiLibs\Scenery\OF_Config.xml")  

Set objRoot = xmlDoc.documentElement

Set objRecord = _
  xmlDoc.createElement("Path")  
objRoot.appendChild objRecord

Set objFieldValue = _
  xmlDoc.createElement("Path")  
objFieldValue.Text = "C:\Program Files\Lockheed Martin\Prepar3D v4\Ecosystem\Europe\Italy\ATiAncona\scenery"  
objRecord.appendChild objFieldValue

  
xmlDoc.Save ("C:\Program Files\Lockheed Martin\Prepar3D v4\ATiLibs\Scenery\OF_Config.xml")  

ich schaffe es nicht den script so umzuschreiben, dass das element wie unten aufgeführe eingefügt wird:

<?xml version="1.0"?>
-<DynPlacement.Document>
-<Config>
<Paths/>
<Path>C:\Program Files\Lockheed Martin\Prepar3D v4\Ecosystem\Europe\Italy\Ancona\scenery</Path>
</Config>
</DynPlacement.Document>

besten dank für eure hilfe

Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben

Content-ID: 351290

Url: https://administrator.de/contentid/351290

Ausgedruckt am: 24.11.2024 um 06:11 Uhr

1 Kommentar

Set xmlDoc = _
  CreateObject("Microsoft.XMLDOM")  

xmlDoc.Async = False
xmlDoc.Load("C:\Program Files\Lockheed Martin\Prepar3D v4\ATiLibs\Scenery\OF_Config.xml")  

Set objRecord = xmlDoc.createElement("Path")  
objRecord.Text = "C:\Program Files\Lockheed Martin\Prepar3D v4\Ecosystem\Europe\Italy\ATiAncona\scenery"  

xmlDoc.SelectSingleNode("/DynPlacement.Document/Config").appendChild objRecord  
xmlDoc.Save ("C:\Program Files\Lockheed Martin\Prepar3D v4\ATiLibs\Scenery\OF_Config.xml")  