Hello if every one want to update data to xml pls read below code:
my xml table
----------------------------------------
<NewDataSet >
<Table >
<ID >10</ID >
<MainWord >antha</MainWord >
<MeanWord >go any where </MeanWord >
<VoicePath><VoicePath>
<Spelling>Anaathaa</Spelling>
</Table>
<NewDataSet >
----------------------------------------
Dim
xdoc As New XmlDocument()
xdoc.Load(application.StartupPath & "\KHDic.xml")
'select specific node to update
Dim
nod As XmlNode = xdoc.SelectSingleNode("/NewDataSet/Table[ID=" & TxtID.Text & "]")
If nod IsNot Nothing Then
Dim Str$ = clsEn.EnCrypt("ទោះអំពើល្អក្ដី អាក្រក់ក្ដី ក៏ហៅថា កម្ម (កម្មជាកុសល, កម្មជាអកុសល): ទទួលកម្",TxtSpelling.Text)
nod.ChildNodes(0).InnerText = TxtID.Text
nod.ChildNodes(4).InnerText = Str
End If ' Save the Xml.
xdoc.Save(m_application.StartupPath & "\KHDic.xml")
Enter your message below
Sign in or Join us (it's free).