[RESOLVED] XML : Add Nodes in between the specific Node

[dhilip81]

hi this is my xml doc

  <Values>
    <quantity>0</quantity>
   <Extenstion>0/Extenstion>
    <FolderList>
       <Folder>
        <FolderName>E:\05.09.2016</FolderName>
        <Checked>true</Checked>
      </Folder>

      <Folder>
        <FolderName>E:\100CANON</FolderName>
        <Checked>true</Checked>
      </Folder>

      <Folder>
        <FolderName>G:\Sony</FolderName>
        <Checked>true</Checked>
      </Folder>

    </FolderList>
  </Values>

i want to add <Folder> node with 2 notes in between <FolderList>... </FolderList>

two nodes like

 <Folder>
       <FolderName>E:\Nikon</FolderName>
        <Checked>true</Checked>
 </Folder>
....
...
..

every time i add/select the folder which one want to added into this <FolderList> .... node

Thanks

[KGComputers]

You need XmlNode.AppendChild Method (XmlNode) to achieve that.

Example: Adding a new Node to existing XML document

[dhilip81]

thank KGC ...

my final code is here

Public Function UpdateFolderListsIntoXML(_folderPath$) As Boolean
Dim _xdoc As New XDocument()
 Try
 'Loading: 
        _xdoc = XDocument.Load(PXmlFileName)
        Dim _lamIsElementExists = Function(_elementName$)
                                      Dim _folderlistElement As XElement
                                      Try
                                          _folderlistElement = _xdoc.Root.Element(_elementName$)
                                          If Not IsNothing(_folderlistElement) Then
                                              Return True
                                          Else
                                              Return False
                                          End If
                                      Catch ex As Exception
                                          Return False
                                      Finally
                                          _folderlistElement = Nothing
                                      End Try
                                  End Function
        If _lamIsElementExists("FolderList") = False Then
            'create FolderList element
            _xdoc.Root.Element("FolderSettings").Add(<FolderList>
                                                     </FolderList>)
            _xdoc.Save(PXmlFileName)
            'After Create "FolderList" Element loading xml file again
            _xdoc = XDocument.Load(PXmlFileName)
        End If
        'Add New Path into FolderList Element
        Dim element = <Folder>
                          <FolderName><%= _folderPath$ %></FolderName>
                          <Checked><%= "true" %></Checked>
                      </Folder>
        Dim parent = _xdoc...<FolderList>.FirstOrDefault()
        parent.Add(element)
        _xdoc.Save(PXmlFileName)
        Return True
    Catch ex As Exception
        PeX = ex
        Return False
    Finally
  _xdoc = Nothing
    End Try
End Function