Load xml into datagridview by column name and type

[Jameslooi]

I have below xml. But when I try to load into datagridview. My code doesn't work well, can anyone help?

<Records>
 <Record>
 <Product>
  <Column name="Serial">N110879987</Column>
  <Column name="Product">QWX4T6YU</Column>
  <Column name="Date">2012-08-10</Column>
 </Product>
 <Operations>
 <Operation type="SETUP">
  <Column name="TimeStamp">2012-08-10</Column>
  <Column name="Status">Success</Column>
 </Operation>
 <Operation type="RUN">
  <Column name="TimeStamp">2012-08-11</Column>
  <Column name="Status">Done</Column>
 </Operation>
 </Operations>
</Record>
 <Record>
 <Product>
  <Column name="Serial">N110879988</Column>
  <Column name="Product">QWX4T6YU</Column>
  <Column name="Date">2012-08-12</Column>
 </Product>
 <Operations>
 <Operation type="SETUP">
  <Column name="TimeStamp">2012-08-12</Column>
  <Column name="Status">Success</Column>
 </Operation>
 <Operation type="RUN">
  <Column name="TimeStamp">2012-08-12</Column>
  <Column name="Status">Done</Column>
 </Operation>
 </Operations>
</Record>
</Records>

Below is my code, it doesn't work..

Dim dt As New DataTable
Dim newRow As DataRow
Dim ds As New DataSet()
Dim doc As New Xml.XmlDocument
doc.Load("C:\Temp\N11.xml")
 
        Dim dt As New DataTable
        Dim newRow As DataRow
        dt.Columns.Add("Serial")
        dt.Columns.Add("Product")
        dt.Columns.Add("Date")
 
        dt.Columns.Add("Operation")
        dt.Columns.Add("TimeStamp")
        dt.Columns.Add("Status")
 


For Each n As XmlNode In doc.SelectNodes("Records/Record/Product/Column")
   newRow = dt.NewRow
           
   newRow(n.Attributes("name").Value) = n.InnerText
        
  For Each n1 As XmlNode In doc.SelectNodes("Records/Record/Operations/Operation")
    newRow = dt.NewRow
    newRow("Operation") = n1.Attributes("type").Value

     For Each n2 As XmlNode In doc.SelectNodes("Records/Record/Operations/Operation[@type='" & n1.Attributes("type").Value & "']/Column")
                   
         newRow(n2.Attributes("name").Value) = n2.InnerText

      Next
      dt.Rows.Add(newRow)
   Next
Next
 
  DataGridView1.DataSource = dt

Below is my idle output...