tags:

views:

1832

answers:

4
+1  Q: 

Asp XML Parsing

Hi

I am new to asp and have a deadline in the next few days. i receive the following xml from within a webservice response.

print("<?xml version="1.0" encoding="UTF-8"?>
<user_data>
<execution_status>0</execution_status>
<row_count>1</row_count>
<txn_id>stuetd678</txn_id>
<person_info>
    <attribute name="firstname">john</attribute>
    <attribute name="lastname">doe</attribute>
    <attribute name="emailaddress">[email protected]</attribute>
</person_info>
</user_data>");

How can i parse this xml into asp attributes?

Any help is greatly appreciated

Thanks Damien

On more analysis, some soap stuff is also returned as the aboce response is from a web service call. can i still use lukes code below?

A: 

That doesn't appear to be XML! If it really is XML you're trying to parse, and SA sanitized it, a quick google search should set you on your way.

William Keller
Hi WilliamSorry yeah i forgot to wrap it in print_code.I have fixed it now
Damo
+4  A: 

You need to read about MSXML parser. Here is a link to a good all-in-one example http://oreilly.com/pub/h/466

Some reading on XPath will help as well. You could get all the information you need in MSDN.

Stealing the code from Luke excellent reply for aggregation purposes:

Dim oXML, oNode, sKey, sValue

Set oXML = Server.CreateObject("MSXML2.DomDocument.6.0") 'creating the parser object
oXML.LoadXML(sXML) 'loading the XML from the string

For Each oNode In oXML.SelectNodes("/user_data/person_info/attribute")
  sKey = oNode.GetAttribute("name")
  sValue = oNode.Text
  Select Case sKey
    Case "execution_status"
    ... 'do something with the tag value
    Case else
    ... 'unknown tag
  End Select
Next

Set oXML = Nothing
Ilya Kochetov
A: 

You could try loading the xml into the xmldocument object and then parse it using it's methods.

Paulj
+3  A: 

By ASP I assume you mean Classic ASP? Try:

Dim oXML, oNode, sKey, sValue

Set oXML = Server.CreateObject("MSXML2.DomDocument.4.0")
oXML.LoadXML(sXML)

For Each oNode In oXML.SelectNodes("/user_data/person_info/attribute")
  sKey = oNode.GetAttribute("name")
  sValue = oNode.Text
  ' Do something with these values here
Next

Set oXML = Nothing

The above code assumes you have your XML in a variable called sXML. If you are consuming this via an ServerXMLHttp request, you should be able to use the ResponseXML property of your object in place of oXML above and skip the LoadXML step altogether.

Luke Bennett