Solved

Help with appending data elememt from xmlfile1 to xmlfil2 based on identical IDs

Posted on 2014-02-25
18
183 Views
Last Modified: 2014-08-01
Hi,


If file1.xml contains

<Table1>
<SN>10411</SN>
<NSC>ITEMA</NSC>
</Table1>
<Table1>
<SN>10412</SN>
<NSC>ITEMB</NSC>
</Table1>
<Table1>
<SN>10421</SN>
<NSC>ITEMC</NSC>
</Table1>
<Table1>
<SN>10521</SN>
<NSC>ITEMD</NSC>
</Table1>
<Table1>
<SN>10611</SN>
<NSC>ITEME</NSC>
</Table1>


and file2.xml contains

<Table1>
<SN>10411</SN>
<NSD>ITEMY</NSD>
</Table1>
<Table1>
<SN>10412</SN>
<NSD>ITEMV</NSD>
</Table1>
<Table1>
<SN>10421</SN>
<NSD>ITEMW</NSD>
</Table1>

How do I append NSD IN file1.xml where N have identical values using VB.NET?

Victor
0
Comment
Question by:vcharles
  • 9
  • 7
  • 2
18 Comments
 
LVL 63

Expert Comment

by:Fernando Soto
ID: 39887891
The file1.xml does NOT have a node with NSD in it. Also please show what you want the resulting file2.xml to look like after the operation is complete.
0
 

Author Comment

by:vcharles
ID: 39887944
Hi,

Just read your post. Based on the example I gave, File3.xml should look as follows:

<Table1>
<SN>10411</SN>
<NSC>ITEMA</NSC>
<NSD>ITEMY</NSD>
</Table1>
<Table1>
<SN>10412</SN>
<NSC>ITEMB</NSC>
<NSD>ITEMV</NSD>
</Table1>
<Table1>
<SN>10421</SN>
<NSC>ITEMC</NSC>
<NSD>ITEMV</NSD>
</Table1>
<Table1>
<SN>10521</SN>
<NSC>ITEMD</NSC>
</Table1>
<Table1>
<SN>10611</SN>
<NSC>ITEME</NSC>
</Table1>
0
 
LVL 63

Expert Comment

by:Fernando Soto
ID: 39888513
OK, having the new file1.xml and the old file2.xml what should the new file2.xml look like.?
0
Master Your Team's Linux and Cloud Stack

Come see why top tech companies like Mailchimp and Media Temple use Linux Academy to build their employee training programs.

 
LVL 52

Expert Comment

by:Carl Tawn
ID: 39888697
You need something along the lines of the following:
        '// assuming "doc1" has file1 loaded and "doc2" has file2 loaded

        Dim nodes As XmlNodeList = doc2.SelectNodes("//Table1")
        Dim copyNode As XmlNode
        Dim targetNode As XmlNode

        For Each node As XmlNode In nodes

            targetNode = doc1.SelectSingleNode("//Table1[SN='" & node("SN").InnerText & "']")
            If Not targetNode Is Nothing Then
                copyNode = targetNode.OwnerDocument.ImportNode(node("NSD"), True)
                targetNode.AppendChild(copyNode)
            End If

        Next

Open in new window

0
 

Author Comment

by:vcharles
ID: 39888952
Hi,

Once I combine the data element from file2 with file1 to create a new file, I don't need file2.

Thanks,

Victor
0
 
LVL 52

Expert Comment

by:Carl Tawn
ID: 39889043
OK, so ditch it then. The code i posted appends the nodes to file1, you just need to call Save() on the XmlDocument object to commit it to disk. You can do what you like with file2 after that point.
0
 

Author Comment

by:vcharles
ID: 39889053
Hi,

I will try it and get back to you.

Thank You.

Victor
0
 
LVL 63

Expert Comment

by:Fernando Soto
ID: 39889695
Hi Victor;

It looks like the two XML files are NOT well formed, they are both missing a root node and therefore cannot be loaded into an XML Document. Does the actual documents have a root node and if not is there an issue of adding one?
0
 

Author Comment

by:vcharles
ID: 39889724
Hi,

What I initially posted was just an example, I forgot to include the <Root> </Root> nodes. Yes, please inlcude them.

Thanks,

Victor
0
 
LVL 63

Accepted Solution

by:
Fernando Soto earned 500 total points
ID: 39889865
Hi Victor;

This should give you what you are looking for.

' Load the file1.xml and file2.xml into memory
Dim f1 = XDocument.Load("C:\Working Directory\file1.xml")
Dim f2 = XDocument.Load("C:\Working Directory\file2.xml")

' Query both documents and Join on the SN node in each 
Dim results = From n1 In f1.Descendants("Table1") _
              Join n2 In f2.Descendants("Table1") On n1.Element("SN").Value Equals n2.Element("SN").Value _
              Select n1, n2

' Add the NSD node in file2.xml to the corresponding node in file1.xml
For Each pair in results
    pair.n1.Add(pair.n2.Element("NSD"))
Next

' Save file1.xml as file3.xml
f1.Save("C:\Working Directory\file3.xml")

Open in new window

0
 

Author Comment

by:vcharles
ID: 39890171
Thank You. I will try it and get back to you.
0
 

Author Comment

by:vcharles
ID: 39890389
Hi,

How do I declare XDocument? tried to declare it XMLDocument but that didn't work.

V.
0
 
LVL 63

Expert Comment

by:Fernando Soto
ID: 39890400
Imports System.Xml.Linq

and is found in the dll System.Xml.Linq.dll
0
 

Author Comment

by:vcharles
ID: 39893783
Hi,

It worked perfectly.

Thanks,

Victor
0
 
LVL 63

Expert Comment

by:Fernando Soto
ID: 39894756
Not a problem, glad to help.
0
 

Author Comment

by:vcharles
ID: 40233841
Hi Fernando,

I am receiving error message  "Object reference not set to an instance of an object." on line:
 Join n2 In f2.Descendants("Table1") On n1.Element("SN").Value Equals n2.Element("SN").Value
and n2.Element("SN").Value  is highlighted as specific cause of error.

which I think is because some records don't have any matching values, for example file1 may have an SN where there is no matching SN in file 2.

How do I avoid this error?

Thanks,

Victor
0
 
LVL 63

Expert Comment

by:Fernando Soto
ID: 40234188
Hi Victor;

Please open a new question for this. You can post here the link to the new post and I will have a look. In your new post please post sample xml files that cause the specific error.

Thanks.
0
 

Author Comment

by:vcharles
ID: 40234346
OK. Will do.

Thanks,

Victor
0

Featured Post

Free Tool: Path Explorer

An intuitive utility to help find the CSS path to UI elements on a webpage. These paths are used frequently in a variety of front-end development and QA automation tasks.

One of a set of tools we're offering as a way of saying thank you for being a part of the community.

Question has a verified solution.

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

Welcome my friends to the second instalment and follow-up to our Minify and Concatenate Your Scripts and Stylesheets (http://www.experts-exchange.com/Programming/Languages/.NET/ASP.NET/A_4334-Minify-and-Concatenate-Your-Scripts-and-Stylesheets.html)…
If you need to start windows update installation remotely or as a scheduled task you will find this very helpful.
This video shows how to quickly and easily add an email signature for all users on Exchange 2016. The resulting signature is applied on a server level by Exchange Online. The email signature template has been downloaded from: www.mail-signatures…
I've attached the XLSM Excel spreadsheet I used in the video and also text files containing the macros used below. https://filedb.experts-exchange.com/incoming/2017/03_w12/1151775/Permutations.txt https://filedb.experts-exchange.com/incoming/201…

856 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