Обработка баз данных на Visual Basic®.NET

Прайс Кевин Т.

Основные принципы чтения и записи XML-данных

В главах 5, "ADO.NET: объект DataSet", и 6, "ADO.NET: объект DataAdapter" демонстрируются программируемые и прямые способы загрузки данных в объект DataSet из базы данных. Еще один метод загрузки данных основан на чтении XML-данных. Как и следовало ожидать, в объект DataSet данные можно записывать в XML-формате. Более того, объект DataSet обладает средствами чтения и записи XML-схем либо вместе с XML-данными, либо раздельно.

Чтение XML-данных

В ADO.NET

предусмотрены богатые и разнообразные инструменты чтения и записи XML-данных и XML-схем. Далее рассматриваются основные способы использования предназначенных для этого методов и свойств.

Как и в предыдущих главах, для демонстрации взаимодействия модели ADO.NET и XML здесь приводится практический пример их использования на основе простой формы.

1. Запустите интегрированную среду разработки Visual Studio .NET и создайте новый проект Visual Basic Windows Application. Для этого в диалоговом окне New Project (Новый проект) выберите тип проекта Visual Basic Project в области Project Types (Типы проектов), а затем шаблон Windows Application (Приложение Windows) в области Templates (Шаблоны).

2. Назовите проект ADO-XML.

3. Укажите путь к файлам проекта.

4. Увеличьте размер формы Form1.

5. В окне свойств Properties укажите значение frmXML для свойства (Name) и значение ADO.NET and XML для свойства Text формы Form1.

6. В верхнем левом углу формы создайте кнопку, перетаскивая ее из панели элементов управления.

7. В окне свойств Properties укажите значение btnReadXML для свойства (Name) и значение Read XML для свойства Text этой кнопки.

8. В правой части формы создайте сетку DataGrid, перетаскивая ее из панели элементов управления.

9. В окне свойств Properties укажите значение grdData для свойства (Name) сетки.

10. Увеличьте размер сетки grdData, чтобы она занимала до 80% всей площади формы.

В верхней части файла введите следующий код:

Imports System

Imports System.Data

Imports System.Data.SqlClient

Затем в определении класса формы frmXML введите код из листинга 10.1.

Листинг 10.1. Код чтения содержимого XML-файла в объект DataSet

Private Sub btnReadXML_Click(ByVal sender As System.Object, _

 ByVal e As System.EventArgs) Handles btnReadXML.Click

 Dim dsPubs As New DataSet

 ' Чтение XML-данных из файла.

 dsPubs.ReadXml("..\Pubs.xml")

 ' Связывание объекта DataSet с сеткой данных DataGrid.

 grdData.DataMember = "publishers"

 grdData.DataSource = dsPubs

End Sub

Эта подпрограмма считывает XML-данные из файла pubs.xml в объект DataSet. Теперь объект DataSet и его данные могут использоваться любым из способов, описанных в предыдущих главах. Кроме того, эта подпрограмма связывает объект DataSet с сеткой данных DataGrid.

В листинге 10.2 показано содержимое файла pubs.xml, а на рис. 10.1 — данные в сетке DataGrid.

РИС. 10.1. Содержимое файла pubs.xml в сетке DataGrid

Листинг 10.2. Содержимое файла pubs.

<?xml version="1.0" standalone="yes"?>

<NewDataSet>

 <publishers>

<pub_id>0736</pub_id>

<pub_name>New Moon Books</pub_name>

<city>Boston</city>

<state>MA</state>

<country>USA</country>

 </publishers>

 <publishers>

<pub_id>0877</pub_id>

<pub_name>Binnet & Hardley</pub_name>

<city>Washington</city>

<state>DC</state>

<country>USA</country>

 </publishers>

 <publishers>

<pub_id>1389</pub_id>

<pub_name>Algodata Infosystems</pub_name>

<city>Berkeley</city>

<state>CA</state>

<country>USA</country>

 </publishers>

 <publishers>

<pub_id>1622</pub_id>

<pub_name>Five Lakes Publishing</pub_name>

<city>Chicago</city>

<state>IL</state>

<country>USA</country>

 </publishers>

 <publishers>

<pub_id>1756</pub_id>

<pub_name>Ramona Publishers</pub_name>

<city>Dallas</city>

<state>TX</state>

<country>USA</country>

 </publishers>

 <publishers>

<pub_id>9952</pub_id>