Set objXML = Server.CreateObject („Microsoft.XMLDOM“)
objXML.async = falsch
objXML.LoadXML (ResponsePage)
Wenn objXML.parseError.errorCode <> 0 dann
Response.Write „Störung im Laden xml“
Response.End
Beenden wenn
objXML.setProperty „SelectionLanguage“, „XPath“
'einen Hinweis auf dem Nullpunkt erhalten, den Sie löschen möchten
Wenn IST nicht objXML.selectNodes („//Gather/SMS“) (0) NICHTS dann
Einstellen SMS1 = objXML.documentElement.selectNodes („//Gather/SMS“) (0)
SMS1Text = SMS1.Text
SMS1Number = SMS1.Attributes.getNamedItem („Zahl“). Text
beenden wenn
wenn nicht objXML.selectNodes („//Gather/SMS“) (1) NICHTS dann IST
Einstellen SMS2 = objXML.documentElement.selectNodes („//Gather/SMS“) (1)
SMS2Text = SMS2.Text
SMS2Number = SMS2.Attributes.getNamedItem („Zahl“). Text
beenden wenn
Versammlung = objXML.documentElement.selectSingleNode („//Gather“) einstellen
'ihn von ihm entfernen ist Behälter
wenn isObject (SMS1) dann
Gather.removeChild (SMS1)
beenden wenn
wenn isObject (SMS2) dann
Gather.removeChild (SMS2)
beenden wenn
Für jeden Nullpunkt in objXML.childnodes
Response.Write (node.xml)
Zunächst
|