XPath-Zählung in VBScript

Ich versuche, um die Anzahl der speziellen Knoten in einer XML Datei mit der XPath-Funktion count, jedoch hält diese Rückkehr zu einer Fehlermeldung "Eine Ausnahme vom Typ 'msxml3.dll: Ausdruck nicht wieder eine DOM-Knoten."

Wie bekomme ich den return-Wert aus einer XPath-Anzahl durch die Verwendung von VBScript und MSXML-DOM

Dim oXML    
Dim homeId
Dim awayId
Dim homeGoals
Dim awayGoals
Set oXML = Server.CreateObject("Microsoft.XMLDOM")

oXML.async = false
oXML.SetProperty "SelectionLanguage", "XPath"
oXML.SetProperty "ServerHTTPRequest", True
oXML.validateOnParse = False
oXML.resolveExternals = False

fileName = "http://server:8090/data/results/m12345.xml")
oXML.load (fileName)

homeId = oXML.SelectSingleNode("/SoccerMatch/Team[@homeOrAway='Home']/@id").text
awayId = oXML.SelectSingleNode("/SoccerMatch/Team[@homeOrAway='Away']/@id").text
Set homeGoals = oXML.SelectSingleNode("count(/SoccerMatch/Goals/Goal[@teamId="&homeId&"])")
Set awayGoals = oXML.SelectSingleNode("count(/SoccerMatch/Goals/Goal[@teamId="&awayId&"])")

InformationsquelleAutor Xetius | 2009-02-27

Schreibe einen Kommentar