Update an XML file using a DataSet

The full tutorial is as follows. This will give a clear picture of using dataset with an XML file.

GLOBAL DECLARATION

Dim ds As New DataSet ' A globally declared DataSet and a Record Pointer
Dim intPtr As Integer

IN FORM LOAD

intPtr = 0
ds.ReadXml("C:\Temp\Emps.xml") ' Load the XML File onto the DataSet and initialize the RecordPointer
FillFields() ' Call Fill Fields Procedure

FILLFIELDS - Procedure

txtEmpID.Text = ds.Tables(0).Rows(intPtr).Item("EmpID").ToString()
txtEmpName.Text = ds.Tables(0).Rows(intPtr).Item("EmpName").ToString()
txtDOB.Text = ds.Tables(0).Rows(intPtr).Item("EmpDOB").ToString
txtDept.Text = ds.Tables(0).Rows(intPtr).Item("EmpDepartment").ToString

Navigation Forward
intPtr += 1
If intPtr > ds.Tables(0).Rows.Count - 1 Then
MessageBox.Show("EOF!")
intPtr = ds.Tables(0).Rows.Count - 1
FillFields()
Else
FillFields()
End If

Navigation Backward

intPtr -= 1
If intPtr < 0 Then
MessageBox.Show("BOF!")
intPtr = 0
Else
FillFields()
End If

ADDSAVE

MessageBox.Show("Count Before Add:" & ds.Tables(0).Rows.Count.ToString)
Dim aRow As DataRow = ds.Tables(0).NewRow

aRow("EmpID") = txtEmpID.Text
aRow("EmpName") = txtEmpName.Text
aRow("EmpDOB") = txtDOB.Text
aRow("EmpDepartment") = txtDept.Text

ds.Tables(0).Rows.Add(aRow)
ds.Tables(0).AcceptChanges()

ds.WriteXml("C:\Temp\Emps.xml")
MessageBox.Show("Count After Add : " & ds.Tables(0).Rows.Count.ToString)

MODIFY SAVE

ds.Tables(0).Rows(intPtr).Item("EmpID") = txtEmpID.Text
ds.Tables(0).Rows(intPtr).Item("EmpName") = txtEmpName.Text
ds.Tables(0).Rows(intPtr).Item("EmpDOB") = txtDOB.Text
ds.Tables(0).Rows(intPtr).Item("EmpDepartment") = txtDept.Text
ds.AcceptChanges()
ds.WriteXml("C:\Temp\Emps.xml")

ليتك تحلو والحياة مريره وليتك ترضى والانام غضاب
وليت الذى بينى وبينك عامر وبينى وبين العالمين خراب
إذا صحّ منك الود فالكل هيّن وكل الذى فوق التراب تراب

اللهم ارحم موتانا وموتى جميع المسلمين
اللهم أنزل على قبورهم الضياء والنور والفسحة والسرور وجازهم بالاحسان إحسان وبالسيئات عفوا وغفرانا

مـــشـــكـــورررررررررررر

» rename a file in C#
» Input, Output, Other File Operations, and Persisting Data
» SQL Update Command
» System Update Policy
» تحديث مكافي 2009 - 2010 Update Macafee