ASP - Parse elements in XML feed

Author

Parse elements in XML feed

glbdev@gmail.com

2007-04-21, 6:55 pm

I need to pull items out of an XML feed.

Here is an example of the XML file:
- <TopNode>
- <XmlFeed>
- <GetListInCategory>
- <Data Count="937">
- <Table>
<EventID>567343</EventID>
<Event>NHL playoffs</Event>
<Date>2007-04-21T00:00:00.0000000-05:00</Date>
<Time>10:00 PM</Time>
<CategoryID>26</CategoryID>
<HeadlinerID>101828</HeadlinerID>
<VenueID>115920</VenueID>
</Table>
</data>
</GetListInCategory>
</TopNode>

I need to pull each item out of the <TABLE> node, such as
<CategoryID>. The current code I am using now pulls ALL the data but
I cannot access the invidual elements.

Here is my current code:

dim objHTTP
dim objXML
set objHTTP = Server.CreateObject("Microsoft.XMLHTTP")
objHTTP.open "GET","https://secure.myxmlfeed", false
objHTTP.send
set objXML = server.CreateObject("microsoft.xmldom")
objXML.async=false
objXML.load(objhttp.responsebody)
Response.Write(objxml.xml)

Can anyone tell me how to do this?

- Steve

Anthony Jones

2007-04-22, 3:55 am

<glbdev@gmail.com> wrote in message
news:1177192579.567005.51270@l77g2000hsb.googlegroups.com...
> I need to pull items out of an XML feed.
>
> Here is an example of the XML file:
> - <TopNode>
> - <XmlFeed>
> - <GetListInCategory>
> - <Data Count="937">
> - <Table>
> <EventID>567343</EventID>
> <Event>NHL playoffs</Event>
> <Date>2007-04-21T00:00:00.0000000-05:00</Date>
> <Time>10:00 PM</Time>
> <CategoryID>26</CategoryID>
> <HeadlinerID>101828</HeadlinerID>
> <VenueID>115920</VenueID>
> </Table>
> </data>
> </GetListInCategory>
> </TopNode>
>
> I need to pull each item out of the <TABLE> node, such as
> <CategoryID>. The current code I am using now pulls ALL the data but
> I cannot access the invidual elements.
>
> Here is my current code:
>
> dim objHTTP
> dim objXML
> set objHTTP = Server.CreateObject("Microsoft.XMLHTTP")

Don't use the XMLHTTP in ASP it's not threadsafe. Use:-

Set objHTTP = Server.CreateObject("MSXML2.ServerXMLHTTP.3.0")

> objHTTP.open "GET","https://secure.myxmlfeed", false
> objHTTP.send

> set objXML = server.CreateObject("microsoft.xmldom")
> objXML.async=false
> objXML.load(objhttp.responsebody)

If the remote source is behaving itself and sending a content-type header
with the value "text/xml" then you need only:-

Set objXML = objHTTP.ResponseXML

> Response.Write(objxml.xml)
>
> Can anyone tell me how to do this?

Dim oTable
Dim oNode

Set oTable =
objXML.selectSingleNode("/TopNode/XMLFeed/GetListInCategory/Data/Table")

For Each oNode In oTable.selectNodes("*")
Response.Write oNode.tagName & " = " & oNode.Text & "<br />"
Next

>
> - Steve
>

Pupkin

2007-04-22, 3:55 am

Google the RSS2HTML code. It can be easily customized to take any XML
doc and use it as a sort of lightweight database for web apps.

> I need to pull items out of an XML feed.
>
> Here is an example of the XML file:
> - <TopNode>
> - <XmlFeed>
> - <GetListInCategory>
> - <Data Count="937">
> - <Table>
> <EventID>567343</EventID>
> <Event>NHL playoffs</Event>
> <Date>2007-04-21T00:00:00.0000000-05:00</Date>
> <Time>10:00 PM</Time>
> <CategoryID>26</CategoryID>
> <HeadlinerID>101828</HeadlinerID>
> <VenueID>115920</VenueID>
> </Table>
> </data>
> </GetListInCategory>
> </TopNode>
>
> I need to pull each item out of the <TABLE> node, such as
> <CategoryID>. The current code I am using now pulls ALL the data but
> I cannot access the invidual elements.
>
> Here is my current code:
>
> dim objHTTP
> dim objXML
> set objHTTP = Server.CreateObject("Microsoft.XMLHTTP")
> objHTTP.open "GET","https://secure.myxmlfeed", false
> objHTTP.send
> set objXML = server.CreateObject("microsoft.xmldom")
> objXML.async=false
> objXML.load(objhttp.responsebody)
> Response.Write(objxml.xml)
>
> Can anyone tell me how to do this?
>
> - Steve
>
>

glbdev@gmail.com

2007-04-22, 6:56 pm

Thanks Anthony, I appreciate it. I will give this a try later this
afternoon.

- Gust
-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

On Apr 22, 3:22 am, "Anthony Jones" <A...@yadayadayada.com> wrote:

> <glb...@gmail.com> wrote in message
>
> news:1177192579.567005.51270@l77g2000hsb.googlegroups.com...
>
>
>
>
>
>
>
>
>
>
> Don't use the XMLHTTP in ASP it's not threadsafe. Use:-
>
> Set objHTTP = Server.CreateObject("MSXML2.ServerXMLHTTP.3.0")
>
>
> If the remote source is behaving itself and sending a content-type header
> with the value "text/xml" then you need only:-
>
> Set objXML = objHTTP.ResponseXML
>
>
>
> Dim oTable
> Dim oNode
>
> Set oTable =
> objXML.selectSingleNode("/TopNode/XMLFeed/GetListInCategory/Data/Table")
>
> For Each oNode In oTable.selectNodes("*")
> Response.Write oNode.tagName & " = " & oNode.Text & "<br />"
> Next
>
>
>
>
>
>
> - Show quoted text -- Hide quoted text -
>
> - Show quoted text -

glbdev@gmail.com

2007-04-22, 6:56 pm

Pupkin,

I never heard of RSS2HTML but will look into it.

Thanks,
- Steve
========================================
========================================
==========================

On Apr 22, 3:25 am, Pupkin <spamag...@dorrk.com> wrote:
> Google the RSS2HTML code. It can be easily customized to take any XML
> doc and use it as a sort of lightweight database for web apps.
>
>
>
>
>
>
>
>
>
>
> - Show quoted text -

Sponsored Links