Como - Contar array de un xml

[Potro]

Hola mis estimados tengo la siguiente pregunta.


con este codigo leo registros de un xml


'Llamamos al XML
url = "XML/xml.xml"
set xmlhttp = CreateObject("Microsoft.XMLHTTP") ' objeto para windows 2000 server
xmlhttp.open "GET", url, false
xmlhttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
xmlhttp.send ""



For Each objItem in xmlhttp.responseXML.SelectNodes("aspxml/contents/Content")

'Response.Write ("ID: " & objItem.SelectSingleNode("ID").text & "<br>")
Response.Write ("Evento: " & objItem.SelectSingleNode("evento").text & "<br>")
Response.Write ("Lugar: " & objItem.SelectSingleNode("lugar").text & "<br>")
'Response.Write ("ID Estado: " & objItem.SelectSingleNode("estado").text & "<br>")
Response.Write ("Fecha: " & CDate(objItem.SelectSingleNode("fecha").text) & "<br>")
Response.Write ("<img src=img_eventos/" & objItem.SelectSingleNode("tipo").text & ".jpg width=50 height=50><br><hr>")

Next


Todo jala bien.


Mi pregunta es saber cuantos registros obtendre de ese XML y no se como hacerle espero que me puedan ayudar como siempre saludos...




******************

[David]

Tal vez con:

Código vb:

xmlhttp.responseXML.SelectNodes("aspxml/contents/Content").Count
 

[Potro]

Gracias por contestar amigo pero al ponerlo me saca el siguiente error..


Error Type:
Microsoft VBScript runtime (0x800A01B6)
Object doesn't support this property or method: 'xmlhttp.responseXML.SelectNodes(...).Count'

Sabes de que otra forma podria ser..



Saludos:::::::::::

[David]

Teóricamente debería funcionar . ¿Lo asignaste a alguna variable o dónde lo pusiste?. La única otra opción que se me ocurre es poner un contador en el bucle For, así al final del bucle sabrás cuántos elementos tiene.

[Potro]

Lo puse asi.


'Llamamos al XML
url = "XML/xml.xml"
set xmlhttp = CreateObject("Microsoft.XMLHTTP") ' objeto para windows 2000 server
xmlhttp.open "GET", url, false
xmlhttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
xmlhttp.send ""



For Each objItem in xmlhttp.responseXML.SelectNodes("aspxml/contents/Content")

'Response.Write ("ID: " & objItem.SelectSingleNode("ID").text & "<br>")
Response.Write ("Evento: " & objItem.SelectSingleNode("evento").text & "<br>")
Response.Write ("Lugar: " & objItem.SelectSingleNode("lugar").text & "<br>")
'Response.Write ("ID Estado: " & objItem.SelectSingleNode("estado").text & "<br>")
Response.Write ("Fecha: " & CDate(objItem.SelectSingleNode("fecha").text) & "<br>")
Response.Write ("<img src=img_eventos/" & objItem.SelectSingleNode("tipo").text & ".jpg width=50 height=50><br><hr>")

Response.Write (xmlhttp.responseXML.SelectNodes("aspxml/contents/Content").Count)

Next


Bueno y como podria hacer el contador que dices de la segunda opcion....


Mil gracias por la ayuda...

[AlZuwaga]

Lo del .Count también lo había pensado pero no respondí porque no estaba del todo seguro. Lo del contador en el bucle también lo pensé, pero lo descarté por que Potro pide:

Mi pregunta es saber cuantos registros obtendré de ese XML

... y el resultado del contador es posterior a la "obtención" de los registros

[David]

Algo así:

Código asp:

Contador = 0
For Each objItem in xmlhttp.responseXML.SelectNodes("aspxml/contents/Content")
'Código
Contador = Contador + 1
Next
Response.Write("Total Datos: " + Contador)
 

EDITO: Tienes razón Al_Zuwaga, pero al final mirando en el código, puso el .Count dentro del bucle, lo que me hizo pensar que tal vez serviría después de la obtención de los datos .

[Potro]

Mil gracias David el Grande, con esto ya pude resolver cuantos registros me envia ya con algunos If lo ire formando como necesito que quede pero con esto me has ayudado bastante, gracias y espero que sigas ayudando a pobrecitos como uno jajajaja


y tambien gracias Al Zuwaga por leer mi post...

...................