<> 0 entonces
objNode dévil, objSubNode, strCurrentCat, intCatCount
strCurrentCat = ""
intCatCount = 0
Hacer
Fijar el objNode = objResults.nextNode ()
Si el objNode no es nada entonces salir hace
Fijar el objSubNode = objNode.selectSingleNode (la “categoría”)
Si no el objSubNode entonces no es nada
Si no strCurrentCat = LCase (objSubNode.text) entonces
intCatCount = 0
strCurrentCat = LCase (objSubNode.text)
Response.Write ““y strCurrentCat y”“
Terminar si
intCatCount = intCatCount + 1
Si intCatCount < 4="" Then="" strNodeName="pname" :="" Response="">“
strNodeName = “psubname”: strNodeName de Response.Write y”: “y getNodeValue (objNode.selectSingleNode (strNodeName)) y” “
strNodeName = “lprice1”: strNodeName de Response.Write y”: “y getNodeValue (objNode.selectSingleNode (strNodeName)) y” “
strNodeName = “lprice2”: strNodeName de Response.Write y”: “y getNodeValue (objNode.selectSingleNode (strNodeName)) y” “
strNodeName = “lprice3”: strNodeName de Response.Write y”: “y getNodeValue (objNode.selectSingleNode (strNodeName)) y” “
strNodeName = “mprice1”: strNodeName de Response.Write y”: “y getNodeValue (objNode.selectSingleNode (strNodeName)) y” “
strNodeName = “mprice2”: strNodeName de Response.Write y”: “y getNodeValue (objNode.selectSingleNode (strNodeName)) y” “
strNodeName = “mprice3”: strNodeName de Response.Write y”: “y getNodeValue (objNode.selectSingleNode (strNodeName)) y” “
strNodeName = “sprice1”: strNodeName de Response.Write y”: “y getNodeValue (objNode.selectSingleNode (strNodeName)) y” “
strNodeName = “sprice2”: strNodeName de Response.Write y”: “y getNodeValue (objNode.selectSingleNode (strNodeName)) y” “
strNodeName = “sprice3”: strNodeName de Response.Write y”: “y getNodeValue (objNode.selectSingleNode (strNodeName)) y” “
Response.Write “ “
Terminar si
Terminar si
Lazo
Terminar si
getNodeValue de la función (objNode)
Si no el objNode entonces no es nada
getNodeValue=objNode.text
"" del getNodeValue=
Terminar si
Terminar la función
Response.Write TypeName (objResults)
Fijar los objResults = nada
Fijar el objXML = nada
%>
|