jaiprakash15 8 Light Poster

Dear All,

AM creating a XML file from my Database. I have created Sucessfully and now i need to append a another node to this below XML file

Ex : <TaskName Value="PS0002440" Status="Process" />

I use the following code to create this below XML file. Am passing the Value and status to this function to create the node and attribute..Can some one help me how to append new node without overwriting the existing one..

Public Sub xmlwrite(ByVal TaskId As String, ByVal Status As String)
Dim Tskid, Stats As String
Tskid = TaskId.ToString.Trim
Stats = Status.ToString.Trim
Dim myDoc As New Xml.XmlDocument
Dim rootTask As Xml.XmlNode = myDoc.AppendChild(myDoc.CreateElement("Task"))
Dim TaskStatusElements As Xml.XmlElement

TaskStatusElements = myDoc.CreateElement("TaskName")
With TaskStatusElements
.Attributes("Value").Value = Tskid
.Attributes("Status").Value = Stats
End With
Dim myWriter As New Xml.XmlTextWriter("d:\test.xml", System.Text.Encoding.UTF8)

myWriter.Formatting = Xml.Formatting.Indented

End Sub

<?xml version="1.0" encoding="utf-8"?>
<TaskName Value="PS0002439" Status="Open" />

Thanks and Regards,