Improve company productivity with a Business Account.Sign Up

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 425
  • Last Modified:

XML/ASP/VBS Identifying a Value of a Child node

Hi Guys,

Can someone please help me understand the following:

I get a SOAP request back from a 3rd party and I need to get the following info:

EmailAddress, Name, and the [SubscriberCustomField] MemberNo.  I can get the first two with the attached code however I don't know the syntax to search through the node "SubscriberCustomField" and find the <value> where the <key> = "MemberNo".

Can someone point me in the right direction please?

Cheers!
JetGrrrL


Set objSubs = XmlDoc.selectNodes("//Subscriber")
For Each objSubInfo In objSubs
   Set colInfo = objSubInfo.childNodes
   Response.write "Email:", colInfo.Item(0).Text
   Response.write "Name:", colInfo.Item(1).Text
Next
 
 
<Subscribers.GetBouncedResponse xmlns="http://sadsdsddsfsdf">
	<Subscribers.GetBouncedResult>
	<Subscriber>
		<EmailAddress>random@here.com</EmailAddress>
		<Name>Random</Name>
		<Date>21-12-2009</Date>
		<State>NSW</State>
		<SubscriberCustomField>
			<Key>MemberNo</Key>
			<Value>123456</Value>
			<Key>MemberType</Key>
			<Value>Green</Value>
		</SubscriberCustomField>
	</Subscriber>
	<Subscriber>
		<EmailAddress>random@here.com.au</EmailAddress>
		<Name>Random3</Name>
		<Date>21-11-2009</Date>
		<State>NSW</State>
		<SubscriberCustomField>
			<Key>MemberNo</Key>
			<Value></Value>
			<Key>MemberType</Key>
			<Value></Value>
		</SubscriberCustomField>
	</Subscriber>
	</Subscribers.GetBouncedResult>
</Subscribers.GetBouncedResponse>

Open in new window

0
jetgrrrl
Asked:
jetgrrrl
1 Solution
 
sybeCommented:
Basically it works the same all the way. Each node can have childnodes, and you can use the same way of coding to loop through it.


Set oSubscriberNodes =  = XmlDoc.selectNodes("//Subscriber")
For each oSingleSubscriberNode in oSubscriberNodes
    Response.write "Email: " & oSingleSubscriberNode.selectSingleNode("EmailAddress").Text & "<br>"
    Response.write "Name: " & oSingleSubscriberNode.selectSingleNode("Name").Text & "<br>"
    Response.write "Date: " & oSingleSubscriberNode.selectSingleNode("Date").Text & "<br>"
    For each oCustomFieldNode In oSingleSubscriberNode.selectSingleNode("SubscriberCustomField")
        Response.write "Customfield, Name = " oCustomFieldNode.Name & ", Value: " & oCustomFieldNode.Name & "<br>"
    Next
Next

Open in new window

0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

Featured Post

What Kind of Coding Program is Right for You?

There are many ways to learn to code these days. From coding bootcamps like Flatiron School to online courses to totally free beginner resources. The best way to learn to code depends on many factors, but the most important one is you. See what course is best for you.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now