Наши проекты:
Журнал · Discuz!ML · Wiki · DRKB · Помощь проекту |
||
ПРАВИЛА | FAQ | Помощь | Поиск | Участники | Календарь | Избранное | RSS |
[18.97.14.84] |
|
Сообщ.
#1
,
|
|
|
Друзья нужна помощь в удалении родительского узла <Placemark> если он содержит в себе узел <Point> и так нужно побеждаться по всему xml файлику.
Я к сожалению не силен в VBA, поэтому нужна помощь. <?xml version="1.0"?> <addons> <Placemark> <name>ТТ-4</name> <styleUrl>#icon-labelson-nodesc</styleUrl> <Point> <coordinates> 11.1234578,12.7451877 </coordinates> </Point> </Placemark> <Placemark> <name>ТК-8</name> <styleUrl>#icon-labelson-nodesc</styleUrl> <coordinates> 12.2556868,13.5278782 </coordinates> </Placemark> </addons> Set objXMLDoc = Wscript.CreateObject("Microsoft.XMLDOM") objXMLDoc.async = False Dim XMLFile XMLFile = "C:\TEMP\XML\000.xml" objXMLDoc.load(XMLFile) Set nodes = objXMLDoc.selectNodes("addons/Placemark/Point") For Each node In nodes ????.remove Next objXMLDoc.Save(XMLFile) MsgBox "Delete completed" |