ADO provides a rich infrastructure for interacting with a wide variety of data, including XML. With DataSets we can now read and write to an XML file with ease.
The following code sample demonstrates how to read and write to an XML file. We are going to read and write an XML file with the details as under:
<?xml version="1.0" standalone="yes" ?>
<Detail>
<Person>
<Name>Manish</Name>
<Age>22</Age>
</Person>
</Detail>
Class : xml.vb
Imports System
Class WriteXML
Shared Sub main()
Dim objDataSet As New System.Data.DataSet()
Dim strVirtualPath As String = "t.xml"
'Load the XML file in the data set
objDataSet.ReadXml("xmlfile.xml")
'Read the XML content on the console
Console.Write(objDataSet.GetXml)
'Get data from the user to be saved in the
Requires Free Membership to View
When you register, you'll begin receiving targeted emails from my team of award-winning writers. Our goal is to provide a unique online resource for developers, architects and development managers tasked with building and maintaining enterprise applications using Visual Basic, C# and the Microsoft .NET platform.
Hannah Smalltree, Editorial Director XML file
Console.Write("Enter Name : ")
Dim fname, age As String
fname = Console.ReadLine
Console.Write("Enter Age : ")
age = Console.ReadLine
Console.Write(fname & age)
Dim v(1) As String
v(0) = fname
v(1) = age
'Add the data to the data set
objDataSet.Tables(0).Rows.Add(v)
'Write to updated data back to the XMl file
objDataSet.WriteXml("xmlfile.xml")
Console.Write(objDataSet.GetXml)
End Sub
End Class
Compile the file as:
vbc /r:system.dll /r:system.data.dll /r:system.xml.dll xml.vb
Source: DotNetExtreme.com
This was first published in June 2003