title: append new node in XML in classic ASP
body: <p>Hello Friends i am working on classic ASP project and i am using an XML file to do CRUD Operation. When file does not exist it is working fine to save data in it but file already exist how to append new record data in it ? my code :</p>
  
  <pre><code>If Not objFSO.FileExists( xmlFile ) Then 
  
                  objFSO.CreateTextFile( xmlFile )
                  set objWrite = objFSO.OpenTextFile( xmlFile, 2 )
                  objWrite.WriteLine("&lt;?xml version=""1.0"" encoding=""ISO-8859-1""?&gt;")
                  objWrite.WriteLine(tb &amp; "&lt;Slider&gt;")
                  objWrite.WriteLine(tb &amp; tb &amp; "&lt;Header&gt;" &amp; Uploader.Form("headerText") &amp; "&lt;/Header&gt;")
                  objWrite.WriteLine(tb &amp; tb &amp; "&lt;Image&gt;" &amp; File.FileName &amp; "&lt;/Image&gt;")
                  objWrite.WriteLine(tb &amp; tb &amp; "&lt;Link&gt;" &amp; Uploader.Form("linkcontentText") &amp; "&lt;/Link&gt;")
                  objWrite.WriteLine(tb &amp; tb &amp; "&lt;Description&gt;" &amp; Uploader.Form("SliderText") &amp; "&lt;/Description&gt;")
                  objWrite.WriteLine(tb &amp; "&lt;/Slider&gt;")
  
              End IF
              If objFSO.FileExists( xmlFile ) Then
              'append code , i have tried this but not working
              Set xmlDoc = CreateObject("Scripting.FileSystemObject")
                xmlDoc.async = False
                xmlDoc.load(Server.MapPath(xmlFile)
                Set fieldName = xmlDoc.createElement("Slider")
                Set attID = xmlDoc.createAttribute("Header")
                Set attID1 = xmlDoc.createAttribute("Image")
                Set attID2 = xmlDoc.createAttribute("Link")
                Set attID3 = xmlDoc.createAttribute("Description")
                attID.Text =  Uploader.Form("headerText")
                attID1.Text = File.FileName
                attID2.Text = Uploader.Form("linkcontentText")
                attID3.Text = Uploader.Form("SliderText")
                fieldName.setAttributeNode attID 
                fieldName.setAttributeNode attID1
                fieldName.setAttributeNode attID2
                fieldName.setAttributeNode attID3
                'xmlDoc.a
                'xmlDoc.Save(Server.MapPath("menu1.xml"))
  
              End If
  </code></pre>
  
  <p>please suggest me some solutions.</p>