Solved

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

Posted on 2009-04-14
2
398 Views
Last Modified: 2012-05-06
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
Comment
Question by:jetgrrrl
2 Comments
 
LVL 28

Accepted Solution

by:
sybe earned 500 total points
ID: 24145002
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

Featured Post

3 Use Cases for Connected Systems

Our Dev teams are like yours. They’re continually cranking out code for new features/bugs fixes, testing, deploying, testing some more, responding to production monitoring events and more. It’s complex. So, we thought you’d like to see what’s working for us.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

I was asked about the differences between classic ASP and ASP.NET, so let me put them down here, for reference: Let's make the introductions... Classic ASP was launched by Microsoft in 1998 and dynamically generate web pages upon user interact…
This is pretty cool.  The purpose of this VB Script is to help you document where JAR (Java ARchive) files and specifically java class files are located so that you can address issues seen with a client or that you can speak intelligently with a dev…
Get a first impression of how PRTG looks and learn how it works.   This video is a short introduction to PRTG, as an initial overview or as a quick start for new PRTG users.
This video demonstrates how to create an example email signature rule for a department in a company using CodeTwo Exchange Rules. The signature will be inserted beneath users' latest emails in conversations and will be displayed in users' Sent Items…

930 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

9 Experts available now in Live!

Get 1:1 Help Now