Imports System
Imports System.Data
Module FidelityTester
Sub Main()
Dim MyDS As New DataSet()
MyDS.ReadXmlSchema("book.xdr")
MyDS.ReadXml("book.xml")
MyDS.WriteXml("Book_After.xml")
End Sub
End Module
'book.xdr
'
'
'
'
'
'
'
'
'
'
'File: book.xml
'
'
'
' C# How to Program
'
'
' Java How to Program, 4/e
'
'
' Visual Basic .NET How to Program
'
'
' Advanced Java 2 Platform How to Program
'
'
' Python How to Program
'
'