troubleshooting Question

VB6/XML Node List loop. HELP !!!!!

Avatar of Madmarlin
Madmarlin asked on
Visual Basic Classic
7 Comments1 Solution909 ViewsLast Modified:
Hi experts.
I need your urgent help...again!!

I have the following funciton:
Private Function GrabAccountPAN(ByVal sAgreementNumber As String, ByVal oAccountNodes As MSXML2.IXMLDOMNodeList) As String

Within this function I need to loop through all accounts within the nodes list and check whether the ACC-NO node value = sAgreementNumber. If it does then the return value of the function will be the PAN-No value from the same account. If not then move onto the next account.
Note there can be x number if accounts

I will increase the number of points if complete source is provided and with a quick response.



The an exmaple Node list can be found below:

<ACCOUNTS id="1">
<field section="" name="ACCT-TYPE" type="text" start="6798" length="1" value="O"/>
<field section="" name="ACC-NO" type="text" start="6799" length="16" value="9999999999999999"/>
<field section="" name="PAN-NO" type="text" start="6991" length="16" value="1111111111111111"/>
</ACCOUNTS>
<ACCOUNTS id="2">
<field section="" name="ACCT-TYPE" type="text" start="6798" length="1" value="O"/>
<field section="" name="ACC-NO" type="text" start="6799" length="16" value="6666666666666666"/>
<field section="" name="PAN-NO" type="text" start="6991" length="16" value="2222222222222222"/>
</ACCOUNTS>
<ACCOUNTS id="3">
<field section="" name="ACCT-TYPE" type="text" start="6798" length="1" value="O"/>
<field section="" name="ACC-NO" type="text" start="6799" length="16" value="5555555555555555"/>
<field section="" name="PAN-NO" type="text" start="6991" length="16" value="3333333333333333"/>
</ACCOUNTS>



Cheers Madmarlin
Join the community to see this answer!
Join our exclusive community to see this answer & millions of others.
Unlock 1 Answer and 7 Comments.
Join the Community
Learn from the best

Network and collaborate with thousands of CTOs, CISOs, and IT Pros rooting for you and your success.

Andrew Hancock - VMware vExpert
See if this solution works for you by signing up for a 7 day free trial.
Unlock 1 Answer and 7 Comments.
Try for 7 days

”The time we save is the biggest benefit of E-E to our team. What could take multiple guys 2 hours or more each to find is accessed in around 15 minutes on Experts Exchange.

-Mike Kapnisakis, Warner Bros