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

Мак-Манус Джеффри П.

Голдштейн Джеки

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

Это практическое руководство разработчика программного обеспечения на Visual Basic .NET и ADO.NET, предназначенное для создания приложений баз данных на основе WinForms, Web-форм и Web-служб. В книге описываются практические способы решения задач доступа к данным, с которыми сталкиваются разработчики на Visual Basic .NET в своей повседневной деятельности. Книга начинается с основных сведений о создании баз данных, использовании языка структурированных запросов SQL и системы управления базами данных Microsoft SQL Server 2000. Затем рассматриваются способы использования основных объектов модели ADO.NET для доступа к данным в реляционных базах данных. Благодаря подробным примерам, читатели могут изучить способы использования основных свойств и методов, а также узнать о более сложных компонентах и технологиях. Многочисленные листинги с кодом на языке Visual Basic .NET иллюстрируют используемые концепции, а бизнес-ситуации показывают практическую область их применения.

 

Предисловие

 

В этой книге рассматриваются способы создания приложений для работы с базами данных на основе Visual Basic .NET и ADO.NET.

Хотя в ней описываются в основном провайдеры данных OLEDB и ODBC для .NET (глава 4, "Модель ADO.NET: провайдеры данных"), практически все примеры основаны на провайдере данных для сервера баз данных Microsoft SQL Server, которая используется большинством наших читателей. Более того, описываемые здесь подходы и концепции обычно можно очень просто применить для использования других источников данных. Все наиболее значительные отличия в способах использования этих технологий сопровождаются подробными комментариями.

Предполагая, что большинство читателей уже имеют опыт работы с сервером SQL Server, мы все же постарались сделать книгу доступной и для тех, кто не имеет большого опыта работы с ним. Некоторые читатели имеют ограниченный опыт работы с приложениями для баз данных или работали с другими типами баз данных, например с Microsoft Access или Oracle. Поэтому в главе 3, "Знакомство с SQL Server 2000", предлагается краткий обзор основных приемов работы с сервером Microsoft SQL Server. Опытные специалисты SQL Server могут без ущерба для понимания остальных глав пропустить эту вводную главу. Тем не менее следует учесть, что она покрывает широкий круг тем, а потому даже опытный читатель сможет найти в ней несколько полезных советов, ради которых стоит хотя бы бегло просмотреть всю главу.

Помимо основных сведений об SQL Server, здесь описываются язык XML и способы интеграции XML с ADO.NET. Этот очень важный аспект создания приложений баз данных с помощью Visual Basic .NET часто недооценивается или описывается недостаточно полно. Поскольку XML играет очень важную роль в создании современных приложений для работы с данными, эта тема излагается здесь очень подробно.

В книге содержится множество листингов и примеров, которые, несомненно, помогут наилучшим образом понять предлагаемый материал. Обычно описание основных принципов иллюстрируется очень простыми примерами, а затем для описания реального контекста предлагаются типичные бизнес-ситуации.

 

Для кого предназначена эта книга

Предполагается, что читатель уже знаком с основами Visual Basic.NET. Хотя здесь предлагаются очень подробные и последовательные инструкции по созданию кода, все же в этой книге не ставилась цель обучить читателя основам синтаксиса Visual Basic. Мы считаем, что читатель уже владеет основными навыками работы с Visual Basic.NET и Visual Studio.NET, а потому решили не тратить времени на повторение общеизвестных базовых сведений. В частности, за исключением только первого примера, здесь не рассматриваются такие стандартные операции, как открытие и сохранение проектов. Наряду с этим, выполнение одной и той же операции нередко описывается несколькими разными способами, что позволит читателю расширить свои знания Visual Basic.NET без лишнего повторения одних и тех же базовых сведений. Поэтому часто приводятся разные стили кодирования и копии экранов для разных версий Windows, которые иллюстрируют гибкость Visual Basic.NET.

Большинство примеров этой книги демонстрируются с помощью типа проекта Windows Application на основе Windows Forms. Дело в том, что многие программисты на Visual Basic очень хорошо знают и часто используют этот тип проекта. Это позволяет нам сфокусироваться на способах доступа к базе данных, а не на особенностях использования разных типов проектов.NET. В последних главах книги описываются приложения на основе ASP.NET и Web-службы, поэтому в рассматриваемых там примерах представлены другие технологии и типы проектов.

 

Структура книги

Книга содержит три части. Первая часть состоит из глав 1-3 с предварительными сведениями о базах данных, языке SQL и сервере баз данных SQL Server. Эти фундаментальные сведения позволят читателю познакомиться с основными концепциями и понятиями, используемыми в книге. Кроме того, эти главы содержат краткие обзоры важных тем, которые будут полезны даже очень опытным специалистам в этих областях.

Вторая часть содержит основной материал книги. В главах 4-7 предлагаются подробные объяснения и многочисленные примеры основных объектов ADO.NET, a также способы использования их свойств и методов. В главе 7, дополнительные компоненты", рассматриваются более сложные компоненты и способы работы с объектами ADO.NET.

В третьей части книги приводятся фундаментальные способы применения ADO.NET для создания профессиональных приложений, а также рассматриваются методы использования проектов Visual Studio Data Projects для работы со сценариями SQL (глава 8, "Работа с проектом базы данных в среде Visual Studio.NET"), язык XML (глава 9, "XML и .NET") и вопросы интеграции XML с ADO.NET (глава 10, "ADO.NET и XML"). Наконец, в последних главах описываются дополнительные типы проектов на основе ADO.NET: Web-приложения на основе ASP.NET (глава 11, "Web-формы: приложения на основе ASP.NET для работы с базами данных"), а также Web-службы и объекты промежуточного уровня (глава 12, "Web-службы и технологии промежуточного уровня").

 

Используемое программное обеспечение

Предполагается, что читатель уже установил или способен самостоятельно установить интегрированную среду разработки приложений Visual Studio .NET. Следует учесть перечисленные различия, которые существуют между разными редакциями среды Visual Studio .NET в отношении функциональных возможностей и типа используемой базы данных.

Редакция Visual Studio. NET Возможности
Standard Просмотр таблиц и данных, выполнение хранимых процедур с помощью SQL Server Desktop Engine и Access
Professional Просмотр таблиц и данных, выполнение хранимых процедур с помощью любой базы данных с провайдером данных OLEDB или драйвером ODBC. Проектирование (создание или изменение) таблиц или представлений с помощью SQL Server Desktop Engine
Enterprise Developer, Enterprise Architect Просмотр таблиц и данных, выполнение хранимых процедур с помощыо любой базы данных с провайдером данных OLEDB или драйвером ODBC. Проектирование (создание или изменение) таблиц, представлений и хранимых процедур с помощью SQL Server Desktop Engine, SQL Server или Oracle

В некоторых местах глав 1, 2 и 8 используются компоненты, которые предусмотрены только в редакциях Enterprise Developer или Enterprise Architect среды Visual Studio.

В главе 3, "Знакомство с SQL Server 2000", предлагается подробное описание процесса инсталляции SQL Server 2000, которое будет особенно полезно для читателей, не имеющих опыта инсталляции этого программного продукта. Для тестовой базы данных pubs, которая поставляется вместе с SQL Server, рекомендуется создать резервную копию, потому что она используется во многих примерах этой книги и ее данные часто редактируются.

В предлагаемых бизнес-ситуациях и многих примерах используется специально созданная для этой книги база данных Novelty. В главах 3 и 8 подробно описаны сценарии создания этой базы данных. Для использования примеров нужно сначала создать базу данных Novelty на компьютере с сервером SQL Server 2000 и наполнить ее данными. При описании этих операций предполагается, что читатель обладает всеми необходимыми правами для создания базы данных на этом сервере. Учтите, что некоторые пользователи применяют термин "база данных" к понятию "приложение для работы с базами данных", но в этой книге термин "база данных" означает "структурированный набор реляционных данных, которые хранятся в SQL Server 2000".

Коды всех примеров вместе со сценариями создания и наполнения данными базы данных Novelty, которая используется в этой книге, можно найти на Web-сервере Издательского дома "Вильяме" по адресу: http://www.williamspublishing.com. Для создания этой базы данных на компьютере с SQL Server 2000 выполните ряд действий.

1. Откройте программу Query Analyzer с помощью команды Microsoft SQL Server→Query Analyzer и подключитесь к нужному серверу SQL Server.

2. Откройте файл NoveltyDB.sql, выбирая команду меню File→Open (Файл→Открыть) и указывая место расположения этого файла.

3. После открытия этого файла его содержимое будет отображено в диалоговом окне.

4. Для выполнения сценария выберите команду Execute→Query (Выполнить→Запрос) или щелкните на кнопке с изображением зеленой стрелки.

5. После выполнения сценария будет создана база данных Novelty, которую можно наполнить данными, повторяя действия, описанные в пп. 2-4, для других сценариев с суффиксом Data в имени; например, сценарий OrdersData.sql вставляет данные в таблицу с заказами.

Учтите, что исходная версия 1.0 платформы .NET Framework и среда Visual Studio.NET не содержат провайдера данных для ODBC. Он входит в следующие версии и его можно скопировать отдельно с Web-узла компании Microsoft по адресу: http://www.microsoft.com. Кроме того, там же можно скопировать провайдер данных Microsoft.NET для Oracle, если вы используете базу данных Oracle, однако учтите, что в этой книге она не описывается.

 

Об авторах

Джеффри П. Мак-Манус (Jeffrey P. McManus) — разработчик и автор, специализирующийся на программных продуктах Microsoft. Как разработчик, он занимался созданием оперативных приложений на основе Internet-ориентированных и клиент-серверных технологий. Он автор четырех книг, включая предыдущее издание этой книги — бестселлер Обработка баз данных на Visual Basic® 6, а также две книги, посвященные .NET-ориентированным технологиям. Джеффри регулярно участвует в конференциях VBITS/VSLive, European DevWeek и VBConnections.

Джеки Голдштейн (Jackie Goldstein) — президент компании Renaissance Computer Systems, которая специализируется на создании приложений и предоставлении консультаций в области программных продуктов и технологий Microsoft. Более 18 лет он участвует в создании и сопровождении программных продуктов в США и Израиле, а также обладает огромным опытом оказания консультационных услуг и интеграции новых технологий. Джеки является региональным директором MSDN в Израиле, основателем израильской группы пользователей Visual Basic (VB User Group). Он регулярно выступает на международных конференциях разработчиков, включая VSLive!, TechEd, VBITS, Microsoft Developer Days и SQL2TheMax. Он также работал с компанией Microsoft в качестве эксперта по основным вопросам рецензирования, усовершенствования и завершения технических материалов и презентаций для всемирных конференций Microsoft Developer Days.

 

О соавторе

Кевин Т. Прайс (Kevin T. Price) — старший технолог, который специализируется на вопросах обеспечения безопасности и масштабирования (штат Вирджиния). В течение многих лет он сумел охватить все аспекты создания приложений с помощью набора инструментальных средств компании Microsoft. Он написал несколько глав для разных книг об XML, системе безопасности и технологиях.NET. Помимо своей основной работы, Кевин увлекается кулинарией и пейнтболом. С ним можно связаться по адресу: [email protected].

 

О рецензентах

Энжани Читаджаллу (Anjani Chittajallu) получила диплом мастера в области систем управления в Индийском технологическом институте (Indian Institute of Technology) в Мадрасе. Она специализируется в проектировании и разработке корпоративных систем на основе технологий Microsoft. Энжани имеет сертификат разработчика MSCD и с ней можно связаться по адресу: [email protected].

Эндрю Дж. Индовина (Andrew J. Indovina) в настоящее время является старшим разработчиком программного обеспечения в Рочестере, штат Нью-Йорк (Rochester, New York). Помимо ученой степени по информатике, он обладает глубокими знаниями языков ассемблера, C/C++, Visual Basic, Java, XML, ASP и навыками программирования на них. Кроме того, он является соавтором двух книг о языках Visual Basic и C++, а также техническим редактором многочисленных книг по информатике. В последнее время Эндрю активно занимается созданием приложений на основе Microsoft .NET.

 

Благодарности

Мы хотим поблагодарить тех, кто помогал нам создать эту книгу, в частности: Сондру Скотт (Sondra Scott), ответственного редактора, которая решила множество проблем в процессе создания книги;

Лори Мак-Гвайр (Laurie McGuire), нашего наиболее терпеливого редактора, сделавшего очень много полезного;

Кевина Т. Прайса (Kevin T. Price), который согласился принять участие в создании этой книги и пополнить главы своими материалами, несмотря на сложные обстоятельства;

Энжани Читаджаллу (Anjani Chittajallu) и Эндрю Дж. Индовину (Andrew J. Indovina), технических рецензентов, которые не только проверили нашу работу, но и предложили множество полезных идей;

Майкла Пизо (Michael Pizzo) из компании Microsoft, который всегда быстро отвечал на наши вопросы или рекомендовал других более опытных специалистов;

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

 

ГЛАВА 1

Основы построения баз данных

 

Сердцем многих приложений, работающих в сфере бизнеса, являются базы данных. Своим широким распространением они обязаны возможности централизованного доступа к информации, который характеризуется последовательностью, эффективностью и относительной простотой создания и поддержки. В этой главе рассматриваются основы создания и поддержки баз данных, предназначенных для ведения бизнеса, т.е. здесь вы узнаете, что собой представляет база данных и как ее можно использовать для принятия решений в сфере бизнеса.

Если вы уже работали с языком Visual Basic и программировали доступ к базам данных, то материал этой главы может показаться вам довольно тривиальным. Однако не стоит пропускать ее, поскольку здесь вы найдете профессиональные термины, которые могут меняться при переходе от одной системы управления базами данных (СУБД) к другой.

Несмотря на относительное постоянство концепций, лежащих в основе различных СУБД, одни и те же вещи имеют обыкновение называться по-разному при переходе от одной конкретной реализации к следующей. Например, многие программисты, разрабатывающие приложения клиент/сервер, называют запросы (query), хранимые в контейнере базы данных, представлениями (view), а программисты, работающие в среде Visual Basic или Access, называют их запросами или объектами QueryDef. По своей сути это одно и то же.

Если вы переходите к Visual Basic .NET от предыдущей версии Visual Basic, то вам следует познакомиться с некоторыми новыми возможностями программирования баз данных с помощью Visual Basic .NET. Дело в том, что в ней используется фундаментально другой способ доступа к данным, который отличается от способов доступа к данным в прежних версиях Visual Basic. Он основан на стандартах Internet с прицелом на создание приложений с возможностями удаленного доступа к данным. Интегрированная среда разработки Visual Studio .NET содержит огромный набор визуальных и интуитивно понятных инструментов, которые упрощают и ускоряют процесс создания баз данных и обеспечивают более высокую степень взаимодействия. Ранее для создания и поддержки баз данных необходимо было иметь глубокие знания многих инструментов. С помощью Visual Studio .NET разработчик может обратиться к многочисленным программам-мастерам, что позволяет избежать создания рутинного кода и повысить гибкость создаваемых приложений.

Если же вы не понаслышке знакомы с разработкой баз данных в прежней версии Visual Basic 6.0, возможно, вам имеет смысл забежать вперед и перейти к главе 4, "Модель ADO.NET: провайдеры данных", посвященной новым способам доступа к данным в Visual Basic .NET.

 

Что представляет собой база данных

 

База данных (database) — это своего рода камера хранения информации. Поскольку существуют различные типы баз данных, необходимо отметить, что в данной книге рассматриваются реляционные базы данных, как самый распространенный в настоящее время тип баз данных. Реляционные базы данных обладают следующими возможностями:

• сохраняют данные в таблицах, которые, в свою очередь, состоят из строк, называемых здесь записями, и столбцов, называемых здесь полями;

• позволяют считывать подмножества данных из таблиц (или создавать для них запросы);

• позволяют связывать таблицы друг с другом (или создавать объединения) для выборки связанных записей, хранимых в различных таблицах.

 

Что такое платформа базы данных

Основные функции базы данных обеспечиваются платформой баз данных (database platform), т.е. программной системой, "отвечающей" за способ хранения данных и их выборку.

Вместе с Visual Basic.NET можно использовать множество различных платформ баз данных, но в этой книге в основном рассматривается платформа Microsoft SQL Server 2000. (Более подробно она рассматривается в главе 3, "Знакомство с SQL Server 2000".) Процессором базы данных (database engine) называется сам механизм, лежащий в основе платформы базы данных и непосредственно "отвечающий" за выполнение функций и управление данными.

 

Бизнес-ситуации

 

Многие книги, посвященные компьютерному обеспечению, состоят из длинных списков программных средств с кратким описанием особенностей их работы. Если вам повезет, вы найдете описание того, как данный продукт связан с реальным миром.

Цель настоящей книги – представить программное обеспечение в терминах бизнес-решений. Поэтому каждая глава содержит несколько бизнес-вариантов, в которых некая фиктивная компания, столкнувшись с реальными проблемами в сфере бизнеса, пытается автоматизировать работу офиса. В приведенных бизнес-ситуациях используются наработки компании Jones Novelties Incorporated, которая занимается так называемым малым бизнесом — распространением сувениров, мелких дешевых товаров и организацией вечеринок.

 

Бизнес-ситуация 1.1: основные сведения о компании Jones Novelties Incorporated

Исполнительный директор компании Брэд Джонс сознает, что для процветания компании нужно автоматизировать большую часть проводимых операций. Джонс понимает, что в первую очередь необходимо реализовать такие подсистемы, которые отвечают за контакты с покупателями, складское хозяйство и выписку счетов, причем реализация проекта автоматизации должна максимально отражать специфику этого бизнеса и в то же время отличаться достаточной гибкостью, позволяя вносить потенциальные изменения, продиктованные временем.

Джонс полностью сознает, что успех работы компании во многом зависит от характера организации доступа к информации, и принимает решение использовать для управления информацией компании систему реляционных баз данных. Поэтому последующий материал главы посвящен описанию структуры и особенностей функционирования этой базы данных.

 

Таблицы и поля

 

Базы данных состоят из таблиц, которые представляют широкий диапазон категорий данных. Если когда-либо вам приходилось создавать базу данных, например для обработки отчетных материалов в бизнесе, то вы могли создать одну таблицу для хранения информации о клиентах, другую – о счетах, третью – о сотрудниках. Таблицы имеют заранее определенную структуру, и данные, хранящиеся в них, соответствуют этой структуре.

Таблицы содержат записи — отдельные частицы данных внутри широкой категории, которую они представляют. Например, таблица с клиентами содержит информацию обо всех потребителях товаров и услуг данной компании. Записи могут содержать данные практически любого типа. Они могут редактироваться, извлекаться и удаляться с помощью хранимых процедур и/или запросов на языке структурированных запросов (Structured Query Language — SQL).

Записи, в свою очередь, содержат поля. Поле — это некоторый раздел данных в записи. Например, запись, которая представляет некий элемент в адресной книге, может состоять из полей имени и фамилии, адреса, названия города, почтового индекса и номера телефона.

Для доступа к базам данных, таблицам, записям и полям можно использовать код Visual Basic .NET. Одна из новинок программирования баз данных в Visual Basic .NET заключается в строгой проверке типов данных. Например, в Visual Basic .NET предусмотрены новые методы getString() и getInt(), которые позволяют сократить объем вводимого программистом кода и автоматически форматируют извлекаемые данные согласно их типу.

 

Проектирование базы данных

Для создания базы данных в первую очередь нужно определить, какого рода информацию ей предстоит отслеживать. Затем можно приступать к проектированию, создавая таблицы, состоящие из полей, которые определяют типы хранимых данных. После создания структуры базы данных можно сохранять данные в виде записей.

Однако невозможно добавлять данные в базу данных, которая не имеет таблиц или определений полей, поскольку в этом случае негде хранить данные. Отсюда следует, что проектирование базы данных имеет решающее значение для эффективности ее работы, в частности потому, что структура базы данных после ее реализации порой тяжело поддается изменениям.

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

tblMyTable
ID
FirstName
LastName

Многоточие, использованное вместо последнего имени поля, означает, что эта таблица имеет одно или несколько полей, которые для краткости изложения опущены.

Если вы новичок в мире программирования баз данных, но раньше использовали другие компьютерные приложения, вас, возможно, удивит, что приложение базы данных заставляет решать массу проблем еще до того, как вы приступите ко вводу данных. Например, приложение обработки текстов позволяет просто набирать и редактировать текст, а подробности, связанные с сохранением файла, вас не касаются — они решаются самим приложением. Однако с базами данных все обстоит по-другому, потому что заблаговременное проектирование структуры баз данных значительно повышает эффективность работы приложения. Если приложению будет известен точный объем и типы данных, подлежащих хранению, то процесс их сохранения и выборки может быть организован оптимальным образом. Создав свою первую многопользовательскую базу данных на 100 тыс. записей, вы узнаете, что первостепенным фактором в работе базы данных является скорость выборки. Поэтому особого внимания заслуживают любые усилия, направленные на ускорение процесса добавления информации в базу данных и выборки из нее.

Эффективность работы баз данных зависит от продуманности структуры таблиц, т.е. одна и та же таблица должна включать поля, относящиеся к одной и той же категории данных. Это значит, что все записи с данными о клиентах должны храниться в таблице Customer, записи о заказах, оформляемых этими клиентами, — в таблице Orders и т.д.

Хотя эти наборы данных входят в различные таблицы, это вовсе не означает, что вы не можете использовать их вместе. Совсем наоборот. Если необходимые данные расположены в двух или нескольких таблицах реляционной базы данных, вы можете получить доступ к этим данным, используя отношения между таблицами. Отношения будут рассмотрены ниже, а пока остановимся на структуре таблиц.

 

Бизнес-ситуация 1.2: проектирование таблиц и отношений

Брэд Джонс понял, что компании Jones Novelties Incorporated необходим способ сохранения информации о клиентах. Он совершенно уверен в том, что большинство его деловых контактов не будут однократными, и поэтому хочет иметь возможность связываться с постоянными клиентами, чтобы отсылать им каталоги два раза в год.

Размышляя таким образом за коктейлем, Брэд начертил на салфетке первую схему базы данных. "Итак, – подумал он, – чтобы поддерживать контакты с клиентами, мне нужно хранить следующие данные:

• имя клиента, его адрес, город, штат, почтовый индекс и телефонный номер;

• территориальный регион страны (северо-запад, юго-запад, средний запад, северо-восток, юг или юго-восток);

• дату последней покупки клиента".

Брэд предположил, что всю эту информацию можно поместить в одну таблицу и тогда его база данных будет отличаться изяществом и простотой. Однако в команде разработчиков нашлись отважные люди, которые осмелились сказать своему шефу, что, возможно, он и прав, но построенная таким образом база данных будет неэффективной, неорганизованной и чрезвычайно негибкой.

Информация, которую Брэд хочет включить в таблицу, не преобразуется напрямую в ее поля. Например, поскольку регион является функцией от штата, в котором проживает данный клиент, то вряд ли имеет смысл помещать поля State и Region в одну таблицу. Если все-таки пойти на это, то оператору, занимающемуся вводом данных, придется дважды вводить аналогичную информацию о клиенте. Логичнее хранить поле State в таблице Customer, а остальные сведения, относящиеся к регионам, – в таблице Region. Если по таблице Region всегда можно определить, в каком регионе находится тот или иной штат, то оператору не придется вводить регион для каждого клиента. Вместо этого достаточно ввести только название штата, а затем после обработки данных из таблиц Customer и Region автоматически будет определен регион проживания данного клиента.

Точно так же критически следует посмотреть на поле Name. Если вместо поля Name использовать два поля: FirstName и LastName, то это облегчит сортировку по фамилии клиентов, если таковая потребуется. Подобный аспект проектирования может показаться тривиальным, но остается лишь удивляться тому, сколько проектов баз данных не учитывают таких простых вещей, как эти. Важно понять, что все это гораздо легче предусмотреть на этапе проектирования базы данных, чем пытаться исправить дефекты, вызванные недальновидностью разработчиков, когда база данных уже заполнена информацией.

Поэтому Брэд и его сотрудники решили, что информация о клиентах компании Jones Novelties Incorporated будет храниться в таблице tblCustomer, которая содержит перечисленные ниже поля.

tblCustomer
ID
FirstName
LastName
Company
Address
City
State
PostalCode
Phone
Fax
Email

Данные, относящиеся к региону страны, в котором проживает клиент, следует хранить в таблице tblRegion. 

tblRegion
ID
State
RegionName 

Между двумя этими таблицами существует отношение по полю State. Обратите внимание на то, что это поле присутствует в обеих таблицах. Отношение между таблицами Region и Customer является отношением один-ко-многим, поскольку для каждой записи в таблице tblRegion может существовать или одна, или ни одной, или много записей в таблице tblCustomer, совпадающих по полю State. (Далее в главе подробно описывается, как воспользоваться преимуществами такого отношения при выборке записей.)

Обратите внимание на то, какие имена были присвоены таблицам и полям этой базы данных. Во-первых, имя каждой таблицы начинается с префикса tbl. Этот префикс позволяет с первого взгляда определить, что вы имеете дело именно с таблицей, а не с другим типом объектов базы данных, в котором могут храниться записи. Заметьте, что каждое имя поля состоит из полных слов (а не сокращений), но не включает пробелов или таких специальных символов, как символы подчеркивания.

Несмотря на то что механизм управления базами данных Microsoft SQL Server позволяет использовать в именах объектов баз данных пробелы, символы подчеркивания и другие символы, не входящие в число алфавитно-цифровых, все-таки стоит избегать их использования, поскольку это затрудняет запоминание точного написания имени поля. (В этом случае вам не придется, например, гадать, как называется поле, содержащее имя: FirstName или FIRST_NAME.) Эта директива может показаться сейчас незначительной, но, когда вы начнете писать код для базы данных, содержащей 50 таблиц и 300 полей, вы по достоинству оцените существующие соглашения о присвоении имен, особенно на первом этапе разработки.

Рассмотрим последний пункт из предварительного списка Брэда, предусматривающий регистрацию ответа на вопрос: "Когда данный клиент в последний раз делал у нас покупку?". Разработчик базы данных решил, что эта информация может храниться в таблице, которая предназначена для хранения данных, относящихся к заказам клиентов. Ниже приведена структура этой таблицы.

tblOrder
ID
CustomerID
OrderDate
Amount 

В этой таблице поле ID уникальным образом идентифицирует каждый заказ. Поле CustomerID, с другой стороны, связывает заказ с клиентом. Чтобы установить эту связь, идентификатор клиента копируется в поле CustomerID таблицы Order. Таким образом, совсем нетрудно отыскать все заказы для конкретного клиента (как будет продемонстрировано ниже).

 

Манипулирование данными с помощью объектов

После создания таблиц можно приступить к манипуляциям с данными: вводить данные в таблицы, извлекать их из таблиц, проверять и изменять структуру таблиц. Для манипулирования структурой таблиц используются команды определения данных (более подробно они описываются в главе 2, "Запросы и команды на языке SQL"), а для манипулирования данными – объекты DataSet или DataReader платформы .NET.

Объект DataSet обычно представляет подмножество записей, которые извлекаются из базы данных. Оно концептуально аналогично таблице (а в некоторых случаях — группе связанных полей), но также содержит несколько важных собственных свойств. Объекты DataSet можно легко представить в виде XML-данных и использовать для передачи удаленных данных (как, например, при передаче результатов выполнения запроса от сервера к клиенту или при обмене данными между двумя серверами). В Visual Basic .NET объекты DataSet не ограничены только сохранением извлеченных данных. Например, объект DataSet может использоваться для управления статическими данными в XML-документе или файле конфигурации, либо для управления динамическими данными, созданными на основе пользовательских данных в более сложных ситуациях.

Как и при работе с технологией ADO, в Visual Basic .NET и ADO.NET можно использовать подключенные и неподключенные объекты DataSet. Неподключенный объект DataSet с данными передается приложению, соединение с базой данных закрывается, а базе данных ничего не известно о манипуляциях с этими данными до тех пор, пока приложение вновь не обратится к базе данных. Допустим, что пользователь открывает форму и щелкает на кнопке для обновления данных. В таком случае приложение должно снова соединиться с базой данных и выполнить код изменения данных. В то же время с помощью подключенного объекта DataSet используемые данные "блокируются" и все изменения данных мгновенно воспроизводятся в базе данных. Эта технология более подробно рассматривается в главе 5, "ADO.NET: объект DataSet".

Объект DataReader работает аналогично объекту DataSet, но обладает другими возможностями и характеристиками производительности. Одно из отличий отражено в его названии: объект DataReader считывает данные, т.е. он предоставляет доступ к данным только для чтения. Для объекта DataReader также не предусмотрен простой способ представления данных в формате XML.

Для простоты (что также рекомендуется делать на практике) в данной книге объект DataReader используется для выполнения базовых операций доступа к данным, а объект DataSet — только в случае крайней необходимости, например для создания Web-служб (более подробно они рассматриваются в главе 12, "Web-службы и технологии промежуточного уровня").

Объект DataSet устроен так же, как и объект ADODB.Recordset в прежних версиях языка Visual Basic. Аналогично другим типам объектов языка Visual Basic, объект DataSet имеет свойства и методы. Более подробно он рассматривается в других главах книги, а здесь достаточно отметить, что на платформе .NET объекты используются для организации в приложении ясного, согласованного и относительно простого способа работы с базами данных.

 

Типы данных

Один из этапов проектирования базы данных заключается в объявлении типа каждого поля, что позволяет процессору базы данных эффективно сохранять и извлекать данные. В SQL Server предусмотрено использование 21 типа данных, которые перечислены в табл. 1.1.

Таблица 1.1. Типы данных в SQL Server

Тип данных Описание
bigint Восьмибайтовое целое число в диапазоне от -9223372036854775808 до 9223372036854775807
binary Двоичные данные фиксированного размера до 8 Кбайт
char Символьное поле фиксированного размера до 8000 символов
datetime Время и дата между 1 января 1753 года и 31 декабря 9999 года
decimal Десятичное число с фиксированной точностью и размером от 5 до 17 байт. Во время создания поля можно указать число десятичных знаков
float Десятичное число размером от 4 до 8 байт и не более 53 десятичных знаков после запятой
image Двоичные данные переменного размера до 2147483647 байт
int Четырехбайтовое целое число в диапазоне от -2147483648 до 2147483647
money Числовое поле со специальными свойствами для сохранения денежных значений
nchar Символьное поле фиксированного размера до 4000 символов Unicode
ntext Символьное поле произвольного размера до 1 073 741 823 символов Unicode
nvarchar Символьное поле произвольного размера до 4000 символов Unicode
real Десятичное число размером 4 байта и не более 24 десятичных знаков после запятой
smalldatetime Время и дата между 1 января 1900 года и 6 июня 2079
smallint Двухбайтовое целое число в диапазоне от -32768 до 32767
text Символьное поле произвольного размера до 2147483647 символов (в базе данных Microsoft Access есть аналогичное поле типа Memo)
tinyint Однобайтовое целое число в диапазоне от 0 до 255
uniqueidentifier Целое число, которое также называется глобально уникальным идентификатором и используется для уникальной идентификации записи (часто применяется для репликации данных)
varbinary Двоичные данные переменного размера до 8000 байт
varchar Символьные данные переменного размера до 8000 символов 

Хотя типы данных Visual Basic.NET более близки к типам данных полей SQL Server, чем типы данных Visual Basic 6, между ними все равно нет однозначного соответствия. Например, тип данных int в SQL Server соответствует типу integer в Visual Basic .NET, потому что оба они являются 32-битовыми целыми числами. Однако в SQL Server нельзя создать поле с определенным пользователем типом или типом Object языка Visual Basic .NET.

 

Схема базы данных

 

Для создания структуры базы данных рекомендуется не только подготовить список таблиц и полей, но и представить таблицы и поля в графическом виде. После этого вы не только сможете сказать, какие таблицы и поля доступны для вас, но и как они связаны друг с другом. Именно для этого и предусмотрена схема базы данных.

Схему можно представить как карту дорог для вашей базы данных. На схеме все таблицы, поля и отношения в базе данных изображаются графически. Схему базы данных важно рассматривать как часть процесса проектирования программного продукта, поскольку с ее помощью можно быстро понять, что происходит в базе данных.

Схемы не теряют своей актуальности и после завершения процесса проектирования базы данных. Без такой схемы вам будет трудно выполнять многотабличные запросы. Толково составленная графическая схема поможет ответить на вопросы типа: "Какие таблицы мне нужно объединить, чтобы составить список всех заказов с объемом, превышающим $50,00, поступивших от клиентов из штата Миннесота в течение последних 24 часов?" (За дополнительной информацией по созданию запросов, включающих более одной таблицы, обращайтесь к главе 2, "Запросы и команды на языке SQL".)

Официальных способов создания схем баз данных не существует, но есть много средств, которыми можно воспользоваться при их создании. Например, графический редактор Visio отличается гибкостью, быстротой и простотой применения. Более того, он хорошо интегрируется с другими приложениями Windows, в частности с Microsoft Office. Этот редактор распространяется отдельно, а также входит в состав Visual Studio.NET Enterprise Architect.

Все сказанное в пользу Visio не означает, что при создании графической схемы базы данных вы должны использовать только программу Visio. Можно применять любые другие инструменты рисования, с которыми вы знакомы. Приемлемый вариант – программа Microsoft Windows Paint, можно также воспользоваться средствами рисования, предусмотренными в программе Microsoft Word.

 

Использование инструментов Visual Studio для создания базы данных

Существует несколько способов создания баз данных в SQL Server. С помощью набора инструментов SQL Enterprise Manager базы данных можно создавать графически или программно (с помощью команд на языке SQL). Помимо него, существует множество других внешних инструментов для создания баз данных, например Visio, который описывается далее в главе.

Visual Studio .NET также содержит очень удобный инструмент для работы с базами данных SQL Server. Он входит в состав нового компонента Server Explorer, который предназначен для централизованного управления всеми видами серверного программного обеспечения. Для создания базы данных SQL Server с помощью компонента Server Explorer выполните перечисленные ниже действия.

1. Запустите интегрированную среду разработки Visual Studio .NET, выбрав команду меню Start→Programs→Microsoft Visual Studio .NET→Microsoft Visual Studio .NET.

2. В левой части окна Visual Studio .NET откройте окно Server Explorer, выбрав команду меню View→Server Explorer (учтите, что эта вкладка может иметь горизонтальную или вертикальную ориентацию).

3. В этом окне раскройте узел Servers, найдите ваш компьютер, а затем раскройте узел SQL Servers и найдите в нем экземпляр SQL Server, который установлен на вашем компьютере, как показано на рис. 1.1.

РИС. 1.1. Вкладка Server Explorer интегрированной среды разработки Visual Studio .NET, с помощью которой можно централизованно управлять серверными процессами

4. Для создания новой базы данных щелкните правой кнопкой мыши на имени экземпляра SQL Server, который установлен на вашем компьютере. На рис. 1.1 показан компьютер ROCKO, хотя ваш компьютер может иметь совершенно другое имя. В контекстном меню выберите команду New Database (Создать новую базу данных).

5. На экране появится диалоговое окно Create Database (Создать базу данных). Введите в нем имя базы данных Novelty и щелкните на кнопке OK.

6. После этого в окне Server Explorer появится новая база данных Novelty. При раскрытии узла этой базы данных будут отображены следующие категории объектов базы данных:

• Database Diagrams (Диаграммы базы данных);

• Tables (Таблицы);

• Views (Представления);

• Stored Procedures (Хранимые процедуры);

• Functions (Функции).

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

1. В окне Server Explorer щелкните правой кнопкой мыши на узле Tables базы данных Novelty, а затем из контекстного меню выберите команду New Table (Создать таблицу).

2. После этого в окне Visual Studio .NET появится диалоговое окно для создания структуры новой таблицы. Создайте таблицу tblCustomer с перечисленными ниже определениями полей. 

Имя поля Тип данных Длина Наличие неопределенных значений
ID int* 4 Нет
FirstName varchar 20 Да
LastName varchar 30 Да
Company varchar 50 Да
Address varchar 50 Да
City varchar 30 Да
State char 2 Да
PostalCode varchar 9 Да
Phone varchar 15 Да
Fax varchar 15 Да
E-mail varchar 100 Да

Учтите, что поле ID используется для идентификаторов, т.е., оно содержит уникальное целое число для каждой строки данной таблицы.

3. После ввода этих определений таблица будет иметь вид, показанный на рис. 1.2.

4. Щелкните на поле ID и выберите команду меню Diagram→Set Primary Key (Диаграмма→Создать первичный ключ). Благодаря этому все значения данного поля будут уникальны, т.е. все клиенты будут иметь разные идентификаторы. (Более подробные сведения о первичных ключах приводятся в следующем разделе.)

5. Далее нужно указать, что поле ID используется в SQL Server в целях автоматической генерации идентификационных номеров для клиентов. Для этого щелкните правой кнопкой мыши на окне с определением таблицы и выберите в контекстном окне Indexes/Keys (Индексы/ключи).

6. После этого на экране появится диалоговое окно Property Pages (Страницы свойств) со вкладкой Indexes/Keys. Выберите вкладку Tables (Таблицы) со свойствами таблицы.

7. В списке Table Identity Column (Поле таблицы с идентификаторами) выберите поле ID.

8. Щелкните на кнопке Close (Закрыть).

РИС. 1.2. Создание определения таблицы с помощью Visual Studio .NET

9. Выберите команду меню File→Save Table1 (Файл→Сохранить таблицу Table1). В диалоговом окне Choose Name (Выбрать имя) введите имя tblCustomer и щелкните на кнопке OK. Обратите внимание, что после сохранения таблицы ее имя появится в списке таблиц базы данных Novelty в окне компонента Server Explorer.

 

Определение индексов и первичного ключа

Теперь, когда вы создали базовую таблицу, осталось определить индексы. Индекс (index) - это атрибут, который можно присвоить полю, чтобы облегчить для процессора баз данных выборку данных на основе информации, хранимой в этом поле. Например, в базе данных, содержащей сведения о сотрудниках, вероятно, будет реализована функция поиска клиента по фамилии, отделу или идентификационному номеру. Поэтому для каждого из этих полей имеет смысл создать индексы, чтобы ускорить процесс выборки записей на их основе.

Если вы поняли, какая польза от применения индексов в структуре базы данных, у вас может возникнуть вопрос: если наличие индексов значительно ускоряет поиск, почему бы не создать индексы для каждого поля каждой таблицы? Ответ прост: индексы — это не только плюс, но и минус. При увеличении количества индексов физически увеличивается размер базы данных, а значит, и объем занимаемой памяти и дискового пространства, в результате чего компьютер работает медленнее. В этом случае польза от применения индексов сводится к нулю. Не существует жесткого правила насчет оптимального количества индексов для каждой таблицы, но основная рекомендация состоит в создании индексов только по таким полям, которые, по вашему мнению, будут чаще всего использованы в запросах. (За дополнительной информацией о том, как использовать содержимое поля в качестве критерия запроса для выборки наборов записей, обращайтесь к главе 2, "Запросы и команды на языке SQL".)

Первичный ключ (primary key) – это специальный тип индекса. Поле, которое определено в качестве первичного ключа таблицы, служит для уникальной идентификации записей. Поэтому, в отличие от других типов индексов, никакие две записи в одной и той же таблице не могут иметь одинакового значения в поле их первичного ключа. Кроме того, при определении поля в качестве первичного ключа никакие две записи в этом поле не могут содержать пустое или неопределенное значение (null). Определив некоторое поле таблицы как первичный ключ, вы можете создать в своей базе данных отношения между этой и другими таблицами.

Каждая создаваемая вами таблица должна иметь по крайней мере один первичный ключ и должна быть проиндексирована по тем полям, которые чаще всего будут участвовать в запросах. В случае с таблицей tbl:, как и с многими другими таблицами баз данных, первичный ключ создается по полю ID. (В предыдущем разделе это поле уже было определено как первичное.) Вторичными индексами могут быть поля FirstName и LastName.

Попробуем создать еще два индекса для полей FirstName и LastName, для этого выполните перечисленные ниже действия.

1. Щелкните правой кнопкой мыши на окне с определением таблицы tblCustomer в окне компонента Server Explorer и выберите в контекстном меню команду Indexes/Keys.

2. После этого на экране появится страница свойств со списком существующих индексов, в котором уже присутствует индекс первичного ключа PK_tblCustomer. Щелкните на кнопке New (Создать) для создания нового индекса для поля FirstName.

3. В списке полей выберите поле FirstName, как показано на рис. 1.3, а затем щелкните на кнопке Close.

4. Повторите действия из пп. 1-3, чтобы создать индекс для поля FirstName.

ВНИМАНИЕ!

В нижней части диалогового окна Property Pages находится параметр Create UNIQUE (Создать уникальный индекс). Не устанавливайте флажок для этого параметра, потому что в таком случае в таблицу можно будет вводить только разные имена клиентов! Уникальные индексы следует создавать только для того, чтобы гарантировать уникальность значений данного поля.

РИС. 1.3. Диалоговое окно Property Pages после определения индекса для поля FirstName

5. Для сохранения внесенных изменений в базу данных выберите команду меню File→Save tblCustomer (Файл→Сохранить таблицу tblCustomer). После успешного сохранения внесенных изменений закройте окно создания схемы базы данных Visual Studio .NET.

Создав структуру данных для таблицы, можно приступить к вводу данных в нее. В окне Server Explorer предусмотрены удобные средства ввода данных в таблицу. Для этого нужно щелкнуть правой кнопкой мыши на таблице в окне Server Explorer и выбрать из контекстного меню команду Retrieve Data from Table (Извлечь данные из таблицы). В результате в окне Server Explorer появится сетка с полями ввода данных (рис. 1.4).

Данные вводятся непосредственно в каждую ячейку сетки, а при переходе к следующей строке данные из предыдущей строки сохраняются в базе данных. Учтите, что в поле данные можно не вводить – они будут вводиться в него автоматически, поскольку оно было создано как поле с идентификаторами. Процессор базы данных автоматически будет заполнять это поле значениями при переходе к следующей строке сетки.

Получив эти базовые знания о создании таблицы с помощью Visual Studio .NET, вы сможете создавать базы данных практически любого вида. Однако для создания сложных баз данных с несколькими таблицами часто требуется установить отношения (связи) между ними. Чтобы упростить эту задачу, используется схема базы данных.

 

Создание схемы базы данных

Схема базы данных (database diagram) – это визуальное представление таблиц в базе данных. Для создания таблиц и отношений между ними можно использовать инструменты создания схемы баз данных, которые предусмотрены в SQL Server. А для создания схемы баз данных с помощью окна Server Explorer среды Visual Studio .NET выполните перечисленные ниже действия. 

РИС. 1.4. Ввод данных в таблицу с помощью команды контекстного меню Retrieve Data from Table

1. Разверните узел базы данных Novelty в окне Server Explorer, щелкните правой кнопкой мыши на узле Database Diagrams и выберите в контекстном меню команду New Diagram (Создать схему).

2. В диалоговом окне Add Table (Добавить таблицу) будет приведен список таблиц базы данных. Выберите созданную ранее таблицу tblCustomer, щелкните на кнопке Add (Добавить), а затем на кнопке Close.

3. В результате будет создана новая схема базы данных с таблицей tblCustomer (рис. 1.5).

4. Для добавления второй таблицы в эту схему щелкните правой кнопкой мыши на пустом пространстве возле таблицы tblCustomer и выберите в контекстном меню команду New Table (Создать таблицу).

5. На экране появится диалоговое окно Choose Name, в которое следует ввести имя новой таблицы tblOrder.

6. После этого в окне схемы появится сетка для определения полей новой таблицы. Создайте в ней поля, показанные на рис. 1.6.

7. Выберите команду меню File→Save для сохранения схемы базы данных, и на экране появится диалоговое окно с просьбой подтвердить создание новой таблицы. Щелкните на кнопке Yes, и в окне Server Explorer появится вновь созданная таблица. 

РИС. 1.5. Схема базы данных Novelty, которая содержит все таблицы, выбранные в диалоговом окне Add Table

РИС. 1.6. Схема базы данных Novelty, которая содержит все таблицы, выбранные в диалоговом окне Add Table

После создания таблиц для клиентов и заказов следует установить связь (отношение) между ними. Например, при создании заказа идентификатор клиента ID из таблицы tblCustomer копируется из записи клиента в поле CustomerID таблицы tblOrder. Для указания этого отношения между таблицами на схеме базы данных выполните перечисленные ниже действия.

1. Щелкните на поле ID в таблице tblCustomer и перетащите его к полю CustomerID таблицы tblOrder.

2. На экране появится диалоговое окно Create Relationship (Создать отношение), в котором можно указать свойства отношения между двумя таблицами. После этого уже нельзя создавать заказы для клиентов с идентификаторами, которых нет в таблице клиентов. Это ограничение имеет большое практическое значение и потому с ним следует согласиться.

3. Схема базы данных обновляется для отражения нового отношения, как показано на рис. 1.7.

РИС. 1.7. Схема базы данных с обозначением отношения между табл tblCustomer и tblOrder

Для сохранения созданной схемы базы данных DatabaseDiagram1 выберите команду File→Save DatabaseDiagram1. В диалоговом окне Save New Database Diagram (Сохранить имя новой схемы базы данных) введите имя Relationships (Отношения) для новой схемы базы данных. При этом возможно появление диалогового окна с просьбой подтвердить создание новой таблицы. Щелкните на кнопке Yes для сохранения вновь созданной таблицы tblOrder.

SQL Server может сохранять схему базы данных вместе с самой базой данных. Таким образом, всегда можно получить доступ к схеме, даже с помощью других инструментов, например с помощью программы Enterprise Manager или среды Visual Studio .NET.

 

Использование программы Microsoft Visio для просмотра и изменения схемы базы данных

Помимо инструментов среды Visual Studio .NET, для создания, просмотра и изменения схем базы данных могут использоваться другие очень удобные средства. Программа Microsoft Visio обладает всеми необходимыми возможностями автоматического создания схемы для уже имеющейся базы данных, т.е. реинжиниринга базы данных. Эта функциональная возможность особенно полезна для работы с унаследованными базами данных, которые создавались очень давно и с использованием совсем других инструментов.

НА 3AMETKУ

Для создания базы данных SQL Server совсем необязательно знать особенности работы с программой Visio. Это всего лишь еще один способ создания и документирования схемы базы с помощью одного набора операций. Если вы предпочитаете использовать компонент Server Explorer среды Visual Studio (или инструмент Enterprise Manager) либо у вас нет программы Visio, то в таком случае можно пропустить данный раздел без ущерба для понимания остального материала.

Реинжиниринг (reverse engineering) базы данных заключается в проверке схемы существующей базы данных и создании диаграммы отношений между объектами базы данных (Entity Relationship Diagram – ERD). ERD-диаграмма — это способ символьного представления базы данных, основанный на широких категориях данных, или сущностях (entities), которые обычно хранятся в базе данных в виде таблиц.

Для реинжиниринга схемы базы данных с помощью программы Visio выполните перечисленные ниже действия.

1. Запустите программу Microsoft Visio 2002 for Enterprise Architects, выбрав команду Start→Programs→Microsoft Visio. В панели Choose Drawing Type (Выбрать тип рисования) выберите категорию Database (База данных).

2. Затем в панели Template (Шаблон) выберите параметр Database Model Diagram (Схема базы данных), и на экране появится основное окно программы Visio (рис. 1.8).

3. Выберите команду меню Database→Reverse Engineer (База данных→Реинжиниринг) для запуска программы-мастера Reverse Engineer Wizard.

4. Из списка Installed Visio drivers (Инсталлированные драйверы Visio) выберите драйвер Microsoft SQL Server.

5. Затем нужно определить источник данных, который позволит получить доступ к базе данных Novelty. Для этого щелкните на кнопке New.

6. На экране появится диалоговое окно Create New Data Source (Создать новый источник данных) с предложением указать тип создаваемого источника данных.

Выберите источник данных System Data Source и щелкните на кнопке Next. 

РИС. 1.8. Основное окно программы Visio: слева показан шаблон, а справа – область рисования. Элементы схемы создаются с помощью перетаскивания элементов шаблона в область рисования

7. В следующем окне снова предлагается выбрать драйвер базы данных. Прокрутите список драйверов и выберите SQL Server. Щелкните на кнопке Next, a затем на кнопке Finish.

8. На экране появится новое диалоговое окно Create a New Data Source to SQL Server (Создать новый источник данных для SQL Server) с предложением указать источник данных. Введите имя базы данных Novelty в поле Name, а затем в списке с надписью Which SQL Server do you want to connect to? (К какому серверу SQL Server нужно присоединиться?) выберите После этого щелкните на кнопке Next.

9. Укажите режим аутентификации на сервере SQL Server. (Более подробно этот вопрос рассматривается в главе 3, "Знакомство с SQL Server Затем щелкните на кнопке Next.

10. В следующем диалоговом окне установите флажок Change the default database to: (Заменить используемую по умолчанию базу данных:) и выберите в списке базу данных Novelty. Щелкните на кнопке Next, а затем на кнопке Finish.

 11. В последнем диалоговом окне ODBC Microsoft SQL Server Setup (Установки параметров драйвера ODBC Microsoft SQL Server) можно протестировать соединение с базой данных с помощью известных параметров соединения. Щелкните на кнопке Test Data Source (Проверка источника данных), чтобы убедиться в работоспособности соединения. После успешной проверки соединения щелкните на кнопке OK.

12. После этого источник данных Novelty будет автоматически выбран и представлен в диалоговом окне программы-мастера Reverse Engineer Wizard. Дважды щелкните на кнопке Next, чтобы пропустить экран для выбора типов объекта.

13. На следующем экране выберите таблицы tblCustomer и tblOrder для выполнения реинжиниринга. Затем щелкните на кнопке Finish. После этого программа Visio самостоятельно создаст схему вашей базы данных, включая отношение междуопределенными ранее таблицами tblCustomer и tblOrder (рис. 1.9).

РИС. 1.9. Схема, созданная с помощью программы-мастера Reverse Engineer Wizard, с двумя таблицами базы данных Novelty и отношениями между ними

В результате такого трудоемкого и рутинного процесса программа-мастер Reverse Engineer Wizard устраняет необходимость использования отдельной программы-мастера для создания источника данных ODBC – устаревшей технологии компании Microsoft, предназначенной для обеспечения взаимодействия приложений с реляционными базами данных. (Более подробно технология ODBC описывалась в прежнем издании книги, но она не очень широко используется в среде Visual Studio .NET, а потому эта тема опущена в данном издании.)

Важной особенностью технологии ODBC является то, что после создания именованного источника данных ODBC его не нужно создавать повторно. Для следующих попыток доступа к базе данных Novelty используется уже созданный источник данных ODBC.

Что нужно сделать для добавления в схему другой таблицы с помощью программы Visio? Напомним, что исходная версия схемы базы данных, созданная Брэдом Джонсом на клочке салфетки, включала возможность отбирать клиентов по региону. Поэтому в данную схему нужно включить таблицу с регионами, выполнив перечисленные ниже действия.

1. В окне Entity Relationship (Отношения между объектами) в левой части окна программы Visio щелкните на компоненте Entity (Объект) и перетащите его в область рисования. При этом будет создан новый объект (таблица), который по умолчанию называется Table 1.

2. Щелкните правой кнопкой мыши на созданном объекте и выберите в контекстном меню команду Database Properties (Свойства базы данных). На экране появится страница свойств базы данных Database Properties.

3. Введите новое имя таблицы tblRegion в текстовом поле Physical name (Физическое имя).

4. В списке Categories (Категории) страницы свойств базы данных Database Properties щелкните на категории Columns (Поля) и создайте три поля в сетке с определением таблицы, как показано на рис. 1.10. Обратите внимание, что для длины поля типа char или varchar нужно выбрать поле и щелкнуть на кнопке Edit (Редактировать) с правой стороны страницы свойств.

После выполнения этих действий схема базы данных будет выглядеть, как показано на рис. 1.10.

НА ЗАМЕТКУ

Здесь продемонстрирован очень простой способ создания схемы базы данных. Учтите, что в программе Visio есть много других более сложных специализированных шаблонов для создания схем базы данных.

Между таблицами tblRegion и tblCustomer существует отношение на основе связи между их полями State. Для отражения этого отношения в схеме нужно использовать компонент Relationship так, как описано ниже. 

РИС. 1.10. ERD-диаграмма с определением новой таблицы tblRegion

1. В окне Entity Relationship (Отношения между объектами) в левой части окна программы Visio щелкните на компоненте Relationship и перетащите его в область рисования. Он представляет собой линию со стрелкой и с зелеными квадратиками (метка-манипулятор) на концах линии.

2. Щелкните и перетащите одну из зеленых меток на таблицу tblRegion. При этом цвет метки станет красным, что означает незавершенность выполняемых действий с данным отношением.

3. Щелкните и перетащите другую зеленую метку на таблицу tblCustomer.

4. В странице свойств в нижней части окна Visio выберите поля State в обеих таблицах, а затем щелкните на кнопке Associate (Связать). Теперь ERD-диаграмма будет выглядеть, как показано на рис. 1.11. Обратите внимание, что кнопка между двумя списками полей из таблиц tblRegion и tblCustomer либо будет неактивной, либо будет содержать надпись Disconnect (Разорвать) или Associate (Связать). Например при выборе по одному полю в каждом списке эта кнопка будет иметь надпись Associate.

Рис. 1.11. ERD-диаграмма с отображением отношения между таблицами tblCustomer и tbIOrder

После создания таблицы в схеме базы данных можно использовать программу Visio для создания таблицы в базе данных. Для этого нужно выбрать команду меню Database→Update (База данных→Обновить). На экране появится диалоговое окно программы-мастера Database Update Wizard с предложением выполнить обновление. Для обновления базы данных можно создать сценарий на языке определения данных (Data Definition Language — DDL), который внесет все необходимые изменения в базу данных. Этот способ позволяет задокументировать все вносимые изменения и использовать их для репликации. (Более подробно DDL рассматривается в главе 2, "Запросы и команды на языке SQL".) Для обновления базы данных программа Visio может просто внести их в базу данных без создания сценария на DDL. Программа-мастер Database Update Wizard позволяет использовать любой из этих вариантов либо оба вместе.

Часто создание графической модели позволяет обнаружить недостатки схемы базы данных. Например, созданная ранее схема позволяет сохранять информацию о клиентах и заказах, но заказы состоят из товаров, взятых со склада компании и проданных клиенту. Однако в данной схеме базы данных не предусмотрена возможность просмотра товаров, заказанных клиентом.

Для решения этой проблемы нужно создать таблицу для хранения сведений о товарах заказа, которая имеет приведенную ниже структуру. 

tblOrderItem
ID
OrderID
ItemID
Quantity
Cost

Теперь между таблицами tblOrder и tblOrderItem существует отношение типа один-ко-многим, как показано на рис. 1.12.

Полностью схему всей базы данных Novelty можно скопировать в виде файла для программы Visio с Web-страницы этой книги на Web-сервере Издательского дома "Вильяме" по адресу: www.williamspublishng.com.

НА ЗАМЕТКУ

Не следует путать процесс создания схемы базы данных с процессом создания программного обеспечения. В большинстве компаний по созданию программного обеспечения используется методология, которая регламентирует решаемые бизнес-задачи, внешний вид программного обеспечения и способ его создания. Их нужно учитывать при разработке базы данных.

 

Отношения

 

Отношение — это способ формального определения того, как две таблицы связаны друг с другом. При определении отношения необходимо сообщить процессору баз данных, через какие два поля связываются две таблицы, участвующие в создании отношения.

РИС. 1.12. Схема базы данных с отношениями между четырьмя таблицами

Полями, создающими отношение, являются первичный ключ (представленный выше в этой главе) и внешний (foreign) ключ. Внешний ключ — это ключ в связанной таблице, который хранит копию первичного ключа из основной таблицы.

Предположим, у вас есть таблицы с характеристиками отделов и сотрудников компании. Отношение между отделом и группой сотрудников можно определить типом один-ко-многим. Каждому отделу присваивается собственный идентификационный номер (ID), и каждый сотрудник имеет свой ID. Но, чтобы указать, в каком отделе работает каждый сотрудник, необходимо сделать копию номера ID отдела в каждой записи, содержащей данные о сотруднике. Итак, чтобы идентифицировать каждого сотрудника как члена некоторого отдела, в таблице Employees (Сотрудники) должно быть предусмотрено поле (именуемое, допустим, Department ID) для хранения ID отдела, в котором работает данный сотрудник. Поле Department ID в таблице Employees служит внешним ключом таблицы Employees, поскольку хранит копию первичного ключа таблицы Departments (Отделы).

Благодаря отношению процессор баз данных "знает", какие две таблицы участвуют в этом отношении и какой внешний ключ связан с первичным ключом. Для прежнего процессора Jet базы данных Access явное объявление отношений не обязательно, но это в ваших же интересах, поскольку при таком объявлении упрощается задача выборки данных из записей двух или нескольких связанных таблиц (подробнее об этом в главе 2, "Запросы и команды на языке SQL"). Отсутствие такого объявления – один из основных недостатков технологии Jet, который можно устранить с помощью переноса унаследованных приложений на основе технологии Jet на платформу ADO.NET. Помимо соответствия связанных записей в отдельных таблицах, отношение определяется для того, чтобы воспользоваться преимуществами ссылочной целостности, под которой понимают свойство процессора базы данных, обеспечивающее непротиворечивость информации, хранимой в многотабличной базе данных. Когда ссылочная целостность имеет место в базе данных, то процессор баз данных препятствует удалению записи в случае, если в базе данных существуют другие записи, связанные с ней.

После того как вы определите отношение в базе данных, это определение сохраняется до тех пор, пока вы не удалите его. Отношения можно создавать графически, используя инструменты Visual Studio .NET, SQL Enterprise Manager, Visio, или с помощью сценариев на языке DDL.

 

Использование ссылочной целостности для поддержания непротиворечивости данных

Когда таблицы связаны между собой посредством отношений, данные в каждой из связанных таблиц должны оставаться согласованными друг с другом. Ссылочная целостность справляется с этой задачей, отслеживая отношения между таблицами и запрещая выполнение определенных типов операций над записями.

Допустим, у вас есть таблицы tblCustomer и tblOrder. Эти две таблицы связаны через общее поле ID.

Предполагается, что сначала вы регистрируете клиентов в таблице tblCustomer, а затем создаете записи с информацией о заказах в таблице tblOrder. Но что произойдет, если запустить процесс, удаляющий запись с данными о клиенте, который оформил заказы, зарегистрированные в таблице tblOrder? А если создать заказ, для которого не существует действительного значения поля CustomerID? Любой заказ без значения поля CustomerID не будет отгружен, поскольку адрес отгрузки представляет собой функцию от записи в таблице tblCustomer. Когда данные в связанных таблицах страдают от такого рода проблемы, их называют несогласованными или противоречивыми.

Поскольку очень важно, чтобы база данных не стала противоречивой, во многих процессорах баз данных (включая SQL Server) предусмотрен способ определения формальных отношений между таблицами. При формальном определении отношения между двумя таблицами процессор баз данных отслеживает это отношение и препятствует выполнению любой операции, которая "покушается" на ссылочную целостность.

Ссылочная целостность обеспечивается путем генерирования ошибок при выполнении действия, которое могло бы оставить данные в противоречивом состоянии. Например, в базе данных с активизированной ссылочной целостностью при попытке создать заказ, содержащий идентификационный номер (ID) клиента, которого на самом деле не существует, вы получите сообщение об ошибке и "подозрительный" заказ не будет создан.

 

Проверка ограничений ссылочной целостности с помощью Server Explorer

Для проверки отношения между таблицами tblCustomer и tblOrder попробуем использовать окно Server Explorer среды Visual Studio .NET. Для этого выполните перечисленные ниже действия.

1. Откройте схему базы данных Novelty с двумя таблицами- tblCustomer и tblOrder. Обратите внимание на то, что эта схема содержит и другие таблицы, но в данном случае нас интересует отношение между этими таблицами.

2. Щелкните правой кнопкой мыши на линии отношения между двумя этими таблицами и из контекстного меню выберите команду Property Pages.

3. После появления на экране страницы свойств данного отношения выберите вкладку Relationships, в которой указаны поле ID таблицы tblCustomer, поле CustomerID таблицы tblOrder и ограничения ссылочной целостности в нижней части.

НА ЗАМЕТКУ

По умолчанию при создании отношения задаются ограничения ссылочной целостности (например, нельзя создать заказ для несуществующего клиента), но не заданы условия каскадного удаления. Более подробно эти условия рассматриваются далее.

4. Установите флажок Enforce Relationship for INSERTS and UPDATES (Применять каскадное обновление и удаление), а затем щелкните на кнопке Close.

5. Для сохранения внесенных изменений выберите команду File→Save Relationships.

Для проверки заданного ограничения выполните перечисленные ниже действия.

1. В окне Server Explorer щелкните правой кнопкой мыши на таблице tblOrder и выберите из контекстного меню команду Retrieve Data from Table.

2. Введите заказ для клиента идентификатором которого на самом деле нет в таблице с данными о клиентах.

3. Перейдите в другую строку для автоматического сохранения введенного заказа.

В результате на экране появится диалоговое окно с предупреждением: INSERT statement conflicted with COLUMN FOREIGN KEY constraint ' FK_tblOrder_tblCustomer'. Conflict occurred in database 'Novelty', table 'tblCustomer', column 'ID'. The statement has been terminated. (Команда INSERT конфликтует с ОГРАНИЧЕНИЕМ ПО ВНЕШНЕМУ КЛЮЧУ 'FK_tblOrder_tblCustomer'. Конфликт произошел в базе данных 'Novelty', таблице 'tblCustomer', поле 'ID'. Выполнение команды прекращено.)

4. Щелкните на кнопке OK в окне с предупреждением и отмените команду вставки новой записи с помощью клавиши .

В данном случае наша цель заключалась не во вводе нового заказа, а в демонстрации сообщения об ошибке. Однако если вам действительно нужно создать заказ, то в таком случае следует создать запись для клиента, получить его идентификатор ID и использовать его в поле CustomerID при создании заказа.

В рабочем приложении эта проблема обычно решается автоматически с помощью специально созданного пользовательского интерфейса. Далее в книге рассматривается несколько стратегий согласованного управления связанными данными.

 

Каскадные обновления и каскадные удаления

Каскадные обновления и каскадные удаления – весьма полезные свойства процессора баз данных SQL Server. И вот почему.

• Каскадные обновления. При изменении значения первичного ключа таблицы связанные данные во внешних ключах, относящихся к этой таблице, также изменяются, отражая изменения в первичном ключе. Следовательно, если вы измените идентификатор ID клиента Хокки Марта (Hockey Mart) в таблице tblCustomer с 48 на 72, то значение поля CustomerID всех заказов, сгенерированных этим Хокки Мартом в таблице tblOrder, автоматически изменится с 48 на 72. В рабочем приложении редко приходится изменять значения ключа (основная концепция заключается в том, что ключ должен быть уникальным и неизменным), но если это все-таки приходится делать, то все каскадные обновления этого ключа во внешних ключах будут выполнены автоматически.

• Каскадные удаления. При удалении записи в таблице все записи, связанные с этой записью в соответствующих таблицах, автоматически удаляются. Следовательно, если вы удалите запись для Хокки Марта в таблице tblCustomer, все записи в таблице tblOrder для клиента Хокки Марта автоматически удаляются.

НА ЗАМЕТКУ

Устанавливая отношения, выполняющие каскадные обновления и удаления в базе данных, следует проявлять определенную осторожность. При недостаточной бдительности можно допустить удаление (или обновление) большего объема данных, чем ожидалось. Некоторые разработчики базы данных вообще отказываются от каскадного обновления и удаления, предпочитая явное управление ссылочной целостностью данных среди связанных таблиц. Однако, более внимательно изучив особенности каскадного обновления и удаления, можно убедиться в том, что они довольно легко программируются.

Каскадные обновления и удаления работают только в том случае, если вы установили отношение между двумя таблицами. Если вы всегда создаете таблицы с первичным ключом типа AutoNumber (Счетчик), (или первичными ключами типа AutoIncrement в терминах SQL Server), то каскадные удаления для вас окажутся более полезными, чем каскадные обновления, поскольку вы не в силах изменить значение поля типа AutoNumber или поля AutoIncrement (т.е. нет обновлений – нечего и тиражировать).

Для проверки возможностей каскадного удаления с помощью окна Server Explorer выполните перечисленные ниже действия.

1. Убедитесь в том, что между таблицами tblCustomer и tblOrder задано отношение с каскадным удалением. (Для проверки или указания этого ограничения воспользуйтесь схемой базы данных.)

2. Создайте запись о новом клиенте, щелкнув правой кнопкой мыши на таблице tblCustomer узла Tables в окне Server Explorer, выбрав в контекстном меню команду Retrieve Data from Table и введя необходимые данные. Запомните идентификатор ID, присвоенный процессором базы данных новому клиенту, потому что он потребуется для создания заказов данного клиента. Пусть эта таблица остается открытой, потому что она нам еще понадобится чуть позже.

3. Откройте таблицу tblOrder и создайте 2-3 заказа для нового клиента. Для этого укажите в поле CustomerID идентификатор ID, присвоенный процессором базы данных новому клиенту. Пусть эта таблица также остается открытой.

4. Вернитесь к таблице tblCustomer и попытайтесь удалить запись с данными этого клиента, щелкнув правой кнопкой мыши на левом конце записи и выбрав из контекстного меню команду Delete.

5. После этого на экране появится диалоговое окно с предупреждением и просьбой подтвердить удаление данных. Щелкните на кнопке Yes.

6. Вернитесь к таблице tblOrder, и вы обнаружите, что заказы этого клиента не удалены. Что произошло? На самом деле они удалены, но дают устаревшее представление данных. Для его обновления нужно выбрать команду меню Query→Run (Запрос1→Запуск). После этого вид таблицы будет обновлен и связанные заказы данного клиента будут удалены благодаря параметрам каскадного удаления.

 

Нормализация

 

Нормализация — это тесно связанное с отношениями понятие, которое означает устранение противоречий и повышение эффективности базы данных.

Базы данных считаются противоречивыми, если данные одной таблицы не соответствуют данным другой. Например, если ряд ваших сотрудников считают, что Арканзас находится на западе, а остальные — что на юге, при этом те и другие выполняют ввод данных, опираясь только на свои знания, то отчеты о состоянии дел на западе будут недостоверными.

Неэффективная база, данных, как правило, не позволяет выделять именно те данные, которые вам требуются. Если база данных хранит всю информацию в одной таблице, вы можете просто потерять самообладание, пока найдете в ней нужный телефонный номер. С другой стороны, полностью нормализованная база данных хранит каждую частицу информации в отдельной таблице и уникальным образом идентифицирует ее собственным первичным ключом. Нормализованные базы данных позволяют ссылаться на любую частицу информации в любой таблице, используя первичный ключ.

При проектировании и инициализации базы данных нужно решить, как ее нормализовать. Обычно все, что связано с приложением базы данных (от структуры таблиц до структуры запросов, от пользовательского интерфейса до поведения отчетов), вытекает из характера нормализации вашей базы данных.

НА ЗАМЕТКУ

Как разработчику баз данных, вам еще придется столкнуться с базами данных, которые не нормализованы по той или иной причине. Недостаток нормализации может намеренным (например, для достижения более высокой производительности) или оказаться результатом неопытности либо небрежности разработчика базы данных. В любом случае, если вы собираетесь нормализовать существующую базу данных, вам нужно сделать это как можно раньше (поскольку все остальное в разработке базы данных зависит от структуры ее таблиц). Кроме того, для приведения в порядок базы данных с недостаточно продуманной структурой можно использовать команды языка определения данных. Они позволяют переносить Данные из одной таблицы в другую, а также добавлять, обновлять и удалять из таблиц записи, отвечающие заданному критерию.

В качестве примера выбора варианта нормализации можно создать проект базы данных и рассмотреть требование, выдвинутое Брэдом Джонсом в бизнес-ситуации 1.2. Ему требуется способ хранения названия штата, в котором проживает клиент, а также информации о регионе страны, к которому относится этот штат. Начинающий разработчик может создать одно поле для хранения названия штата, а второе — для названия региона страны.

tblCustomer
ID
FirstName
LastName
Address
Company
City
State
PostalCode
Phone
Fax
Email
Region  

Эта структура первоначально может показаться рациональной, однако посмотрим, что произойдет, если кто-нибудь постарается ввести данные в приложение, основанное на этой таблице.

Если бы вы вводили обычную информацию о клиенте - имя, адрес и т.д., то после ввода названия штата вам бы пришлось задуматься, чтобы определить регион проживания данного клиента. Где же находится этот Арканзас – на западе или на юге? Где находится клиент с Виргинских островов? Если существует большая вероятность ошибки, то такого рода решения не стоит оставлять в руках операторов, занимающихся вводом данных, даже несмотря на их высокую квалификацию. Если же полагаться только на человеческую память, то рано или поздно ваши данные станут противоречивыми. А чтобы защитить данные от противоречивости, и следует обращаться к нормализации.

Вместо того чтобы при регистрации каждого нового клиента возлагать процесс принятия решения на операторов ввода, лучше хранить информацию, связанную с регионами, в отдельной таблице. Эту таблицу можно было бы назвать tblRegion; структура ее совсем проста.

tblRegion
ID
State
 Region

Данные в этой таблице выглядели бы следующим образом: 

State Region
AK Север
AL Юг
AR Юг
AZ Запад
... ... 

В этой усовершенствованной версии структуры базы данных для выборки информации о регионе вам придется выполнить двухтабличный запрос с объединением двух таблиц – tblCustomer и tblRegion, причем из одной таблицы вы получите информацию о штате, а из другой – о регионе (на основании информации о штате). В объединениях сопоставляются записи, имеющие общие поля, в отдельных таблицах. (Более подробно объединения описываются в главе 2, "Запросы и команды на языке SQL".) Хранение информации о регионах в отдельной таблице имеет ряд преимуществ.

• Если вы решили выделить новый регион на основе существующего, то для отражения рождения нового региона проще изменить всего несколько записей в таблице tblRegion, чем тысячи записей в таблице tblCustomer.

• Если вы расширите свой бизнес за пределы 50 штатов, то для отражения изменений в бизнесе достаточно опять-таки добавить новый регион. Для этого вам понадобится внести в таблицу tblRegion всего по одной записи для каждой новой области, и эта новая запись немедленно станет доступной для всей системы.

• Если обнаружится необходимость использования принципов регионального деления в других задачах, решаемых на основе этой базы данных (например, для обозначения того, что офис по продажам, расположенный в определенном штате, обслуживает определенный регион), то вы могли бы с успехом использовать таблицу tblRegion без модификаций.

Отсюда вытекает, что для отдельных категорий информации следует всегда ориентироваться на создание отдельных таблиц. Во время разработки структуры базы данных (еще до реального построения самой базы данных) необходимо хорошо продумать, какие таблицы вам нужны и как они будут связаны друг с другом. Создание схемы базы данных (см. раздел о создании схемы базы данных выше в этой главе) является частью этого важного процесса.

 

Отношения типа один-к-одному

Предположим, в вашей базе данных есть таблицы, в которых хранится информация о сотрудниках и видах работ. Если каждому служащему назначается один вид работы, то отношение между сотрудниками и видами работ можно определить типом один-к-одному, поскольку для каждого сотрудника в базе данных существует только один вид работы. Это простейший тип отношений как для понимания, так и для реализации, поскольку в таких отношениях таблица обычно занимает место поля в другой таблице, причем поля, участвующие в отношении, легко идентифицировать.

Однако это не самый распространенный тип отношений в функционирующих приложениях ведения баз данных. Тому есть две причины.

Почти всегда можно выразить отношение типа один-к-одному без использования двух таблиц. При этом быстродействие только повысится, хотя будет утрачена гибкость, предоставляемая хранением связанных данных в отдельной таблице. В предыдущем примере вместо создания отдельной таблицы с данными о видах работ можно поместить все поля, связанные с работой, в таблицу, предназначенную для хранения данных о сотрудниках.

Выражение отношения один-ко-многим почти такое же простое для понимания (но гораздо более гибкое), как выражение отношения один-к-одному, поэтому сразу же переходим к следующему разделу.

 

Отношения типа один-ко-многим

Гораздо чаще, чем отношения типа один-к-одному, в базах данных используются отношения типа один-ко-многим, в которых каждая запись таблицы связана с одной или несколькими записями в другой таблице (или вообще не связана ни с какими записями). В созданной ранее схеме базы данных между клиентами и заказами задано отношение один-ко-многим. Каждый клиент может иметь один или несколько заказов (или вообще не иметь заказов), поэтому между таблицами tblCustomers и tblOrder существует отношение один-ко-многим.

Напомним, что для реализации такого отношения в базе данных копируется первичный ключ из таблицы на стороне "один" в таблицу на стороне "многие". В пользовательском интерфейсе для ввода данных этот тип отношения обычно имеет вид формы с основной (master) и подчиненной (slave) частями, в которой одна основная запись отображается со своими подчиненными записями в отдельной части формы. В пользовательском интерфейсе первичный ключ из одной таблицы обычно связывает ся с внешним ключом из связанной таблицы с помощью списка или поля со списком.

 

Отношения типа многие-ко-многим

Отношение типа многие-ко-многим по сравнению с отношением один-ко-многим идет еще дальше. В качестве классического примера отношения типа многие-ко-многим можно привести отношение между студентами и классами. Каждый студент может иметь много классов, а каждый класс – много студентов. (Конечно же, возможны варианты, когда класс будет состоять из одного студента или в нем вовсе не будет ни одного учащегося, а также вполне возможно для студента иметь только один класс или ни одного.)

В данном бизнес-примере отношение задается между заказами и позициями заказа, т.е. каждый заказ может содержать несколько позиций, а каждая позиция может присутствовать в нескольких заказах.

Чтобы установить отношение многие-ко-многим, необходимо иметь три таблицы: две для хранения реальных данных и третью (именуемую соединительной) для хранения отношения между двумя первыми таблицами. Таблица соединения обычно состоит только из двух внешних ключей – по одному из каждой связанной таблицы, хотя иногда в таблице соединения полезно использовать собственное поле с идентификаторами для предоставления доступа к записям таблицы с помощью программных средств.

В качестве примера отношения многие-ко-многим можно модифицировать пример из предыдущего раздела таким образом, чтобы в базе данных хранилось несколько позиций, связанных с одним заказом, т.е. у каждого заказа было много позиций и каждая позиция относилась к неограниченному количеству заказов. В этом случае таблицы могут выглядеть так, как показано на рис. 1.13.

РИС. 1.13. В этой группе таблиц, участвующих в отношении многие-ко-многим, tbIOrderItem является таблицей соединения

 

Создание пользовательского интерфейса на основе Windows Forms

 

Разработчики предыдущих версий Visual Basic первыми предложили концепцию связывания данных, согласно которой связанный с данными объект или элемент управления данными (data control) позволяет программистам с минимальными усилиями создавать простые, связанные с данными пользовательские интерфейсы. В Visual Basic .NET эта концепция также поддерживается, а многие недостатки прежней версии устранены.

В прошлом разработчик мог установить связь между формой Visual Basic и базой данных с помощью элементов управления данными. Они предоставляют основные функции просмотра данных, позволяя приложению манипулировать наборами данных, вводить и обновлять их.

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

1. Автоматически созданный код, в отличие от абстрактного элемента управления данными, можно просматривать, поэтому он позволяет в большей степени контролировать способы доступа к данным.

2. Изучая автоматически созданный код, программист может познакомиться с классами платформы .NET, предназначенными для доступа к данным, что особенно полезно для тех, кто не имеет опыта работы на платформе .NET.

3. Основное назначение элементов управления данными в прежней версии Visual Basic  это подключение к базе данных, создание запроса к ней и управление данными. Теперь эти функции распределены между несколькими объектами, каждый из которых можно отдельно конфигурировать и использовать.

В приведенных ранее примерах создана база данных, которая вполне подходит для ознакомления с основными принципами создания связанного с данными пользовательского интерфейса. В следующих разделах демонстрируются способы создания связанных с базой данных приложений на основе Windows Forms.

 

Подключение к базе данных и работа с записями

Нет ничего проще, чем создать приложение на основе Windows Forms. И в этом заявлении нет никакого преувеличения; более того, если вас интересует лишь просмотр содержимого базы данных, вам вообще не придется писать ни единой строки кода. Весь процесс состоит из двух этапов: подключение к базе данных и связывание последнего пользовательского интерфейса с источником данных, генерированным Visual Studio .NET. Для этого выполните перечисленные ниже действия.

1. В Visual Studio .NET создайте новый проект на основе Windows Forms и откройте новую форму Form1.

2. В окне Server Explorer найдите созданную ранее таблицу tblCustomer и перетащите ее из окна Server Explorer в форму Form1.

3. После этого в нижней части окна с формой Form1 появятся объекты SqlConnection1 и SqlDataAdapter1.

Для извлечения и отображения данных используются три объекта: объект SqlConnection1 создает подключение к базе данных, объект-адаптер SqlDataAdapter1 извлекает данные, а объект DataSet сохраняет данные, извлеченные адаптером SqlDataAdapter1. Для создания объекта DataSet выполните следующее.

 1. Выберите команду меню Data→Generate Dataset (Данные1→Генерация набора данных), и на экране появится диалоговое окно Generate Dataset.

2. Воспользуйтесь всеми заданными по умолчанию параметрами и щелкните на кнопке OK. В результате будет создан новый объект DataSet11, который будет располагаться в нижней части окна под формой Form1 возле объектов SqlConnection1 иSqlDataAdapter1.

Для просмотра данных в форме создайте в форме элемент управления пользовательского интерфейса и свяжите его с только что созданным объектом DataSet11, выполнив перечисленные ниже действия.

1. Откройте панель элементов управления Toolbox с помощью команды меню View→Toolbox (Просмотр→Панель инструментов управления), перейдите во вкладку Windows Forms и найдите элемент управления DataGrid (Сетка данных). Перетащите его в форму Form1, и в ней появится экземпляр DataGrid1 объекта DataGrid.

2. Свяжите этот элемент управления с источником данных. Для этого с помощью команды меню View→Properties Window (Просмотр1→Окно свойств) откройте окно свойств Properties и выберите для свойства DataSource (Источник данных) сетки DataGrid1 источник данных DataSet11. Затем выберите для свойства DataMember (Элемент данных) сетки DataGrid1 таблицу tblCustomer.

3. Наконец, создайте код извлечения данных из базы данных и вставки их в сетку DataGrid1. Для этого дважды щелкните на форме, и в окне просмотра кода автоматически появится процедура Form1_Load. Введите в ней следующий код:

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

 ByVal e As System.EventArgs) Handles MyBase.Load

 SqlDataAdapter1.Fill(DataSet11)

End Sub

4. Запустите полученное приложение с помощью команды меню Debug→Start (Отладка→Запуск), и в окне приложения будут отображены данные из таблицы tblCustomer.

Здесь следует отметить одну особенность данного приложения. Все внесенные в нем изменения данных не будут отражены и сохранены в базе данных. Для их сохранения нужно создать дополнительный код вызова метода объекта DataAdapter. Эта тема рассматривается далее, в разделе об обновлении записей.

 

Создание приложения для просмотра данных

В предыдущем примере показан простейший способ связывания данных на основе извлечения всей таблицы и отображения ее в элементе управления DataGrid. А как отобразить только одну запись? Для этого потребуется использовать элементы управления TextBox и Button, а также создать дополнительный код.

Чтобы создать приложение для просмотра данных по одной записи из таблицы tblCustomer, выполните ряд действий.

 1. В Visual Studio .NET создайте новый проект на основе Windows Forms и откройте новую форму Form1. Создайте в ней два текстовых поля, txtFirstName и txtLastName, на основе элемента управления TextBox.

2. Создайте объекты SqlConnection, SqlDataAdapter и DataSet для извлечения данных о клиентах из таблицы tblCustomer. (Необходимые для этого действия аналогичны действиям из предыдущего примера.) Как и прежде, не забудьте вызвать метод Fill объекта SqlDataAdapter в коде для инициализации объекта DataSet. (В данном примере объект DataSet имеет имя DsCustomer1. - Прим. ред.)

3. Теперь нужно создать связь между двумя текстовыми полями (txtFirstName и txtLastName) и соответствующими полями в базе данных. Для этого щелкните на текстовом поле txtFirstName и в группе свойств Data выберите подгруппу свойств (DataBindings). Это свойство содержит несколько свойств, которые следует установить для связывания данных таблицы с текстовым полем.

4. Выберите поле FirstName таблицы tblCustomer для свойства Text текстового поля txtFirstName. Для этого щелкните в правой части поля со списком возле свойства Text. Выберите набор данных DsCustomer1, таблицу tblCustomer и поле FirstName, как показано на рис. 1.14.

РИС. 1.14. Создание связи между данными из поля базы, данных и текстовым полем с помощью свойств (DataBindings)

5. Аналогично свяжите текстовое поле txtLastName с полем LastName таблицы tblCustomer.

6. Запустите приложение, в текстовых полях которого будут отображены имя и фамилия первого клиента.

Возможности этого приложения весьма ограниченны, потому что в нем можно просматривать только по одной записи и нельзя редактировать данные. Однако оно является базовым приложением, на основе которого будут созданы несколько других примеров с более широкими возможностями рабочего приложения для полномасштабной работы с базами данных.

Даже в таком ограниченном примере очевидны преимущества способов связывания данных на платформе .NET: они более гибки, чем аналогичные способы в Visual Basic 6. Например, упомянутая гибкость достигается за счет способности управлять процессом связывания с помощью кода.

Попробуем теперь создать код для перехода от одной записи к другой с помощью перечисленных ниже действий.

1. Создайте две кнопки, btnNext и btnPrevious, для перехода к следующей и предыдущей записям.

2. Дважды щелкните на кнопке btnNext и в автоматически появившемся окне редактирования кода с определением процедуры btnNext_Click вставьте следующий код:

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

 ByVal e As System.EventArgs) Handles btnNext.Click

 Me.BindingContext(DsCustomer1, "tblCustomer").Position += 1

End Sub

3. Дважды щелкните на кнопке btnPrevious и в автоматически появившемся окне редактирования кода с определением процедуры btnPrevious_Click вставьте код

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

 ByVal e As System.EventArgs) Handles btnPrevious.Click

 Me.BindingContext(DsCustomer1, "tblCustomer").Position -= 1

End Sub

4. Снова запустите приложение и убедитесь в том, что с помощью созданных кнопок можно переходить к следующей и предыдущей записям. (Учтите, что эта программа будет работать только при наличии нескольких записей в таблице.)

Объект BindingContext предоставляет средства организации перехода к другим записям в приложении для работы с данными. При создании таких приложений в предыдущих версиях Visual Basic для организации переходов к другим записям требовалось использовать элемент управления Data. На платформе .NET выделен, специальный объект BindingContext, который отвечает за связывание данных. (Иными словами, выделение небольшого специализированного объекта из более крупного общего объекта позволяет распределить специализированные функции среди нескольких объектов меньшего размера.) В объектно-ориентированном программировании разработчик стремится создавать специализированные объекты, чтобы упростить структуру программы и сделать ее более гибкой.

Таким образом, при создании приложения, рассчитанного на работу с базами данных, для составления запросов, обновления данных, связывания элементов управления пользовательского интерфейса с данными и перехода к полям таблицы не рекомендуется использовать один громоздкий объект Data. Вместо него в Windows Forms и ADO.NET предусмотрено несколько отдельных специализированных объектов. Выделение функций доступа к данным – ключевое достоинство платформы .NET Framework (этот вопрос подробно рассматривается в следующих главах).

Объект BindingContext является членом семейства объектов Windows Forms (а точнее, членом пространства имен System.Windows.Forms платформы .NET Framework) и содержит множество полезных свойств и методов. Например, объект BindingContext можно использовать для определения количества записей в источнике данных так, как описано ниже.

1. Создайте ярлык lblDataStatus с помощью элемента управления Label с пустой строкой в свойстве Text.

2. В коде формы создайте подпрограмму ShowDataStatus с указанным ниже кодом, которая будет отображать текущее расположение записи и общее количество записей в ярлыке lblDataStatus.

Private Sub ShowDataStatus()

 With Me.bindingContext(DsCustomer1, "tblCustomer")

  lblDataStatus. Text = "Record " +  s.Position + 1 & " of " & .Count

 End With

End Sub

3. Поместите вызов этой подпрограммы ShowDataStatus в подпрограммы обработки событий загрузки формы (Forml_Load) и щелчков мыши на обеих кнопках (btnNext_Click и btnPrevious_Click). Это позволит отображать обновленную информацию о текущем количестве записей и текущей записи при загрузке формы и после каждого перемещения к другой записи. Учтите, что отсчет текущего номера записи (свойство Position объекта DataBindings) начинается с нуля (как и во всех коллекциях на платформе.NET). Поэтому для получения реального номера записи следует прибавить к нему 1.

4. Запустите приложение и попробуйте перейти к разным записям таблицы. Тогда в ярлыке будет отображено общее количество записей в таблице и номер текущей записи.

 

Программный способ связывания данных

С помощью Windows Forms связывание данных можно организовать программно. Это позволяет добиться более высокой гибкости в ситуациях, когда расположение полей неизвестно во время создания приложения либо требуется явно выразить связь между элементами управления и полями другим способом, чем предлагается в интегрированной среде разработки.

Чтобы организовать связь с элементами управления пользовательского интерфейса, следует создать метод Add объекта DataBindings элемента управления Windows Forms. В листинге 1.1 показан типичный способ создания связи с данными в приложении для работы с базами данных.

Листинг 1.1. Программный способ очистки и установления связи сданными

Private Sub Form1_Load (ByVal sender As System.Object, ByVal e As _

 System.EventArgs) Handles MyBase.Load

 txtFirstName.DataBindings.Clear()

 txtLastName.DataBindings.Clear()

 txtFirstName.DataBindings.Add("Text", DsCustomer1, "tblCustomer.LastName")

 txtLastName.DataBindings.Add("Text", DsCustomer1, "tblCustomer.LastName")

 sqlAdapterl.Fill(DsCustomer1)

 ShowDataStatus()

End Sub

(Убедитесь в том, что для свойства ConnectionString объекта SqlConnection1 задана верная строка подключения с используемым вами сервером SQL Server. Дело в том, что в коде этого примера, который можно скопировать по адресу:  указана строка подключения к серверу SQL Server, установленному на компьютере ROCKO автора книги. – Прим. ред.)

Обратите внимание, что вызовы метода Clear элементов управления коллекции DataBindings не обязательно создавать в разрабатываемом приложении. Они нужны в этом случае, потому что связь с данными ранее задана с помощью окна Properties.

Метод Add коллекции DataBindings принимает три параметра: свойство элемента управления, с которым связываются данные; объект источника данных (обычно, но не обязательно объект DataSet), ссылка на член источника данных, который предоставляет данные. После запуска приложения с приведенным выше кодом для метода Load в поле с именем клиента будет отображена его фамилия, а в поле с фамилией – его имя.

 

Элементы управления, взаимодействующие с данными

Элементом управления, взаимодействующим с данными (data-aware control), может быть любой элемент управления, имеющий свойство-коллекцию DataBindings. С помощью этого свойства можно ссылаться на любой тип данных, включая реляционные источник данных.

Свойство DataBindings соединяет элемент управления пользовательского интерфейса с элементом управления данными (т.е. именно так происходит связывание пользовательского интерфейса с базой данных). Поэтому говорят, что элемент управления пользовательского интерфейса связан с базой данных через элемент управления данными.

В предыдущих версиях Visual Basic с источником данных можно было связать относительно небольшое количество элементов управления пользовательского интерфейса. Возможности манипулирования связанными с данными элементами управления были довольно ограниченными: пользователь мог связать их с теми источниками данных, для которых существует провайдер данных ADO. Для взаимодействующих с данными элементов управления разработчику приходилось создавать рутинный код большого размера для выполнения вручную всех операций связывания данных. На платформе.NET практически каждый элемент управления Windows Forms может быть связан с данными, включая сложные элементы управления, например Tree View. Более того, разработчик не ограничен только реляционными источниками данных или известными среде Visual Studio .NET или ADO.NET. Любой объект, реализующий интерфейс IList, может быть связан с данными, включая наборы данных DataSet и более сложные конструкции, например массивы и коллекции.

 

Обновление записей в приложении просмотра данных

До сих пор в приведенных ранее примерах нам удавалось только извлекать и просматривать данные. А изменять данные можно было только в элементах пользовательского интерфейса, но их нельзя было сохранить (зафиксировать) в базе данных.

Интуитивно понятно, что изменения в связанном с данными элементе управления пользовательского интерфейса должны автоматически сохраняться в базе данных. Именно так работают различные связанные с данными элементы управления пользовательского интерфейса в прежних версиях Visual Basic. Почему же в Windows Forms на платформе.NET связывание с данными организовано иначе?

Принудительная фиксация обновлений в источнике данных с помощью дополнительной строки кода продиктована требованиями гибкости и более высокой производительности. Рассмотрим принцип работы объекта DataSet на платформе .NET.

На рис. 1.15 показана схема взаимосвязи между формой, объектом DataSet и базой данных в приложении на основе Windows Forms.

РИС. 1.15. Схема взаимосвязи между связанной формой, объектом DataSet и базой данных

В созданном ранее приложении все данные в исходном состоянии находятся в базе данных. Затем они извлекаются и сохраняются в памяти в объекте DataSet. Форма содержит элементы управления, связанные с полями таблицы в объекте DataSet. Форма обнаруживает появление новых данных и автоматически отображает содержимое полей в связанных с данными элементах управления.

В связанном с данными приложении изменение содержимого связанного с данными элемента управления влияет только на объект DataSet, т.е. изменение содержимого текстового поля приводит к изменению содержимого записи в таблице, которая находится в объекте DataSet. Но изменение объекта DataSet не копируется в базу данных, а сохраняется до тех пор, пока не поступит явное указание скопировать их в базу данных (с помощью метода Update набора данных DataSet). Хотя явное включение этой инструкции может показаться излишним (ведь в прежних версиях Visual Basic этого делать было не нужно), но на самом деле оно позволяет добиться более высокой производительности. Дело в том, что в таком случае приложению не нужно постоянно поддерживать соединение с базой данных во время редактирования данных пользователем.

В листинге 1.2 показан пример модифицированных обработчиков событий, которые позволяют редактировать данные в созданном ранее приложении.

Листинг 1.2. Сохранение данных с помощью явного обновления объекта DataSet при перемещении пользователя к другим записям

Private Sub btnNext_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bfnNext.Click

 Me.BindingContext(DsCustomer1, "tbICustomer").Position += 1

 SqlDataAdapter1.Update(DsCustomer1)

 ShowDataStatus()

End Sub

Private Sub btnPrevious_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnPrevious.Click

 Me.BindingContext(DsCustomerl, "tblCustomer").Position -= 1

 SqlDataAdapter1.Update(DsCustomer1)

 ShowDataStatus()

End Sub

Конечно, обновлять каждую запись при перемещении пользователя к другим записям совсем не обязательно. Поскольку разработчик может контролировать способ обновления объекта DataSet, можно было бы организовать обновление внесенных изменений с помощью специальной кнопки или команды меню Save. Можно также отложить фиксацию обновлений до окончания редактирования группы строк, т.е. использовать пакетное обновление. ВADO.NET для пакетного обновления не нужно создавать какой-либо иной специализированный код, потому что оно выполняется автоматически объектами DataSet (который сохраняет данные в памяти) и SqlDataAdapter (который отвечает за выполнение необходимых команд управления базой данных для гарантированного корректного представления, вставки, обновления и удаления данных). Более подробно связь между этими объектами описывается в главах 5, "ADO.NET: объект DataSet", и 6, "ADO.NET: объект DataAdapter".

 

Создание новых записей в форме, связанной с данными

Для создания новой записи в связанном с данными приложении на основе Windows Forms нужно использовать метод AddNew объекта BindingContext. При выполнении этого метода любые связанные с данными элементы управления очищаются для ввода новых данных. После ввода новых данных они фиксируются в базе данных с помощью метода Update объекта DataAdapter (как в предыдущем примере).

Для создания новых записей в связанном с данными приложении выполните перечисленные ниже действия.

1. Создайте в форме новую кнопку с именем btnNew и укажите значение New (Ввести новые данные) для ее свойства Text.

2. Щелкните дважды на кнопке и введите приведенный ниже код обработки события щелчка на этой кнопке.

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

 ByVal e As System.EventArgs) Handles btnNew.Click

 Me.BindingContext(DsCustomer1, "tblCustomer").AddNew()

 txtFirstName.Focus()

 ShowDataStatus()

End Sub

3. Запустите приложение и щелкните на кнопке New. После очистки текстового поля пользователь сможет ввести в форме новую запись. Для сохранения новой записи нужно перейти к другой записи с помощью кнопок Next или Previous.

Учтите, что кнопки Next или Previous фиксируют обновления объекта DataSet, поэтому в данном примере не нужно использовать явные инструкции обновления объекта DataSet после создания новой записи. В данном случае достаточно просто перейти к другой записи. Но если пользователь закроет приложение до фиксации новых данных в базе данных (либо неявно с помощью перехода к другой записи, либо явно с помощью метода Update объекта DataAdapter), то новые данные будут утрачены.

Кроме того, пользователю обычно предоставляют возможность отмены внесенных изменений с помощью метода CancelCurrentEdit объекта BindingContext.

 

Удаление записей из связанной с данными формы

Для удаления записей из связанной с данными формы на основе Windows Forms нужно использовать метод RemoveAt объекта BindingContext. Этот метод принимает один параметр – индекс удаляемой записи. Для организации удаления текущей записи нужно использовать свойство Position в качестве параметра метода RemoveAt объекта BindingContext, как показано в листинге 1.3.

Листинг 1.3. Удаление данных в приложении для работы с данными с помощью метода RemoveAt объекта BindingContext

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

 ByVal e As System.EventArgs) Handles btnDelete.Click

 If MsgBox("Whoa bubba, you sure?", MsgBoxStyle.YesNo, "Delete record") = MsgBoxResult.Yes Then

  With Me.BindingContext(DsCustomer1, "tblCustomer")

   RemoveAt(.Position)

  End With

 End If

End Sub

Этот код основан на созданной перед этим кнопке btnDelete. Учтите, что эта процедура запрашивает пользователей, действительно ли они хотят удалить запись. Этот запрос позволяет избежать неприятных последствий в случае, если пользовательский интерфейс создан так, что пользователь может случайно удалить запись, щелкая на кнопке Delete. (Обратите внимание, что, кроме этого способа на основе диалогового окна с предупреждением об удалении записи, можно применять более сложные методы отката ошибочных изменений данных. Однако описание таких сложных конструкций выходит за рамки данной главы.)

Учтите, что метод RemoveAt способен определять и обрабатывать стандартные исключительные ситуации, например при отсутствии данных или после очистки данных в элементе управления пользовательского интерфейса при вызове метода AddNew. Эта возможность позволяет значительно усовершенствовать методы контроля над связанными сданными элементами управления в прежних версиях Visual Basic, для которых требовалось создавать громоздкий код обработки исключительных ситуаций, возникающих при выполнении пользователями непредсказуемых действий.

 

Проверка введенных данных в форме, связанной с данными

 

В программировании баз данных проверка введенных данных (validation) гарантирует, что эти данные отвечают правилам, определенным при проектировании приложения. Эти правила называются правилами проверки данных (validation rules). Один из способов проверки данных при программировании приложения на основе Windows Forms состоит в написании кода для события RowUpdating объекта DataAdapter. Событие RowUpdating возникает как раз перед обновлением записи, а событие Row-Updated — сразу после обновления записи. Размещая код проверки введенных данных в событие RowUpdating, можно быть уверенным в том, что будут обрабатываться любые изменения данных в любой части приложения.

Ключевым фактором эффективного использования события RowUpdating является использование свойств и методов аргумента события, который представлен в виде экземпляра объекта System.Data.SqlClient.SqlClient.SqlRowUpdatingEventArgs.

Кроме проверки команды обновления записи (с помощью свойства Command объекта), можно проинформировать адаптер данных DataAdapter об отказе от обновления и откате внесенных изменений. В листинге 1.4 этот подход иллюстрирует рассмотренный ранее пример приложения для просмотра данных.

Листинг 1.4. Построчная проверка введенных данных с помощью события RowUpdating объекта DataAdapter

Private Sub SqlDataAdapter1_RowUpdating(ByVal sender As Object, _

 ByVal e As System.Data.SqlClient.SqlRowUpdatingEventArgs) _

 Handles SqlDataAdapter1.RowUpdating

 If e.Row.Item("FirstName") = "" Or e.Row.Item("LastName") = "" Then

  MsgBox("Change not saved; customer must have a first and last name.")

  e.Status = UpdateStatus.SkipCurrentRow

  e.Row.RejectChanges()

 End If

End Sub

Передача значения UpdateStatus.SkipCurrentRow свойству Status аргумента события позволяет сообщить адаптеру данных о прекращении операции, т.е. отмене обновления данных, потому что оно не прошло проверку. Но недостаточно просто прекратить выполнение операции, потому что в этом случае пользователь получит пустое текстовое поле (и пустое поле в объекте DataSet). Для решения этой проблемы следует вызвать метод RejectChanges объекта Row, который содержится в аргументе события. Он обновит содержимое пользовательского интерфейса и сообщит объекту DataSet о том, что больше не нужно согласовывать эту строку с базой данных. После этого можно продолжать редактирование данных, не беспокоясь об их безопасности.

 

Проверка введенных данных на уровне процессора баз данных

Помимо проверки данных во время ввода информации, следует знать о том, что можно также выполнять проверку и на уровне процессора баз данных. Такая проверка обычно более надежна, поскольку применяется независимо от причины изменения данных. При этом вам не нужно заботиться о реализации правил проверки введенных данных в каждом приложении, которое получает доступ к какой-нибудь таблице. Однако проверка введенных данных на уровне процессора баз данных отличается меньшей гибкостью, поскольку его практически невозможно переопределить, и часто имеет примитивную форму (обычно ограничивается тем, что не допускает ввод в поля пустых значений). Кроме того, проверку введенных данных на уровне процессора баз данных можно выполнять только на уровне поля, и вы не сможете сделать так, чтобы правила проверки введенных данных, реализуемые процессором баз данных, были основаны на сравнении значений двух полей (если только проверка не реализована на основе ограничения первичный/внешний ключ или реализована в серверной процедуре в виде триггера).

Контроль на уровне процессора баз данных является функцией схемы базы данных. Предположим, вы хотите быть уверены в том, что ни одна запись о клиенте не будет введена в таблицу tblCustomer без указания его имени и фамилии. Тогда установите правило проверки введенных данных на уровне процессора баз данных, выполнив перечисленные ниже действия.

1. В окне Server Explorer среды Visual Studio .NET откройте схему таблицы tblCustomer.

2. В столбце Allow Nulls (Допускаются неопределенные значения) снимите флажки FirstName и LastName.

3. Сохраните схему таблицы tblCustomer с помощью команды меню File→Save tblCustomer.

Теперь никакое программное обеспечение, использующее эту базу данных, не сможет ввести запись о клиенте без указания его имени и фамилии. (Любая попытка приведет к возникновению исключительной ситуации.)

 

Резюме

Эта глава посвящена основам баз данных в целом, а также простейшим способам соединения приложений Visual Basic .NET для работы сданными, хранящимися в базе данных SQL Server. Следует учитывать, что правильно составленная схема базы данных может значительно повысить производительность и практичность приложения. Нормализация, ссылочная целостность и индексирование могут оказаться весьма эффективными для достижения этих целей. Однако помните, что чрезмерное индексирование может привести к обратному эффекту и замедлить работу приложения. В следующих главах приводятся примеры бизнес-ситуаций, в которых следует учитывать эти особенности.

 

Вопросы и ответы

Существует ли в Visual Studio .NET элемент управления Data, который в Visual Basic 6 можно было успешно использовать для быстрого создания прототипов данных?

Нет. Все функции элемента управления Data, который использовался в Visual Basic 6 и более старых версиях, теперь распределены среди разных объектов данных. Например, соединение с базой данных теперь создается с помощью отдельного объекта SqlConnection, операции извлечения, обновления и удаления данных — с помощью объектов BindingContext и DataAdapter, а операции перемещения по записям — с помощью объекта BindingContext. В отличие от прежних объектов для работы с данными, новые объекты не имеют никакого визуального представления во время выполнения, что позволяет разработчику создавать практически любые виды пользовательского интерфейса для работы с данными.

Можно ли первичный ключ составить из нескольких полей?

Да, хотя такие ключи встречаются нечасто. Они называются конкатенированными ключами. Например, если вы составляете конкатенированный первичный ключ из полей, содержащих имя и фамилию, то это значит, что в такой базе данных нельзя зарегистрировать полных "тезок", поскольку каждое сочетание имени и фамилии должно образовывать уникальное значение.

 

ГЛАВА 2

Запросы и команды на языке SQL

 

В главе 1, "Основы построения баз данных", где демонстрируется создание базы данных с помощью Visual Studio .NET и SQL Server, вы познакомились со структурой базы данных и ее таблиц. В настоящей главе основное внимание уделяется манипулированию данными в таблицах, а также созданию и модификации структуры таблиц с помощью языка структурированных запросов (Structured Query Language — SQL).

Благодаря запросам SQL пользователь может выбирать записи из таблицы базы данных, находить связанные с ними данные в других таблицах и манипулировать структурой баз данных. Кроме того, запросы SQL вполне применимы для манипулирования базами данных в программах.

Язык SQL представляет собой стандартный способ управления базами данных. Он реализован в различных формах многими производителями в системах реляционных баз данных, включая Microsoft Access и SQL Server, а также системы, созданные другими поставщиками программного обеспечения, например Oracle и IBM. (Язык SQL обязан своим происхождением разработчикам компании IBM.) Как правило, SQL используется для создания запросов, которые извлекают данные из баз данных, хотя множество команд SQL выполняют и другие действия, например создание таблиц и полей.

Команды SQL делятся на две категории:

• команды языка определения данных (Data Definition Language — DDL) , которые позволяют использовать запросы SQL для создания таких компонентов баз данных, как таблицы, поля и индексы;

• команды языка манипулирования данными (Data Manipulation Language которые позволяют извлекать, создавать, удалять и обновлять записи в базе данных.

В этой главе рассматриваются способы использования обеих категорий команд SQL.

 

Что такое запрос

Запрос (query) — это команда базы данных, осуществляющая выборку записей. Используя запросы, можно получить данные из одного или нескольких полей, принадлежащих одной или нескольким таблицам. При этом данные можно отбирать в соответствии с определенными условиями, называемыми критериями, которые служат для ограничения общего объема отбираемых данных.

Запросы в Visual Basic .NET обычно основаны на SQL. Это стандартный язык для осуществления выборки информации и других операций над базами данных. Он прост в освоении и реализован во многих различных базах данных, поэтому при желании преобразовать свое приложение управления базой данных SQL Server, например, в Sybase или Oracle вам не придется заново изучать совершенно новый язык запросов.

Однако все это теория. А на практике каждый производитель базы данных имеет собственный способ реализации стандарта (так называемый промышленный стандарт), и Microsoft в этом смысле не является исключением. Хотя реализация SQL в СУБД SQL Server радикально не отличается от реализаций прочих производителей, вы должны знать, что существуют и другие диалекты языка SQL. В частности, разразработчику с опытом работы с Microsoft Access при знакомстве с СУБД SQL Server придется столкнуться с множеством различий в синтаксисе SQL, которые подробно рассматриваются далее.

 

Тестирование запросов с помощью компонента Server Explorer

Компонент Server Explorer среды Visual Studio .NET — это полезный инструмент для опробования концепций, описанных в этой главе. С помощью перечисленных ниже действий создайте тестовое представление данных в окне компонента Server Explorer, которое можно будет использовать для тестирования запросов SQL, предлагаемых далее в главе.

Для выполнения примеров данной главы необходимо иметь доступ к SQL Server. (Подробно процесс инсталляции и запуска SQL Server описан в главе 3, "Знакомство с SQL Server 2000".) Далее в этой главе предполагается, что вы уже установили SQL Server и включили его в окно Server Explorer, как описано в главе 1, " Основы построения баз данных".

Для создания тестового представления данных в окне Server Explorer среды Visual Studio .NET выполните ряд действий.

1. В среде Visual Studio .NET создайте новый проект на основе Windows Forms.

2. В окне Server Explorer найдите SQL Server и разверните папку созданной ранее базы данных Novelty. Эта папка содержит несколько объектов, например схем

баз данных, таблиц и представлений.

3. Щелкните правой кнопкой мыши на папке с представлениями Views и выберите в контекстном меню команду New View (Новое представление).

4. В диалоговом окне Add Table (Создать таблицу) выберите таблицу tblCustomer и щелкните на кнопке Add (Создать). После этого структура созданной таблицы появится в окне конструктора представления.

5. Щелкните на кнопке Close для закрытия диалогового окна Add Table. На экране появится окно конструктора представления, состоящего из четырех панелей: структур, полей, запросов SQL и результатов (рис. 2.1).

6. Отметьте поля FirstName, LastName и Address в таблице tblCustomer. По мере выбора полей для создания запроса будут изменяться панели полей и запросов SQL.

7. Выберите команду меню Query→Run (Запрос→Запуск), и нижняя панель результатов выполнения запроса будет иметь вид как на рис. 2.2.

Созданный запрос можно сохранить для последующего использования. Сохраненные в базе данных запросы называются представлениями (views). Их можно использовать точно так же, как обычные таблицы базы данных. Они позволяют упростить работу со сложными базами данных, особенно если запросы включают несколько соединенных таблиц (как будет показано далее в главе).

РИС. 2.1. Диалоговое окно режима создания представления

РИС. 2.2. Диалоговое окно режима создания представления после запуска запроса

Для сохранения представления в среде Visual Studio .NET выберите команду меню File→Save View1, и Visual Studio .NET предложит ввести новое имя для данного представления. Укажите для него имя qryCustomerList. После этого представление будет сохранено в базе данных и его могут использовать другие разработчики, которым нужно получить доступ к базе данных.

НА ЗАМЕТКУ

Вы уже, наверное, заметили, что для таблиц и представлений используется простое соглашение об именах, основанное на присвоении префиксов tbl и qry именам объектов базы данных. Тому есть две причины. Во-первых, это упрощает определение типа объекта базы данных, потому что в некоторых ситуациях это может быть не совсем очевидно. Во-вторых, такое соглашение об именах использовалось в прежних изданиях этой книги и поддерживается здесь для преемственности.

Наше соглашение об именах уже знакомо программистам, которые имеют опыт работы с Microsoft Access. Хотя представленные здесь действия выполняются несколько иначе, чем к тому привыкли программисты, имеющие опыт работы с SQL Server, мы считаем, что наличие какого-либо соглашения об именах все же лучше, чем его отсутствие. Конечно, в своей работе вы можете использовать какое-то другое соглашение об именах.

В следующих разделах диалоговое окно режима создания представления будет использовано для создания запросов на выборку данных.

 

Отбор записей с помощью предложения SELECT

Предложение SELECT является основой каждого запроса, предназначенного для выборки данных. Оно указывает процессору баз данных, какие поля требуется возвратить. Общая форма предложения SELECT имеет следующий вид:

SELECT *

А его содержание таково: "Вернуть значения всех полей, найденных в указанном источнике записей". Эта форма команды удобна тем, что вам не обязательно знать имена извлекаемых полей таблицы. Однако выборка всех полей таблицы может быть не рациональной, особенно в том случае, когда требуется только два поля, в то время как такой запрос осуществляет выборку двух десятков полей.

Кроме команды, передаваемой процессору базы данных на возврат всех полей источника записей, можно задать конкретный перечень необходимых при отборе полей. Такое ограничение может улучшить эффективность выполнения запроса, особенно для больших таблиц, содержащих много полей, так как в этом случае отбираются только нужные поля.

Ниже приводится пример предложения SELECT, которое извлекает из базы данных значения только двух полей таблицы- FirstName и LastName, содержащих имя и фамилию клиента.

SELECT [FirstName], [LastName]

Обратите внимание также на то, что предложение SELECT не готово к выполнению без предложения FROM (поэтому примеры предложения SELECT, приведенные в этом разделе, выполнить в таком виде нельзя). Чтобы полнее ознакомиться с предложениями SELECT, просмотрите примеры использования предложения FROM, приведенные в следующем разделе.

 

Указание источника записей с помощью предложения FROM

Предложение FROM указывает на источник записей, из которого запрос извлекает записи. Этим источником может быть как таблица, так и другой хранимый запрос. У вас также есть возможность отбора записей из нескольких таблиц, которая подробно рассматривается далее, в разделе об объединении нескольких таблиц в одном запросе.

Предложения FROM работают совместно с предложениями SELECT. Например, чтобы отобрать все записи в таблице tblCustomer, используйте приведенную ниже команду SQL.

SELECT *

FROM tblCustomer

При выполнении этого запроса считываются все записи и все поля в таблице tblCustomer (без какого-либо упорядочения записей).

Чтобы отобрать только имя и фамилию клиентов, воспользуйтесь приведенной ниже командой SQL.

SELECT FirstName, LastName FROM tblCustomer

После изменения запроса в режиме конструктора представления выберите команду Query→Run (Запрос→Запуск) для обновления результатов выполнения запроса, которые теперь будут иметь такой вид, как на рис. 2.3.

РИС. 2.3. Результаты выполнения запроса на выборку данных из полей FirstName и LastName таблицы tblCustomer

Из соображений эффективности всегда ограничивайте число полей в предложении SELECT только теми полями, которые могут потребоваться вашему приложению. Обратите внимание, что записи, отобранные запросом SELECT FROM, в результирующем наборе не упорядочены. Если не задать порядок сортировки (использование предложения ORDER BY рассматривается ниже в этой главе), записи всегда возвращаются в неопределенном порядке.

 

Формирование критериев с использованием предложения WHERE

 

Предложение WHERE указывает процессору базы данных на необходимость ограничения количества отбираемых записей согласно одному или нескольким заданным критериям. Критерий — это логическое выражение, результатом оценки которого является либо "истина" (true), либо "ложь" (false). В языке SQL существует много аналогичных выражений эквивалентности, знакомых пользователям Visual Basic (например: >0 и =' Smith ').

Предположим, вам нужно отобрать только тех заказчиков, которые проживают в Калифорнии (СА). Для этого можно использовать приведенный ниже запрос SQL.

SELECT FirstName, LastName, State FROM tblCustomer

WHERE State = 'CA'

В результате выполнения этого запроса будет извлечена запись с данными о клиенте с именем Daisy Klein.

Обратите внимание также на то, что для обозначения текстовой строки в предложении WHERE используется одиночная кавычка. Подобное обозначение удобно тем, что отличается от обозначения текстовой строки в Visual Basic двойной кавычкой, а инструкции SQL иногда встраиваются в код Visual Basic.

Можно создавать более сложные предложения WHERE, связывая два и более критерия с помощью логических операторов AND или OR. Например, необходимо отобрать всех клиентов, проживающих в городе Денвер (Denver) штата Колорадо (СО), т.е. вас не интересуют те клиенты, которые проживают в других городах этого штата. Для этого нужно задать два критерия и связать их оператором AND, как показано в приведенном ниже примере.

SELECT FirstName, LastName, City, State

FROM tblCustomer

WHERE (State = 'CO') AND (City = 'Denver')

В результате выполнения этого запроса будет извлечена запись с данными о клиенте с именем ThurstonRyan, который живет в городе Денвер, штат Колорадо. Если в этом городе живут другие клиенты, то в результате выполнения данного запроса будут извлечены записи с информацией о них. Однако при этом не будут извлекаться сведения о клиентах, которые проживают в городах с тем же названием, но в других штатах.

Если вас интересует информация о клиентах в штатах Вашингтон (WA) и Калифорния (СА), воспользуйтесь оператором OR, чтобы связать два критерия, как показано ниже.

SELECT FirstName, LastName, City, State

FROM tblCustomer

WHERE State = 'CO' OR State = 'CA'

В результате выполнения этого запроса будут извлечены три записи с данными о клиентах в штатах Вашингтон и Калифорния. Из сказанного выше следует, что для отбора данных из таблицы с помощью условий AND и OR можно составить практически любую комбинацию критериев в предложении WHERE.

НА ЗАМЕТКУ

Ключ к успешной разработке приложений клиент/сервер – выработка такой тактики, согласно которой приложение-клиент не заказывало бы слишком много записей в одной выборке. Это гарантирует, что приложения будут выполняться быстро и компьютеры ваших пользователей не зависнут. Залог успеха вашей работы — рациональное использование предложения WHERE.

 

Операторы, используемые в предложении WHERE

 

При построении предложения WHERE можно использовать операторы, перечисленные в табл. 2.1.

Таблица 2.1. операторы, используемые в предложении WHERE 

Оператор Функция
< Меньше
<= Меньше или равно
> Больше
>= Больше или равно
= Равно
<>  Не равно
BETWEEN Внутри диапазона значений
LIKE Соответствует образцу
IN Входит в список значений  

 

Оператор BETWEEN

Этот оператор возвращает все записи, значения которых лежат внутри определенных вами границ. Например, для того чтобы отобрать все заказы, оформленные за период с 4 января по 5 июня 2001 года, необходимо написать приведенную ниже инструкцию SQL.

SELECT

FROM tblOrder

WHERE OrderDate BETWEEN '1/4/2001' AND '6/5/2001'

В результате выполнения этого запроса будут извлечены записи, показанные на рис. 2.4.

Обратите внимание, что значения даты в SQL Server обозначаются символом одиночной кавычки. Разработчикам, которые имеют опыт работы с датами в Microsoft Access и привыкли использовать для этого символ #, придется учесть это новшество и заменить символы # одиночными кавычками.

РИС. 2.4. Результаты выполнения запроса для таблицы tblOrder с использованиям предложения SELECT и оператора BETWEEN

Границы оператора BETWEEN являются включающими; это значит, что если вы запрашиваете информацию обо всех заказах, оформленных за период с 4 января по 5 июня 2001 года, то в результирующий набор включаются заказы, которые были оформлены как 4 января, так и 5 июня.

 

Оператор LIKE и символы шаблона

С помощью оператора LIKE отбираются записи, соответствующие заданному шаблону. Этот шаблон обычно состоит из так называемых подстановочных символов (wildcard characters) * или с которыми вы, возможно, уже знакомы по работе с файловыми системами MS DOS или Windows.

Символ процента (%) означает частичное соответствие. Например, чтобы отобрать в таблице tblCustomer все записи, в которых фамилия начинается с буквы J, можно воспользоваться приведенным ниже запросом.

SELECT ID, FirstName, LastName, Address, City, State

FROM tblCustomer

WHERE [LastName] LIKE 'J%'

В результате выполнения этого запроса будут извлечены записи для тех клиентов, фамилии которых начинаются с буквы J.

При создании шаблонов можно также использовать символ подчеркивания. Он занимает место только одного символа в шаблоне. Например, чтобы отобрать всех клиентов, у которых почтовый индекс состоит из пяти цифр и начинается с числа 80, воспользуйтесь следующей командой SQL:

SELECT ID, FirstName, LastName, Address, PostalCode

FROM tblCustomer

WHERE PostalCode LIKE '80___'

В результате выполнения этого запроса будут извлечены записи для тех клиентов, почтовый индекс которых начинается с числа 80.

Оператор LIKE можно использовать также для отбора записей на основе вхождения в диапазон определенных алфавитных или числовых значений. Например, чтобы возвратить список клиентов, фамилии которых начинаются с букв в диапазоне от А до М, используйте приведенную ниже команду SQL.

SELECT ID, FirstName, LastName

FROM tblCustomer

WHERE LastName LIKE '[A-M]%'

В результате выполнения этого запроса будут извлечены пять записей для тех клиентов, фамилии которых начинаются с букв в диапазоне от А до М.

НА ЗАМЕТКУ

Действие символов подстановки в Microsoft Access отличается от действия этих же символов в стандартном SQL. В Microsoft Access символ звездочки используется вместо символа процента для подбора любого числа произвольных символов, а символ знака вопроса – вместо символа подчеркивания для подбора любого одиночного символа. В стандартном SQL символ подчеркивания используется для подбора i любого числа произвольных символов, а символ процента – для подбора любого одиночного символа.

 

Оператор IN

Этот оператор используется для отбора записей, которые соответствуют элементам из заданного списка значений. Например, чтобы отобрать всех клиентов в штатах Колорадо (СО) или Висконсин (WI), воспользуйтесь приведенной ниже инструкцией SQL.

SELECT FirstName, LastName, State

FROM tblCustomer

WHERE State IN ('CO', 'WI')

В результате выполнения этого запроса будут извлечены три записи для тех клиентов, которые живут в штатах Колорадо или Висконсин. Как видите, с помощью оператора IN можно получить те же результаты, что и с помощью оператора OR. Некоторые разработчики предпочитают применять оператор IN при использовании нескольких критериев, поскольку в таком случае команда SQL выглядит более аккуратно.

 

Сортировка результатов с помощью предложения ORDER BY

 

Предложение ORDER BY формирует для процессора баз данных команду на сортировку отобранных записей. Можно сортировать по любому полю или нескольким полям, причем как в возрастающей, так и в убывающей последовательности. Для чтобы задать порядок сортировки, добавьте в конец обычного запроса SELECT предложение ORDER BY, а за ним укажите поле или поля, по которым нужно выполнить сортировку. Например, чтобы отобрать список клиентов, отсортированный по фамилии, воспользуйтесь приведенной ниже инструкцией SQL.

SELECT ID, FirstName, LastName

FROM tblCustomer

ORDER BY LastName

В результате выполнения этого запроса из таблицы tblCustomer будут извлечены все записи, упорядоченные по фамилиям клиентов.

 

Сортировка в убывающей последовательности

Для сортировки в убывающей последовательности задайте ключевое слово после имени поля, по которому проводится сортировка. Например, если нужно отобрать из таблицы tblOrder записи так, чтобы сначала располагались самые последние заказы, воспользуйтесь следующей командой SQL:

SELECT *

FROM tblOrder

order BY OrderDate desc

В результате выполнения этого запроса из таблицы tblOrder будут извлечены все записи, причем сначала будут располагаться самые последние заказы.

 

Сортировка по нескольким полям

Для того чтобы отсортировать записи по нескольким полям, после предложения ORDER BY перечислите поля друг за другом через запятую. Например, чтобы отсортировать записи в таблице tblCustomer по фамилии, а затем по имени, воспользуйтесь приведенной ниже командой SQL.

SELECT FirstName, LastName, City, State

FROM tblCustomer

ORDER BY LastName, FirstName

В результате выполнения этого запроса из таблицы tblCustomer будут извлечены все записи, отсортированные по фамилиям, а затем по именам (например, за клиентом Betty Klein будет располагаться клиент Daisy Klein).

 

Отображение первых или последних записей диапазона с помощью предложения ТОР

 

Ключевое слово ТОР используется для отображения некоторого количества начальных или конечных записей из большого результирующего набора. Для ограничения числа записей в результирующем наборе ключевое слово ТОР в запросах сочетается с предложением, указывающим порядок сортировки. Причем ключевое слово ТОР можно комбинировать как с числом, означающим количество записей, так и с числом, означающим процентное содержание отображаемых записей.

Например, необходимо отобрать три наиболее крупных заказа из числа последних заказов в таблице tblOrder. Для этого воспользуйтесь приведенной ниже инструкцией SQL.

SELECT ID, OrderDate, CustomerID

FROM tblOrder

ORDER BY OrderDate DESC

Обратите внимание, что ключевое слово DESC сортирует результирующий набор по убыванию. В результате выполнения этого запроса из таблицы tblOrder будут извлечены сведения о заказах каждого клиента, причем сначала будут располагаться самые последние заказы. Все просто прекрасно, за исключением того, что в базе данных, которая хранит информацию обо всех когда-либо выполненных заказах, придется просмотреть тысячи записей, в то время как вас интересуют только три наиболее крупных заказа. Поэтому вместо предыдущей команды попробуйте выполнить приведенную ниже инструкцию SQL.

SELECT TOP 3 *

FROM tblOrder

ORDER BY OrderAmount DESC

В результате выполнения этого запроса из таблицы tblOrder будут извлечены три записи для наиболее крупных заказов.

Почему же запрос вернул четыре записи вместо запрошенных трех? Такой запрос (ТОР 3) вовсе не гарантирует, что будут возвращены только три записи. Возможно, что результирующий набор будет содержать одну или две записи (или даже ни одной), если в таблице содержится только такое количество записей. А если на последнее место в результирующем наборе претендуют две и более записи, то вполне возможно, что будут возвращены четыре или даже большее количество записей.

В синтаксисе SQL нет понятия BOTTOM N, но зато есть возможность возвратить заданное количество последних записей в таблице. Для того чтобы создать такой запрос, достаточно отсортировать записи в возрастающей последовательности (т.е. от самого малого значения к самому большому), как показано ниже.

SELECT TOP 3 *

FROM tblOrder

ORDER BY OrderDate

Этот запрос показывает три самых "древних" заказа в базе данных.

Сортировка данных в порядке возрастания в SQL принимается по умолчанию. Поэтому нет необходимости использовать ключевое слово ASC для задания порядка сортировки по возрастанию.

 

Создание запросов TOP PERCENT

Можно писать запросы, возвращающие записи, количество которых определяется заданным процентом от общего количества записей в таблице. Например, если у вас есть таблица с 1000 записей и необходимо возвратить один процент первых записей, то, как правило, будет отображено 10 записей. (Возможно, будет отображено более 10 записей, если несколько записей имеют одинаковое значение. Такой же случай рассматривался и для запроса ТОР N.)

Для возврата первых записей в результирующий набор, количество которых задано процентным отношением к общему количеству записей в таблице, используется предложение TOP N PERCENT. Например, чтобы отобрать первые 20% от неоплаченных заказов в таблице tblOrder, воспользуйтесь приведенной ниже командой SQL.

SELECT TOP 20 PERCENT *

FROM tblOrder

ORDER BY OrderDate DESC

В результате выполнения этого запроса из таблицы tblOrder будут извлечены две записи для самых последних заказов, которые составляют 20% от 10 строк таблицы tblOrder.

 

Объединение связанных таблиц в запросе

 

Для выборки связанной информации из нескольких таблиц используется объединение (join). Чтобы создать объединение в запросе, необходимо определить первичные (primary) и внешние (foreign) ключи в таблицах, участвующих в объединении (эти понятия обсуждаются в главе 1, "Основы построения баз данных"). Например, рассмотрим две связанные таблицы с показанными ниже структурами.

tblCustomer
ID
FirstName
LastName
Address
City
State
PostalCode
Phone
Fax
Email
tblOrder
ID
CustomerID
OrderDate
OrderAmount

Хотя в таблице tblOrder хранится информация о заказах, а в таблице tblCustomer — информация о клиентах, вполне вероятно, что вам потребуется, например, отобрать такую информацию о заказах клиентов, как показано ниже.

FirstName LastName OrderDate
Jane Winters 9/10/2001
Jane Winters 8/16/2001
Thurston Ryan 7/2/2001
Dave Martin 6/5/2001
Daisy Klein 4/4/2001
...

Такой результирующий набор нетрудно получить, используя объединение, несмотря на то что необходимые данные хранятся в разных таблицах. Можно надеяться на получение нужных данных, если сообщить процессору баз данных о том, что первичный ключ таблицы tblCustomer(ID) связан с внешним ключом ((CustomerID)) таблицы tblOrder.

НА ЗАМЕТКУ

Обратите внимание, что в этом результате объединения один и тот же клиент отображен дважды, хотя его имя было введено в базу данных один раз. Это значит, что клиент имеет несколько заказов. Иными словами, при нескольких заказах одного и того же клиента вам не пришлось вводить в базу данных информацию об этом клиенте несколько раз. Вместе с тем в результате выполнения запроса иногда можно получить избыточную информацию. Для исправления такой ситуации можно применять несколько разных методов.

 

Выражение объединения в SQL

В SQL Server объединение можно установить с помощью выражения эквивалентности между двумя полями, например:

SELECT FirstName, LastName, OrderDate

FROM tblOrder INNER JOIN tblCustomer

ON tblOrder.CustomerID = tblCustomer.ID

Этот запрос SQL возвращает информацию обо всех клиентах, которые имеют заказы в таблице tblOrder. В результате выполнения запроса возвращаются три столбца данных: поля FirstName и LastName из таблицы tblCustomer, а также поле OrderDate из таблицы tblOrder.

Обратите внимание, что в запросе с объединением таблиц при использовании полей, имеющих одинаковые имена, но принадлежащих разным таблицам, необходимо перед именем поля вставлять ссылку на соответствующую таблицу (например, tblOrder.ID вместо ID). В большинстве случаев при использовании конструктора представлений в среде Visual Studio .NET для создания запроса интегрированная среда разработки способна определить выполняемые действия и дополнить выражение недостающими частями. Как уже сообщалось ранее, в данной книге примеры инструкций SQL приводятся в наиболее кратком виде, а необязательные части применяются только в случае необходимости.

 

Использование конструктора представлений для создания объединений

Поскольку создание объединений может составлять самую сложную часть запросов, особенно когда задействовано более двух таблиц, неплохо было бы при создании таких запросов иметь некоторое подспорье. К счастью, в Visual Basic предусмотрен конструктор представлений (View Designer), благодаря которому создание запроса с объединением нескольких таблиц значительно упрощается. При использовании конструктора представлений нет необходимости запоминать сложный синтаксис объединения в SQL. Вместо этого можно создать объединение графическим путем, выполнив приведенные ниже действия.

1. В окне Server Explorer создайте новое представление для базы данных Novelty.

2. После этого появится диалоговое окно Add Table (Создать таблицу), в котором следует указать таблицы tblCustomer и tblOrder, а затем щелкнуть на кнопке Close. Схема представления в окне конструктора представлений показана на рис. 2.5.

РИС. 2.5. Создание объединения двух таблиц в окне конструктора представлений

Обратите внимание на то, что конструктор представлений автоматически создает объединение между двумя таблицами на основе известного ключевого поля ID в таблице tblCustomer и явно заданного ранее отношения с полем CustomerID в таблице tblOrder.

После выполнения запроса на основе объединения двух таблиц в окне конструктора представлений будут отображены извлеченные данные, как показано на рис. 2.6.

 

Использование внешних объединений

Обычное (внутреннее) объединение (inner join) возвращает записи из двух таблиц, если значение первичного ключа первой таблицы соответствует значению внешнего ключа второй таблицы, связанной с первой. Предположим, необходимо получить все записи из одной таблицы, участвующей в объединении, вне зависимости от того, существуют ли связанные записи в другой таблице. В этом случае необходимо использовать внешнее объединение (outer join).

Например, для извлечения списка клиентов и заказов, в который включены также клиенты, не имеющие неоплаченных заказов, можно использовать приведенный ниже запрос.

SELECT FirstName, LastName, OrderDate

FROM tblCustomer LEFT OUTER JOIN

tblOrder ON tblCustomer.ID = tblOrder.CustomerID

Обратите внимание, что в предложении LEFT JOIN используется синтаксис имя_таблицы.имя_поля. Более длинное имя позволяет избежать неоднозначности при использовании полей с одинаковыми именами, поскольку поле ID существует как в так и в tblOrder. Фактически предложение LEFT OUTER JOIN означает, что будут отображены все данные таблицы tblCustomer, которая находится в левой стороне выражения tblCustomer.ID = tblOrder.CustomerID.

РИС. 2.6. Выполнение запроса на основе объединения двух таблиц в окне конструктора представлений

Этот запрос возвращает приведенный ниже набор записей.

FirstName LastName OrderDate
John Smith 1/4/2001
John Smith 1/9/2001
Jill Azalia 1/14/2001
Brad Jones <NULL>
Daisy Klein 2/18/2001
Daisy Klein 3/21/2001
Daisy Klein 4/4/2001
Dave Martin 6/5/2001
Betty Klein <NULL>
Thurston Ryan 7/2/2001
Jane Winters 8/16/2001
Jane Winters 9/10/2001

В этот результирующий набор включены все клиенты базы данных, независимо от того, имеют ли они заказы или нет. Для клиентов, не имеющих заказов, в поле OrderDate появится , что означает отсутствие данных.

Правое внешнее объединение (right join) аналогично левому внешнему объединению (left join), за исключением того, что оно возвращает все записи из второй таблицы, участвующей в объединении (имеется в виду таблица с правой стороны), независимо от того, есть ли соответствующие им записи в первой таблице (расположенной с левой стороны). (Левое и правое объединения являются разновидностями внешнего объединения и в определенных обстоятельствах могут возвращать идентичные результаты.)

 

Выполнение вычислений в запросах

В строках запроса допускается выполнение вычислений. Для этого нужно просто заменить имя поля в предложении SELECT именем арифметического выражения. Допустим, вам нужно создать запрос для вычисления налога с продаж для складских запасов (сведения о которых хранятся в таблице tblItem). В приведенном ниже запросе SQL вычисляется налог с продаж с учетной ставкой 7,5% для каждого товара.

SELECT ID, Item, Price, Price * 0.075 AS SalesTax

FROM tblItem

После выполнения этого запроса будут получен показанный ниже результат. 

ID Name Price SalesTax
1 Rubber Chicken 5.99 0.44925
2 Hand Buzzer 1.39 0.10425
3 Stink Bomb 1.29 0.09675
4 Disappearing Penny Magic Trick 3.99 0.29925
5 Invisible Ink 2.29 0.17175
6 Loaded Dice 3.49 0.26175
7 Whoopee Cushion 5.99 0.44925 

Поскольку в этих вычислениях фигурируют деньги, конечный результат нужно округлить до двух десятичных знаков. К счастью, в SQL Server для этого предусмотрена специальная функция ROUND, которая позволяет очень легко выполнить это. Обычно ее используют с указанием двух параметров: собственно десятичного числа и точности, выраженной в виде количества знаков после запятой. Вот как выглядит запрос с функцией ROUND:

SELECT Name, Retail Price, ROUND (Retail Price + Retail Price * 0.075, 2)

AS PriceWithTax

FROM tblInventory

Результат выполнения этого запроса приведен ниже.

Name Retail Price PriceWithTax
Rubber Chicken 5.99 6.44
Hand Buzzer 1.39 1.49
Stink Bomb 1.29 1.39
Disappearing Penny Magic Trick 3.99 4.29
Invisible Ink 2.29 2.46
Loaded Dice 3.49 3.75
Whoopee Cushion 5.99 6.44 

 

Определение псевдонимов с использованием предложения AS

Из предыдущего примера ясно, что существует возможность определения псевдонимов (alias), т.е. переименования полей в запросе. Это может быть вызвано следующими причинами:

• в основной таблице имена полей могут быть громоздкими, а в результирующем наборе должны быть понятными и простыми;

• запрос создает столбец, который заполняется в результате некоторых вычислений или операций подведения итогов, а новому столбцу обязательно нужно задать имя.

Независимо от причины, это легко сделать в запросе SQL с помощью предложения AS. Например, вам нужно выполнить ряд сложных вычислений для определения суммарной стоимости отгруженных товаров ExtendedPrice. Для этого напишите следующий код SQL:

SELECT TOP 5 ItemID, Quantity, Price,

tblInventory.RetailPrice * tblOrderTime.Quantity AS ExtendedPrice

FROM tblOrderTime INNER JOIN

tblInventory ON tblOrderTime.ItemID = tblITem.ID

Этот запрос возвращает приведенный ниже результирующий набор.

ItemID Quantity RetailPrice ExtendedPrice
1 1 5.99 5.99
2 2 1.39 2.78
5 3 2.29 6.87
4 2 3.99 7.98
7 1 5.99 5.99  

Обратите внимание, что данные в поле ExtendedPrice не хранятся в базе данных, они вычислены "на лету".

 

Запросы, которые группируют данные и подводят итоги

 

Часто требуется создавать запросы, подобные следующему: "Сколько заказов поступило вчера?" При этом вас не интересует, кто оформил заказ, вы только хотите знать количество вчерашних заказов. Это можно сделать, используя запросы, группирующие итоговые функции.

Запросы с группировкой подводят итоги по одному или нескольким полям. Например, если вам интересно увидеть число заказов для каждого клиента, то нужно создать приведенный ниже запрос для таблицы tblOrder с группировкой данных по полю CustomerID.

SELECT CustomerID, COUNT(CustomerID) AS TotalOrders

FROM tblOrder

GROUP BY CustomerID

Результат выполнения такого запроса приведен ниже.

CustomerID TotalOrders
1 2
2 1
4 3
5 1
7 1
8 2  

Обратите внимание на использование предложения AS в этом выражении SQL. Оно предназначено для присвоения имени столбцу, содержащему результат итоговой функции, поскольку этот результат вычисляется, а не хранится в базе данных.

Для отображения имен клиентов вместо их идентификаторов нужно просто объединить с результатами запроса данные из таблицы tblCustomer.

SELECT tblOrder.CustomerID, FirstName, LastName

COUNT(dbo.tblOrder.CustomerID) AS TotalOrders 

FROM tblOrder INNER JOIN tblCustomer

ON tblOrder.CustomerID = tblCustomer.ID

GROUP BY FirstName, LastName, CustomerID

После выполнения такого запроса будет получен приведенный ниже результат.

CustomerID FirstName LastName TotalOrders
1 John Smith 2
2 Jill Azalia 1
4 Daisy Klein 3
5 Dave Martin 1
7 Thurston Ryan 1
8 Jane Winters 2  

В этом случае предложение GROUP BY содержит поле CustomerID вместе с объединенными полями FirstName и LastName из таблицы tblCustomer. При использовании предложения GROUP BY в него необходимо включить все поля, по которым группируются извлекаемые записи. В данном случае идентификатор клиента и его имя участвуют в группировании данных и потому присутствуют в предложении GROUP BY. (К счастью, если вы забудете выполнить эту операцию, среда Visual Studio .NET автоматически предложит вам сделать это.)

 

Применение предложения HAVING для группирования данных в запросах

Как уже отмечалось выше, критерий запроса служит для ограничения количества извлекаемых записей. В обычных запросах для включения критериев используется предложение WHERE, в запросах с группированием — предложение HAVING. Эти предложения применяются совершенно одинаково, за исключением того, что HAVING относится к агрегированным строкам (т.е. к результату группирования), a WHERE – к отдельным строкам. Это довольно незначительное отличие, потому что в 9 случаях из 10 они дают совершенно одинаковый результат. Например для создания отчета о продажах клиента Jane с группированием данных можно использовать приведенный ниже запрос.

SELECT tblOrder.CustomerID, FirstName, LastName,

COUNT(dbo.tblOrder.CustomerID) AS TotalOrders

FROM tblOrder INNER JOIN tblCustomer

ON tblOrder.CustomerID = tblCustomer.ID

GROUP BY FirstName, LastName, CustomerID

HAVING FirstName = 'Jane'

Этот запрос возвращает одну запись для клиента Jane Winters с указанием двух сделанных ею заказов. Допустим, теперь нужно получить список активных покупателей, т.е. клиентов, сделавших более одного заказа. Поскольку агрегированное количество заказов хранится в вычисленном поле TotalOrders, можно предположить, что для определения таких клиентов допустимо использовать выражение HAVING TotalOrders > 1. К сожалению, это выражение некорректно, так как TotalOrders – это не поле базы данных, а вычисленное поле. Вместо этого следует включить данное вычисление в предложение HAVING показанного ниже запроса.

SELECT tblOrder.CustomerID, FirstName, LastName,

COUNT(dbo.tblOrder.CustomerID) AS TotalOrders

FROM tblOrder INNER JOIN tblCustomer

ON tblOrder.CustomerID = tblCustomer.ID

GROUP BY FirstName, LastName, CustomerID

HAVING (COUNT(tblOrder.CustomerID) > 1)

После выполнения этого запроса будут получены три строки, каждая из которых содержит номер, имя, фамилию и количество заказов для каждого клиента, который сделал более одного заказа.

CustomerID FirstName LastName TotalOrders
1 John Smith 2
4 Daisy Klein 3
8 Jane Winters

 

Функция SUM

Ваши возможности в подведении итогов не ограничены простым подсчетом записей. Используя функцию SUM, можно генерировать итоговые результаты для всех возвращаемых записей по любым числовым полям. Например, для создания запроса, который генерирует итоги по количеству заказанных товаров каждым клиентом, необходимо написать следующую команду SQL:

SELECT OrderID, SUM(Quantity) AS TotalItems

FROM tblOrderItem

GROUP BY OrderID

Этот запрос возвращает приведенный ниже результирующий набор.

OrderID TotalItems
1 6
2 2
3 1
4 23
5 4
6 13
7 12
8 3
9 4
10 4

Как и в предыдущих примерах группирования, если вы захотите извлечь дополнительную связанную информацию (например, имя и фамилию клиента), следует использовать объединение с другой таблицей. Помните, что для агрегирования данных потребуется сгруппировать данные по крайней мере по одному полю.

 

Перечень итоговых функций

В табл. 2.2 перечислены все итоговые функции, доступные в SQL.

Таблица 2.2. Итоговые функции SQL

Функция Результат
AVG Среднее значение от всех значений в столбце
COUNT Общее количество отобранных записей
MAX Максимальное (наибольшее) значение поля
MIN Минимальное (наименьшее) значение поля
STDEV Среднеквадратическое отклонение
SUM Общая сумма всех значений в поле
VAR Дисперсия

Синтаксис этих функций, по сути, соответствует синтаксису функции COUNT, которая рассматривалась в предыдущем разделе. Например, для ежедневного вычисления среднего количества товаров в каждом заказе воспользуйтесь приведенным ниже запросом SQL.

SELECT AVG(tblOrderItem.Quantity) AS AverageLineItemQuantity

FROM tblOrder INNER JOIN

tblOrderItem ON tblOrder.ID = tblOrderItem.OrderID

Этот запрос возвращает значение 2, т.е. количество товаров в заказах всех клиентов.

Вычисления и итоговые функции можно комбинировать разными способами. Например, чтобы получить список со стоимостью всех товаров в каждом заказе, нужно определить стоимость товара (эти сведения хранятся в таблице tblInventory) в каждом заказе и умножить ее на количество этих товаров в заказе (эти сведения хранятся в таблице tblOrderItem), а затем сложить полученные произведения в каждом заказе.

SELECT tblOrderItem.OrderID, SUM(Quantity * Price)

AS OrderTotal

FROM tblInventory INNER JOIN

tblOrderItem ON tblItem.ID = tblOrderItem.OrderID GROUP BY OrderID

Этот запрос возвращает приведенный ниже результирующий набор.

OrderID OrderTotal
1 15.64
2 7.98
3 5.99
4 99.17
5 13.96
6 49.07
7 55.88
8 13.97
9 9.16
10 14.76 

 

Запросы на объединение

Запрос на объединение (union query) выполняет объединение содержимого двух таблиц, имеющих одинаковые структуры полей. Это оказывается полезным, когда нужно отобразить в одном результирующем наборе потенциально не связанные записи из нескольких источников.

Далее в главе приводятся примеры сохранения старых заказов в архивной таблице с именем tblOrderArchive. И если вы воспользуетесь предложенной системой архивирования, то записи физически будут размещены в двух отдельных таблицах. Это может повысить эффективность работы: запрос выполняется быстрее на маленькой таблице, чем на большой. Но, возможно, в некоторых случаях понадобится просмотреть все текущие и заархивированные записи в одном общем результирующем наборе. С такой задачей прекрасно справится запрос на объединение.

Предположим, что как раз возникла необходимость в просмотре в одном результирующем наборе старых записей из таблицы tblOrderArchive и новых записей из tblOrder. Такой запрос приведен ниже.

SELECT *

FROM tblOrder

UNION

SELECT *

FROM tblOrderArchive

После выполнения этого запроса старые и новые заказы объединятся в одном результирующем наборе, причем результат будет выглядеть подобно исходной таблице до архивирования.

По умолчанию запрос на объединение не возвращает записи-дубликаты (хотя было бы неплохо, чтобы ваша система архивирования записей не удаляла их после копирования в таблицу архива). Отображение записей-дубликатов может оказаться весьма полезным, если система архивирования старых записей не удаляет записи после копирования в архивную таблицу и вам нужно просмотреть и сравнить некоторые старые и новые записи.

Однако, добавив ключевое слово ALL, можно заставить запрос на объединение отображать дублирующие записи, как показано ниже.

SELECT *

FROM tblOrder

UNION ALL

SELECT *

FROM tblOrderArchive

 

Подзапросы

Подзапрос (subquery) — это запрос, результат которого служит критерием для другого запроса. Подзапросы занимают место обычного выражения WHERE. Поскольку результат, сгенерированный подзапросом, используется вместо выражения, подзапрос может возвращать только одиночное значение (в противоположность обычному запросу, который возвращает несколько значений, представленных в виде строк и столбцов).

Единственное синтаксическое различие между подзапросом и выражением любого другого типа, размещенным в предложении WHERE, состоит в том, что подзапрос должен быть заключен в круглые скобки. Например, нужно создать запрос, который отображает заказы с самыми дорогими товарами. Дорогим считается такой товар, стоимость которого превышает среднюю стоимость товаров в таблице tblItem. Поскольку среднюю стоимость товара легко определить (выполнив итоговую функцию AVG по полю UnitPrice в таблице tblItem), это значение можно использовать как подзапрос в более крупном запросе. Такой запрос SQL приведен ниже.

SELECT Name, UnitPrice

FROM tblItem

WHERE (UnitPrice > (SELECT AVG(UnitPrice) FROM tblItem)

В этом случае оказывается, что запрос и подзапрос обращаются к одной и той же таблице, но это не принципиально. Подзапросы могут делать запросы к любой таблице в базе данных, главное – чтобы они возвращали одиночное значение.

Приведенная выше инструкция SQL возвращает следующий результирующий набор:

Name UnitPrice
Rubber Chicken 5.99
Disappearing Penny Magic Trick 3.99
Loaded Dice 3.49
Whoopee Cushion 5.99

 

Манипулирование данными с помощью SQL

 

Команда манипулирования данными (data manipulation command) — это команда SQL, которая изменяет записи. Такие команды создаются на языке манипулирования данными DML, который является подмножеством языка SQL. Эти команды не возвращают записи, а только изменяют их в базе данных.

DML-команды SQL обычно применяются для изменения большого объема данных на основе заданного критерия. Например, для повышения на 10% цены всех товаров следует использовать запрос на обновление, который автоматически выполнит такие изменения для всех товаров.

В среде Visual Studio .NET предусмотрен очень мощный интерфейс для выполнения DML-команд. Действительно, инструменты среды Visual Studio .NET могут пре

доставить полезную информацию (например, правильную строку подключения для соединения с базой данных) или генерировать в окне конструктора основные DML-команды при извлечении данных из таблицы или изменении типа запроса.

НА ЗАМЕТКУ

Примеры в этом разделе демонстрируют способы изменения данных в базе данных Novelty. Если после многочисленных попыток изменить данные вы хотите вернуть базу данных Noveltу в ее прежнее состояние, то ее можно переустановить, запуская описанный во введении к этой книге сценарий.

На низком уровне (т.е. не на уровне графического интерфейса пользователя) DML-команды SQL можно использовать с помощью следующих двух инструментов:

• Microsoft SQL Server Query Analyzer (или просто Query Analyzer) — инструмент с графическим интерфейсом пользователя для создания запросов и команд для SQL Server;

• osql — используемый в режиме командной строки процессор запросов.

Вы можете использовать любой из этих инструментов, а в данной главе применяется Query Analyzer, который обладает более широкими возможностями и более удобен в употреблении, чем процессор запросов osql. В настоящей главе основное внимание сосредоточено на фактически выполняемых командах, а не на методах использования графического интерфейса Query Analyzer. Инструмент Query Analyzer находится в группе программ Microsoft SQL Server. (В главе 7, "ADO.NET: дополнительные компоненты", более подробно рассматриваются способы применения DML-команд в среде Visual Studio.NET.)

 

Запросы на обновление

Запрос на обновление может изменить сразу целую группу записей. Этот запрос состоит из трех частей:

• предложение UPDATE, которое указывает на обновляемую таблицу;

• предложение SET, задающее данные для обновления;

• необязательный критерий WHERE, ограничивающий число записей, на которые воздействует запрос на обновление.

Например, чтобы увеличить цену на все товары, воспользуйтесь запросом на обновление, код которого приведен ниже.

UPDATE tblItem

SET Price = Price * 1.1

SELECT * FROM tblItem

Команда SELECT, которая располагается вслед за предложением UPDATE, не обязательна и предназначена для просмотра результатов обновления.

Ниже приведены значения полей после выполнения данного запроса на обновление.

ID Name Description UnitPrice Price
1 Rubber Chicken A classic laugh getter 2.0300 6.5890
2 Hand Buzzer Shock your friends .8600 1.5290
3 Stink Bomb Perfect for ending boring meetings .3400 1.4190
4 Invisible Ink Write down your most intimate thoughts 1.4500 2.5190
5 Loaded Dice Not for gambling purposes 1.4600 3.8390
6 Whoopee Cushion The ultimate family gag 2.0300 6.5890  

Для ограничения числа записей, подвергаемых воздействию запроса на обновление, достаточно добавить в запрос SQL предложение WHERE. Например, чтобы применить повышение цен только к дорогим товарам, стоимость которых больше $100, откорректируйте запрос так, как показано ниже.

UPDATE

SET Price = Price * 1.1

WHERE Price > 100

Эта команда увеличивает на 10% цену на товары, текущая цена которых больше $100.

 

Запросы на удаление

С помощью запроса на удаление (delete query) можно одним махом удалить одну или несколько записей. Например, чтобы удалить все заказы, которые были оформлены до (но не во время) последнего празднования Дня всех святых, воспользуйтесь запросом SQL, код которого приведен ниже.

DELETE *

FROM tblOrder

WHERE OrderDate < '10/31/2002'

 

Запрос на добавление записей

Запрос на добавление (append query) используется в двух случаях:

• при добавлении одиночной записи в таблицу;

• при копировании одной или нескольких записей из одной таблицы в другую.

Для создания запроса на добавление используйте предложение SQL INSERT. Точный синтаксис запроса зависит от того, добавляете ли вы одну запись или копируете несколько. Например, для добавления одной новой записи в tblOrder можно использовать приведенный ниже запрос.

INSERT INTO tblOrder(CustomerID, OrderDate)

VALUES (119, '6/16/2001')

При выполнении этого запроса в таблице tblOrder создается новый заказ для клиента с идентификационным номером 119 и датой 16 июня 2001 года.

НА ЗАМЕТКУ

В этом запросе на добавление для поля ID таблицы tblOrder не предлагается никакого значения, так как это поле идентификации. Попытка пользователя присвоить значение этому полю приведет к возникновению ошибки, поскольку его может сгенерировать только сам процессор баз данных. 

Для создания разновидности запроса на добавление, который копирует записи из одной таблицы в другую, используйте предложение INSERT вместе с предложением SELECT. Предположим, вместо удаления старых заказов вы архивируете их, периодически копируя в архивную таблицу tblOrderArchive, которая имеет ту же структуру, что и tblOrder. Для выполнения этой работы необходимо сначала создать таблицу tblOrderArchive со структурой, аналогичной tblOrder.

CREATE TABLE tblOrderArchive (

 ID [int] NOT NULL,

 CustomerID [int] NULL,

 OrderDate [datetime] NULL)

НА ЗАМЕТКУ

Как уже сообщалось выше, команды SQL для создания и управления структурой базы данных называются командами манипулирования данными или DML-командами. Более подробно они рассматриваются далее в главе.

Ниже приведена инструкция SQL для копирования старых записей из tblOrder в tblOrderArchive.

INSERT INTO tblOrderArchive

SELECT * FROM tblOrder

WHERE OrderDate < '6/1/2001'

При выполнении этой инструкции SQL в таблицу tblOrderArchive копируются все записи, содержащие заказы, которые были оформлены до 1 июня 2001 года.

 

Запросы на основе команды SELECT INTO

Запрос на основе команды SELECT INTO аналогичен запросу на добавление, за исключением того, что он создает новую таблицу и сразу же копирует в нее записи. В Microsoft Access он называется запросом на создание таблиц (make-table query). Так, в предыдущем примере все записи из таблицы tblOrder копировались в таблицу tblOrderArchive, исходя из предположения, что таблица tblOrderArchive уже существует. Вместо этого запроса для копирования тех же записей в новую таблицу с такой же структурой, как и у оригинала, воспользуйтесь приведенным ниже запросом SQL.

SELECT * INTO tblOrderArchive

FROM tblOrder

НА ЗАМЕТКУ

Этот запрос копирует все записи из tblOrder в новую таблицу с именем tblOrderArchive. Однако если такая таблица уже существует, эта команда не будет выполнена. Это отличается от результата выполнения данного запроса в Microsoft Access.

Если его выполнить в окне конструктора запросов программы Access при условии, что таблица tblOrderArchive уже существует, то процессор баз данных удалит исходную таблицу и заменит ее вновь созданной, которая будет заполнена содержимым скопированных записей. В SQL Server для удаления таблицы нужно использовать DDL-команду DROP TABLE.

В запросе на основе команды SELECT INTO можно применить критерий отбора (с помощью предложения WHERE) точно так же, как это делалось в запросе на добавление (см. предыдущий раздел). Это дает возможность копировать подмножество записей из исходной таблицы в новую, которая формируется запросом на создание таблицы.

 

Использование языка определения данных

 

Команды языка определения данных (Data Definition Language — DDL) представляют собой инструкции SQL, которые позволяют создавать элементы структуры базы данных, манипулировать ими и удалять. Используя DDL, можно создавать и удалять таблицы, а также изменять структуру этих таблиц.

Команды DDL относятся к наиболее редко используемым инструкциям в SQL в основном потому, что существует множество прекрасных инструментов, которые позволяют легко справиться с задачами создания таблиц, полей и индексов. В среде Visual Studio.NET DDL-команды SQL используются незаметно для разработчика при создании схемы базы данных в окне Server Explorer, но в ней не предусмотрены инструменты для непосредственного выполнения команд SQL по отношению к базе данных. Для этого следует применять инструменты Query Analyzer и osql либо использовать DDL-команды непосредственно в коде.

Но если вы работаете в среде клиент/сервер, то для создания структуры базы данных удобнее использовать DDL-команды. Подобно командам манипулирования данными, DDL-команды не возвращают результирующих наборов (поэтому их и называют не запросами, а командами).

 

Создание элементов базы данных с помощью предложения CREATE

Новые элементы базы данных создаются с помощью предложения SQL CREATE. Чтобы создать таблицу, используйте команду CREATE TABLE, за которой введите поля и типы данных, предназначенные для добавления в таблицу. В качестве разделителей используйте запятые, а весь список заключите в круглые скобки. Например, для создания новой таблицы можно применять приведенную ниже инструкцию SQL.

CREATE TABLE tblRegion (

 State char (2),

 Region varchar (50)

)

Тип данных char(2), означает, что процессор баз данных должен создать текстовое поле фиксированной длины для хранения максимум двух символов, а выражение varchar (50) указывает на создание поля с переменной длиной до 50 символов.

При выполнении этого запроса будет создана таблица со следующей структурой:

tblRegion
State
Region  

В разделе о типах данных главы 1, "Основы построения баз данных", перечислены допустимые типы данных полей, которые можно использовать при создании полей.

 

Добавление ограничений в таблицу

В процессе создания таблицы можно добавить ограничения (constraints). Они аналогичны индексу, но используются для обозначения уникального, первичного или внешнего ключа.

Ограничение создается с помощью предложения SQL CONSTRAINT, которое принимает два параметра: имя индекса и имя поля или полей, в индексации которых вы заинтересованы. Можно объявить индекс с помощью ключевого слова UNIQUE или PRIMARY, и тогда этот индекс будет означать, что поле может принимать только уникальные значения или что поле (поля) служит первичным ключом таблицы.

НА ЗАМЕТКУ

Понятие именованных индексов может показаться несколько странным для тех, кто привык работать в Microsoft Access, поскольку Access скрывает имена индексов в своем пользовательском интерфейсе. Однако к имени индекса можно получить доступ программным путем.

Например, усовершенствовать таблицу tblRegion, созданную в предыдущем примере, можно добавлением уникального индекса к полю State, поскольку оно используется в объединении. Ниже представлена команда SQL, создающая эту таблицу с использованием предложения CONSTRAINT.

CREATE TABLE tblRegion (

 State char (2),

 Region varchar (50),

 CONSTRAINT StateIndex UNIQUE (State)

)

Этот запрос создает таблицу с уникальным индексом по полю State, причем этот индекс имеет имя StateIndex.

Несмотря на то что в приведенном выше примере индексируется поле State, больше смысла было бы в том, чтобы сделать поле State первичным ключом таблицы. В этом случае вы получили бы гарантию того, что в поле State не было не только повторяющихся значений, но и значений NULL. Ниже приводится команда SQL, создающая таблицу tblRegionNew, в которой первичным ключом является поле State.

CREATE TABLE tblRegionNew (

 State char Region varchar (50),

 CONSTRAINT StatePrimary PRIMARY KEY (State)

)

 

Назначение внешнего ключа

Для того чтобы назначить поле в качестве внешнего ключа, используйте ограничение FOREIGN KEY. Например, в структуре нашей базы данных существует отношение типа один-ко-многим между полем State таблицы tblRegion и соответствующим полем State таблицы tblCustomer. Команда SQL, используемая для создания таблицы tblCustomer, может выглядеть так, как показано ниже.

CREATE TABLE tblCustomer (

 ID int identity(1,1),

 FirstName varchar (20),

 LastName varchar (30),

 Address varchar (100),

 City varchar (75),

 State varchar (2),

 CONSTRAINT IDPrimary PRIMARY KEY (ID),

 CONSTRAINT StateForeign FOREIGN KEY (State)

 REFERENCES tblRegionNew (State)

)

Обратите внимание, что внешний ключ в команде CREATE TABLE не создает индекс по этому внешнему ключу. Он только служит для создания отношения между двумя таблицами.

 

Создание индексов с помощью команды CREATE INDEX

Помимо создания индексов в процессе формирования таблицы (с помощью предложения CONSTRAINT), можно также создавать индексы уже после того, как таблица сформирована (с помощью предложения CREATE INDEX). Это полезно в тех случаях, когда таблица уже существует (в то время как предложение CONSTRAINT применяется для формирования индексов только в момент создания таблицы).

Для создания индекса в существующей таблице используйте приведенную ниже команду SQL.

CREATE INDEX StateIndex

ON tblCustomer (State)

Для того чтобы создать уникальный индекс, используйте ключевое слово UNIQUE, как показано ниже.

CREATE UNIQUE INDEX StateIndex

ON tblRegion (State)

Чтобы создать первичный индекс в существующей таблице, используйте приведенную ниже команду SQL.

CREATE UNIQUE NONCLUSTERED INDEX StateIndex ON tblRegion (

 State

) ON [PRIMARY]

 

Удаление таблиц и индексов с помощью предложения DROP

Удалять элементы базы данных можно с помощью предложения DROP. Например, чтобы удалить таблицу, используйте приведенную ниже команду SQL.

DROP TABLE tblRegion

С помощью предложения DROP можно также удалить индекс в таблице, как показано ниже.

DROP INDEX tblRegion.StateIndex

Обратите внимание, что для удаления первичного ключа нужно знать имя этого ключа.

У вас также есть возможность удалять отдельные поля таблиц. Для этого нужно использовать предложение DROP внутри предложения ALTER TABLE, как показано в следующем разделе. А для удаления базы данных применяется команда DROP DATABASE.

 

Модификация структуры таблицы с помощью предложения ALTER

С помощью предложения ALTER можно изменить определения полей в таблице. Например, чтобы добавить поле CustomerType в tblCustomer, используйте приведенную ниже команду SQL.

ALTER TABLE tblCustomer

ADD CustomerType int

Для того чтобы удалить поле из базы данных, используйте предложение DROP COLUMN вместе с предложением ALTER TABLE, как показано ниже.

ALTER TABLE tblCustomer

DROP COLUMN CustomerType

Кроме того, с помощью предложения ALTER TABLE можно добавить в таблицу ограничения. Например, для создания отношения между таблицами tblCustomer и tblOrder с помощью предложения ALTER TABLE используйте приведенную ниже команду SQL.

ALTER TABLE tblOrder

ADD CONSTRAINT OrderForeignKey

FOREIGN KEY (CustomerID)

REFERENCES tblCustomer (ID)

Помните, что добавление ограничения не создает обычного индекса по полю, оно просто делает поле уникальным, назначает поле первичным ключом или создает отношение между двумя таблицами.

 

Резюме

Эта глава посвящена технологии создания запросов, которые могут использоваться в приложениях доступа к базам данных, созданных в среде Visual Basic .NET. Здесь рассматривались запросы, которые возвращают необходимые записи, а также запросы, которые создают и модифицируют структуру баз данных.

Большая часть материала этой главы приводится отнюдь не ради увеличения объема книги; начав программировать с использованием Visual Studio .NET и ADO.NET, вы почувствуете реальную пользу от прочитанного.

 

Вопросы и ответы

Почему имена таблиц и полей иногда заключены в квадратные скобки?

Квадратные скобки часто окружают имена объектов в среде Visual Studio.NET и административных инструментах SQL Server для исключения проблем при использовании имен с пробелами и другими зарезервированными символами и словами. Например в базе данных Northwind, которая инсталлируется вместе с SQL Server 2000, есть таблица с именем Order Details. Хотя в общем случае не рекомендуется включать пробелы в имена таблиц, ее все же можно использовать в SQL Server в виде [Order Details]. Однако инструменты с графическим интерфейсом, например в среде Visual Studio .NET, всегда добавляют квадратные скобки. Но в данной книге они не используются, чтобы исключить излишнюю работу по их вводу.

Почему перед именем таблицы иногда используется приставка dbo? Что это такое?

dbo — это вспомогательный квалификатор (или моникер), который используется в инструментах с графическим интерфейсом при работе с SQL Server. Он позволяет установить соединение заданного объекта базы данных с владельцем базы данных. Объекты базы данных могут иметь разных владельцев, a dbo представляет собой сокращенную форму записи следующего высказывания: "этот объект относится к владельцу используемой базы данных". Разные объекты одной базы данных вполне могут относиться к разным владельцам, хотя, конечно, следует признать, что такая ситуация встречается редко. В базах данных, в которых все объекты относятся к владельцу dbo, этот моникер можно опустить (однако инструменты с графическим интерфейсом все равно попытаются вставить его).

 

ГЛАВА 3

Знакомство с SQL Server 2000

 

В прошлом многие программисты начинали создание приложений баз данных, используя язык Visual Basic и базу данных Microsoft Access с ядром Jet. Как только база данных разрасталась до нескольких тысяч записей или к ее услугам обращались несколько пользователей, наступал "великий перелом". Конфликты при доступе к данным со стороны пользователей, уменьшение производительности и отсутствие удобных инструментов управления данными и сервером привели к тому, что разработчики стали искать способы решения этих проблем с помощью других архитектур баз данных. Одной из таких архитектур стала модель вычислений типа клиент/сервер (или модель распределенных вычислений).

Суть архитектуры клиент/сервер заключается не только в предоставлении многопользовательского режима работы с базой данных, к тому же с такой задачей вполне может справляться Jet. В многопользовательской архитектуре несколько пользователей используют одни и те же данные в сети, т.е. один или несколько файлов базы данных находятся на сервере, к которому могут осуществлять доступ клиентские компьютеры. Несмотря на то что Microsoft Access также поддерживает многопользовательский ре жим работы, эту программу нельзя отнести к системам клиент/сервер, поскольку все необходимые операции выполняются на отдельном компьютере клиента. Например, для извлечения с помощью команды SQL одной записи из таблицы, включающей 50 тыс. записей, нужно перенести на компьютер клиента все строки (или по крайней мере их индексы) таблицы. При этом на стороне сервера не предусмотрено никакой "интеллектуальной" части для специализированной обработки данных, например для выполнения запроса и возвращения только запрошенных данных.

В архитектуре клиент/сервер предусмотрена серверная часть (back end), т.е. специализированное программное обеспечение, которое способно извлекать и кэшировать данные, разрешать конфликты доступа к данным со стороны клиентов, а также обеспечивать безопасность. Например, СУБД SQL Server компании Microsoft получает запросы от клиентских компьютеров, выполняет их на серверном компьютере, а затем возвращает клиентскому компьютеру только запрошенные данные. Таким образом, для извлечения одной записи из таблицы, включающей 50 тыс. записей, серверу будет передана команда SELECT, серверное программное обеспечение выполнит эту команду и возвратит клиенту только искомую запись. Очевидно, что при этом сетевой трафик значительно сокращается, а общая производительность повышается еще и потому, что вычислительная мощность (т.е. быстрота работы процессора и объем оперативной памяти) компьютера-сервера гораздо выше, чем компьютера-клиента. Поэтому в такой архитектуре будут быстрее выполняться команды и извлекаться данные.

Если вы работаете с Visual Basic .NET, то очевидно, что в качестве серверной части (или сервера баз данных) можно использовать Microsoft SQL Server, поставляемый вместе с Visual Basic .NET и Visual Studio .NET. Перечень разных версий Microsoft SQL Server, которые поставляются вместе с Visual Basic .NET и Visual Studio .NET, приводится далее в главе.

СОВЕТ

Базы данных на основе ядра баз данных Jet (MDB) рекомендуется использовать только для простейших и ограниченных приложений. Благодаря появлению нового ядра SQL Server 2000 Desktop предназначенного специально для баз данных небольшого размера, отпадает необходимость использования ядра Jet. Теперь размер базы данных SQL Server может не требуя дополнительного кодирования или изменения ее структуры по мере роста системы.

В этой главе внимание фокусируется на основах использования SQL Server 2000. Сначала предлагается введение, посвященное его установке, а затем излагаются базовые сведения об использовании SQL Server 2000, необходимые для понимания материала и примеров в остальной части книги. Излагаемого здесь материала вполне достаточно даже для тех, у кого вообще нет никакого опыта работы с SQL Server. Более того, даже разработчики с большим опытом работы с этой СУБД найдут здесь для себя много полезного. Рассмотрим следующую типичную ситуацию.

Допустим, вы входите в команду разработчиков распределенного приложения с архитектурой клиент/сервер. Программисты, разрабатывающие серверную часть приложения, к моменту промежуточной сдачи проекта только на 95% подготовили функциональную версию сервера. Нужно приступать к работе, а серверная часть приложения не готова на все 100%.

Более того, в вашем распоряжении может быть только 1-2 программиста с опытом создания серверной части. Поскольку программисты серверной части обладают довольно редким набором навыков, такая ситуация возникает довольно часто при создании приложений с архитектурой клиент/сервер. Таких специалистов труднее всего найти и удержать, а потому они работают с гораздо большим напряжением, чем остальные программисты. Кроме того, их гораздо сложнее заменить в случае неудачного выполнения работы. Более того, программисты клиентской части часто не могут завершить свою работу до тех пор, пока не будут исправлены ошибки в серверной части.

Такую ситуацию называют трагедией одаренного программиста серверной части.

Если вы принимали участие в проекте по созданию распределенного приложения с архитектурой клиент/сервер с несколькими разработчиками, то вам наверняка знакома эта ситуация. Одним из решений этой проблемы является создание прототипа клиентского приложения с использованием временного источника данных на основе Jet с последующей заменой его по окончании работы над серверной частью. Для этого обычно используется источник данных ODBC или OLEDB. Предлагаемый уровень абстракции на основе ODBC или OLEDB позволяет создавать и использовать в приложении прототип баз данных с переключением на реальную базу данных по окончании работа над проектом.

Размещение одного или нескольких уровней абстракции между клиентом и сервером также делает работу программистов клиентской части независимой от деятельности программистов серверной части. Для программистов серверной части это означает, что они должны создать представления или хранимые процедуры, которые поставляют данные клиентам. В среде Visual Basic .NET эта цель достигается за счет создания компонентов. Более подробно способы создания представлений или хранимых процедур описываются в других разделах этой главы.

 

Установка и запуск Microsoft SQL Server

 

Работа с сервером баз данных значительно отличается от совместного использования файла базы данных Microsoft Jet. Для успешной работы с SQL Server нужно познакомиться с новыми понятиями и дополнительными возможностями. Однако установка и использование SQL Server 2000 организована гораздо проще, чем в предыдущих версиях, особенно в версии 6.5 и более ранних.

Ниже перечисляются основные условия для установки и работы разных редакций сервера базы данных SQL Server 2000.

• SQL Server 2000 Standard Edition — это стандартная редакция, которая содержит основной сервер баз данных для рабочей группы или отдела.

• SQL Server 2000 Enterprise Edition — это корпоративная редакция, которая содержит все элементы стандартной редакции и предлагает повышенную производительность и другие компоненты для крупных организаций, Web-узлов и хранилищ данных.

• SQL Server 2000 Personal Edition — это персональная редакция, предназначенная для мобильных пользователей, которые часто отсоединены от своей сети, но нуждаются в SQL Server для локального хранения данных и запуска отдельных приложений на клиентском компьютере. В отличие от стандартной и корпоративной редакций, для которых требуется серверная версия операционной системы Windows NT или Windows 2000, персональная редакция может работать с Windows 2000 Professional, Windows NT 4.0 Workstation и Windows ME или Windows 98. Эта редакция ограничивает производительность сервера, если одновременно запущено более пяти пакетных заданий.

• SQL Server 2000 Developer Edition — это редакция для разработчиков, включающая все элементы корпоративного издания,но с лицензией только для разработки и тестирования приложений SQL Server; она не может использоваться как рабочий сервер баз данных.

• SQL Server 2000 Desktop Engine(MSDE) — это настольное ядро, содержащее большинство элементов стандартной редакции. Оно может свободно распространяться как часть небольшого приложения или демонстрационных версий. Размер базы данных, поддерживаемой этим ядром, не превышает 2 Гбайт и, подобно персональной редакции, ее производительность заметно падает при выполнении одновременно более пяти пакетных заданий. Однако она не содержит графических инструментов разработки и управления.

НА ЗАМЕТКУ

С каждой редакцией Visual Basic .NET или Visual Studio .NET поставляется редакция MSDE сервера баз данных SQL Server 2000. Редакции Enterprise Developer Visual Studio .NET и Enterprise Architect Visual Studio .NET также включают редакцию для разработчиков Developer SQL Server 2000. При этом следует учитывать такие особенности:

• MSDE не включает графических инструментов SQL Server, которые описываются в этой главе; поэтому с ней нельзя выполнять примеры из данной книги (тем не менее для доступа к MSDE в Visual Studio .NET предусмотрено несколько ограниченных графических инструментов);

• редакция для разработчиков SQL Server 2000 Developer Edition может применяться только для разработки и тестирования приложений SQL Server, а для использования ее в качестве рабочего сервера баз данных нужно приобрести лицензии для серверной и клиентской части SQL Server 2000.

 • SQL Server 2000 Windows CE Edition — это редакция, используемая как хранилище данных на портативных устройствах под управлением операционной системы Windows СЕ и способная реплицировать данные из других изданий SQL Server 2000.

 

Требования для инсталляции SQL Server 2000

Для инсталляции SQL Server 2000 требуется компьютер с процессором Pentium (или совместимым с ним) с частотой не менее 166 МГц, пространство на жестком диске от 95 до 270 Мбайт (270 Мбайт для типичного варианта инсталляции и 44 Мбайт для Desktop Engine), дисковод для компакт-дисков, броузер Internet Explorer версии 5.0 или выше, а также совместимая операционная система (см. выше). Для оперативной памяти установлены следующие требования:

• для стандартной редакции Standard Edition — минимум 64 Мбайт;

• для корпоративной редакции Enterprise Edition — минимум 64 Мбайт (рекомендуется 128 Мбайт);

• для персональной редакции Personal Edition — минимум 64 Мбайт для операционной системы Windows 2000 и 32 Мбайт для других операционных систем;

• для редакции Developer Edition — минимум 64 Мбайт;

• для ядра Desktop Edition — минимум 64 Мбайт для операционной системы Windows 2000 и 32 Мбайт для других операционных систем.

Если вы уже пытались запускать SQL Server на компьютере с процессором Pentium (или совместимым с ним) с частотой 166 МГц и 64 Мбайт оперативной памяти, то убедились, что сервер баз данных работает очень медленно. Не удивляйтесь, ведь специалисты Microsoft предупредили вас, что это минимальные требования. SQL Server может работать на компьютере с такими скудными вычислительными ресурсами, но в реальной рабочей обстановке такая экономия может привести к печальным последствиям для вашего бизнеса. Если вы ограничены в средствах и можете модернизировать только какой-то один компонент аппаратного обеспечения, то в таком случае лучше инвестировать денежные средства оперативную память, чем в более мощный процессор. Даже небольшое увеличение размера оперативной памяти может существенно повысить производительность системы.

НА ЗАМЕТКУ

Данная книга в основном посвящена вопросам создания решений для работы с базами данных на основе Visual Basic .NET. Поэтому здесь не рассматриваются другие многочисленные элементы SQL Server. Для получения более подробной информации на эту тему следует обратиться к официальной документации SQL Books Online, которая входит в состав комплекта программных продуктов SQL Server, или прочитать книгу М. Шпеника и О. Следжа Руководство администратора баз данных Microsoft SQL Server™2000 (Издательский дом "Вильямc", 2001).

 

Установка SQL Server 2000

После выбора компьютера с необходимой конфигурацией можно перейти к установке. В целом процесс установки SQL Server 2000 очень прост, за исключением следующих особенностей:

• он длится довольно долго;

• в процессе установки задается очень много на первый взгляд странных вопросов, которые не характерны для обычных приложений.

Время процесса установки сократить никак нельзя, а чтобы упростить поиск ответов на вопросы со стороны программы-инсталлятора SQL Server, далее приводятся небольшие пояснения.

Вообще говоря, для установки SQL Server в небольших организациях достаточно использовать предлагаемые по умолчанию значения параметров в диалоговых окнах и экранах программы-мастера инсталляции. Поэтому приведенные далее комментарии относятся к наиболее сложным диалоговым окнам.

В диалоговом окне Setup Type (Тип установки), которое показано на рис. 3.1, можно выбрать тип установки: Typical (Типичная), Minimum (Минимальная) и Custom (Специализированная), а также путь к каталогам, в которых будут установлены файлы SQL Server и данные. Перед установкой убедитесь в том, что на жестких дисках этих каталогов достаточно места для размещения данных и путь к ним указан среди параметров резервного копирования данных.

РИС. 3.1. Диалоговое окно Setup Type программы SQL Server Installation Wizard

В диалоговом окне Services Accounts (Учетные записи служб), которое показано на рис. 3.2, по умолчанию создается учетная запись пользователя домена, т.е. выбран параметр Use a Domain User account (Использовать учетную запись пользователя домена). Однако вместо нее можно использовать учетную запись локальной системы, т.е. выбрать параметр Use the Local System account (Использовать учетную запись локальной системы), если нет домена или используется отдельный выделенный сервер. В этом диалоговом окне с помощью параметра Auto Start Service (Служба автозапуска) можно указать, что SQL Server запускается при запуске Windows как служба этой операционной системы. Учетные записи служб действуют как составные части операционной системы, поэтому они не отображаются во вкладке Applications (Приложения) менеджера задач Windows Task Manager и их нельзя закрыть как обычные приложения. В следующем разделе дается дополнительная информация о способах управления сервисами операционной системы Windows, а в конце главы — информация о методах запуска SQL Server.

РИС. З.2. Диалоговое окно Services Accounts про граммы SQL Server Installation Wizard

РИС. 3.3. Диалоговое окно Authentication Mode про граммы SQL Server Installation Wizard

Для рабочего варианта SQL Server в диалоговом окне Authentication Mode (Режим аутентификации), которое показано на рис. 3.3, по умолчанию предлагается режим Windows Authentication Mode (Режим аутентификации Windows). При этом используются преимущества системы обеспечения безопасности Windows NT/2000. При попытке подключения к SQL Server для аутентификации пользователя используется его учетная запись, если он (или его группа пользователей) имеют право доступа к SQL Server. В некоторых ситуациях можно использовать режим Mixed Mode (Смешанный режим), в котором помимо аутентификации в операционной системе Windows пользователь должен пройти процедуру аутентификации SQL Server. Для этого в SQL Server нужно создать учетную запись, которая будет проверяться при попытке подключения к SQL Server. Основным преимуществом этого режима является то, что при этом не требуется устанавливать доверительное соединение между сервером и рабочей станцией, что особенно удобно при подключении клиентов из операционной системы UNIX или Web-клиентов. Однако для реализации этого режима требуются дополнительные действия по обслуживанию двойного набора учетных записей (операционной системы Windows и сервера баз данных SQL Server).

НА ЗАМЕТКУ

Часто бывает очень удобно конфигурировать компьютер разработчика в смешанном режиме, чтобы можно было использовать предустановленную учетную запись системного администратора sa. Для рабочего компьютера нужно создать более надежный и безопасный подход, т.е. по крайней мере указать другой пароль для учетной записи системного администратора sa.

 

Запуск и остановка SQL Server

Для запуска и остановки SQL Server можно использовать программу SQL Server Service Manager. В некоторых случаях необходимо остановить SQL Server, например для выполнения каких-то задач или запуска сервера баз данных SQL Server на другом (рабочем) компьютере.

В обычных условиях не нужно останавливать сервер баз данных SQL Server, который играет роль корпоративной СУБД. Предполагается, что SQL Server один раз запускается и непрерывно работает в течение длительного времени. Но в некоторых редких ситуациях сервер баз данных все же бывает нужно остановить, например для обновления аппаратного обеспечения или изменения конфигурации сервера. В таких случаях для запуска и остановки SQL Server используется программа SQL Server Service Manager.

РИС. З.4. Исходный вид диалогового окна программы SQL Server Service Manager после запуска SQL Server

Программа SQL Server Service Manager не является обязательным элементом SQL Server и предназначена только для более удобного управления процессом активизации и деактивизации SQL Server. После перехода к рабочему варианту SQL Server программа SQL Server Service Manager уже не понадобится.

После запуска SQL Server программы SQL Server Service Manager (после щелчка на ее пиктограмме в группе программ SQL Server) диалоговое окно SQL Server Service Manager будет выглядеть так, как показано на рис. 3.4.

 Если SQL Server запущен, индикатор состояния сервера баз данных приобретает вид зеленой стрелки, а если остановлен — вид красного квадратика. Для запуска SQL Server нужно щелкнуть на кнопке Start (Запуск) или Continue (Продолжить), а для остановки — на кнопке Stop.

 

Управление способом запуска SQL Server

После установки SQL Server операционная система автоматически запускает его при включении компьютера. С помощью элемента панели управления Services (Службы) можно управлять состоянием SQL Server. Для просмотра текущего состояния SQL Server и управления им выполните следующее.

1. Откройте окно Control Panel и выберите в нем пиктограмму Administrative Tools (Администрирование).

2. Выберите пиктограмму Services (Службы).

3. Найдите в панели управления Services службу MS SQLServer.

После установки SQL Server для службы MS SQLServer по умолчанию задается автоматический режим запуска Automatic. Для остановки службы MS SQLServer в панели управления Services выполните ряд действий.

1. Выберите службу MS SQLServer в панели управления Services и дважды щелкните на ней. В открывшемся диалоговом окне свойств этой службы щелкните на кнопке Stop.

2. Спустя несколько секунд SQL Server будет остановлен.

3. Для перезапуска SQL Server щелкните на кнопке Start в диалоговом окне свойств службы MS SQLServer.

НА ЗАМЕТКУ

Запуск и остановка SQL Server с помощью панели управления Services происходят точно так же, как и при использовании программы SQL Server Service Manager.

 

Основы работы с SQL Server 2000

 

После установки и запуска SQL Server необходимо выполнить следующие действия, прежде чем приступить к извлечению или сохранению данных:

• создать одну или несколько баз данных;

• создать таблицы в базе данных;

• создать представления и хранимые процедуры, которые будут управлять данными, возвращаемыми из базы данных;

• установить учетные записи и группы пользователей.

Большинство из этих действий не требуют написания кода, достаточно использовать инструменты и возможности программы SQL Server Enterprise Manager СУБД SQL Server 2000.

 

Запуск программы SQL Server Enterprise Manager

Большинство действий по конфигурированию базы данных выполняются с помощью программы SQL Server Enterprise Manager. Эта программа благодаря своей простоте и мощности является одним из основных инструментов SQL Server 2000. Она предоставляет администратору простой и понятный интерфейс для выполнения необходимых действий, которые прежде требовали использования сложных команд SQL.

Для запуска программы SQL Server Enterprise Manager щелкните на кнопке Start (Пуск) и выберите команду Programs→Microsoft SQL Server→Enterprise Manager (Прогpaммы→Microsoft SQL Server→EnterpriseManager). После ее запуска можно получить доступ ко всем серверам баз данных SQL Server в доступной области сети. В следующих разделах главы описываются некоторые наиболее распространенные задачи, выполняемые с помощью Enterprise Manager в рабочем приложении.

НА ЗАМЕТКУ

После установки SQL Server создается только одна учетная запись с пустым паролем. Очевидно, что этот пароль нужно изменить, так как учетная запись с пустым паролем напоминает банковский сейф без замка. Более подробные сведения об учетных записях и системе безопасности SQL Server можно найти далее в главе. 

При первом запуске программы SQL Server Enterprise Manager нужно зарегистрировать установленный SQL Server. Это позволяет программе SQL Server Enterprise Manager определить тот сервер баз данных SQL Server, с которым предстоит работать. Она также позволяет администрировать несколько установленных серверов SQL Server. Для регистрации SQL Server используется диалоговое окно Registered SQL Server Properties (Свойства зарегистрированных серверов SQL Server) программы SQL Server Enterprise Manager (рис. 3.5).

Рис. З.5. Диалоговое окно Registered SQL Servеr Properties программы SQL Server Enterprise Manager

Для регистрации SQL Server, который установлен на данном компьютере, в поле Server (Сервер) используется строка (local). Для подключения SQL Server по локальной сети нужно щелкнуть на кнопке с многоточием возле этого поля для просмотра всех имеющихся серверов в локальной сети.

СОВЕТ

Диалоговое окно Registered SQL Server Properties содержит важный параметр Show system databases and system objects (Показать системные базы данных и системные объекты). При снятии этого флажка системные базы данных и системные объекты остаются скрытыми в разных окнах программы SQL Server Enterprise Manager. Это позволяет сократить объем ненужной информации при работе с таблицами и файлами приложения. Однако для просмотра системных объектов нужно вернуться в это диалоговое окно и установить указанный флажок.

После регистрации нужного сервера щелкните на кнопке OK в диалоговом окне Registered SQL Server Properties. (Это нужно сделать только один раз. Программа SQL Server Enterprise Manager запоминает способ соединения с указанным сервером SQL Server.) Имя зарегистрированного сервера появится в окне серверов Microsoft SQL Servers вместе с другими зарегистрированными серверами. На компьютере с подключением к локальному серверу SQL Server окно Microsoft SQL Servers будет иметь такой вид, как на рис. 3.6.

РИС. 3.6. Окно Microsoft SQL Servers с локальным сервером баз данных SQL Server в программе SQL Server Enterprise Manager

 

Создание базы данных с помощью программы SQL Server Enterprise Manager

После регистрации сервера можно приступить к созданию рабочей базы данных и ее объектов: таблиц, представлений и хранимых процедур.

Это можно выполнить с помощью команд SQL, но лучше воспользоваться программой SQL Server Enterprise Manager. Дело в том, что программа SQL Server Enterprise Manager позволяет создавать большинство объектов базы данных с помощью графических инструментов без явного использования сложных команд SQL. Для создания новой базы данных с помощью SQL Server Enterprise Manager выполните ряд действий.

1. Щелкните правой кнопкой мыши на папке Databases в левой области окна SQL Server Enterprise Manager.

2. Из контекстного меню выберите команду New Database (Создать базу дани на экране появится диалоговое окно Database Properties (Свойства базы данных), показанное на рис. 3.7.

Рис. З.7. Диалоговое окно Database Properties

3. В поле Name (Имя) введите имя базы данных (в этой главе используется имя Novelty).

4. По умолчанию данные хранятся в файле с именем имя_базы_данных_Data.mdf a, журнал регистрации транзакций — в файле имя_базы_данных_Log.ldf. Эти предлагаемые по умолчанию имена (и пути к ним) можно изменить в полях File Name (Имя файла) и Location (Расположение) во вкладках Data Files (Файлы данных) и Transaction Logs (Журналы регистрации транзакций). Вкладка Data Files показана на рис. 3.8. 

РИС. З.8. Вкладка Data Files диалогового окна Database Properties для указания расположения файлов и их размеров

НА ЗАМЕТКУ

В отличие от ранних версий SQL Server, теперь уже не нужно предварительно определять размер памяти для файлов данных журналов регистрации транзакций. В SQL Server 2000 предусмотрены средства автоматического увеличения размера файлов в случае необходимости согласно заданному приросту, выраженному в мегабайтах и процентах от текущего размера. Кроме того, нужно указать максимальный размер файла так, чтобы размеры файлов не росли неограниченно вплоть до полного заполнения жесткого диска.

5. Щелкните на кнопке OK, и на жестком диске появятся два новых файла, Novelty_Data.mdf и Novelty_Data.ldf, с исходным размером 1 Мбайт.

6. После создания новой базы данных ее окно свойств закроется; новая база данных появится в папке Databases в левой области окна SQL Server Enterprise Manager.

НА ЗАМЕТКУ

Во вкладке General (Общие) можно в поле Collation name порядка сортировки) также указать имя принимаемого по умолчанию порядка сортировки данных. Имя порядка сортировки определяет используемый набор символов и порядок их сортировки и сравнения. Эта спецификация приобретает особое значение при работе с данными на других языках, отличных от английского. Кроме того, она применяется для учета (или игнорирования) регистра символов при выполнении операций сортировки и сравнения.

 

Создание таблиц в базе данных SQL Server

 

В Microsoft SQL Server таблицы можно создавать двумя способами:

• с помощью языка определения данных (Data Definition Language — DDL), который подробно описывается в главе 2, "Запросы и команды на языке SQL";

• с помощью графических инструментов программы SQL Server Enterprise Manager.

Оба способа создания таблиц имеют как преимущества, так и недостатки. DDL-команды языка SQL довольно сложные, особенно если вы до этого никогда их не использовали. Применение команд SQL позволяет более гибко создавать и поддерживать код создания базы данных. С другой стороны, DDL-команды могут быть полностью автоматизированы, например с помощью одного щелчка можно запустить сценарий создания базы данных. Они также предлагают более богатый уровень функциональности, который не предусмотрен в графических инструментах программы SQL Server Enterprise Manager. Кроме того, с помощью DDL-команд хотя и очень грубо, но все же можно документировать схему базы данных.

Тем не менее использование программы SQL Server Enterprise Manager позволяет быстро и легко создавать структуру базы данных с помощью инструментов с графическим пользовательским интерфейсом. Однако в программе SQL Server Enterprise Manager не так просто автоматизировать выполнение многих операций.

Некоторые разработчики предпочитают использовать для создания баз данных только команды SQL, потому что у них в распоряжении всегда остается запись выполняемых действий (в виде DDL-кода). Выбор способа создания баз данных зависит от персональных предпочтений, стандартов работы в вашей организации, а также вида создаваемых приложений для работы с базами данных. Оба способа создания базы данных рассматриваются далее в главе.

СОВЕТ

SQL Server 2000 содержит специальный элемент для генерации DDL-команд SQL для объектов базы данных. Его можно щелкнув правой кнопкой мыши на базе данных в папке Databases окна Microsoft SQL Servers, а затем выбрав в контекстном меню команду All Tasks→Generate SQL Scripts (Все задачи→Генерация сценариев SQL) для открытия диалогового окна Generate SQL Scripts (Генерация сценариев SQL). 

 

Использование программы SQLServer Enterprise Manager для создания таблиц базы данных SQL Server

После создания базы данных необходимо создать в ней таблицы. Для этого с помощью программы SQL Server Enterprise Manager выполните ряд действий.

1. В окне Microsoft SQL Servers программы SQL Server Enterprise Manager щелкните на знаке "плюс" возле имени созданной базы данных.

2. Щелкните правой кнопкой мыши на объекте Tables.

3. Из контекстного меню выберите команду New Table (Новая таблица), и на экране появится диалоговое окно Design Table (Создание таблицы), как показано на рис. 3.9.

РИС. 3.9. Диалоговое окно конструктора таблиц в программе SQL Server Enterprise Manager

НА ЗАМЕТКУ

При первом открытии диалогового окна Design Table в его заголовке будут слова New Table, а не Design Table.

4. Начнем с создания таблицы, в которой будут храниться данные о клиентах. Щелкните в столбце ColumnName и введите имя FirstName для первого поля в таблице.

5. Нажмите клавишу для перехода к следующему столбцу, Data Type. В этом столбце выберите из списка типов данных поле переменной длины, или varchar. Этот тип данных в SQL Server используется для хранения относительно небольшой части строковых данных.

6. В следующем столбце введите число 20, т.е. максимальное количество символов в поле FirstName.

7. В столбце Allow Nulls определяется возможность использования неопределенных значений. Если в этом столбце установлен флажок, то неопределенные значения могут быть введены в это поле. Для поля FirstName этот флажок должен быть установлен.

8. Введите определения остальных полей и их параметры. После определения полей окно SQL Server Enterprise Manager примет такой вид, как на рис. 3.10.

9. По окончании определения полей сохраните таблицу, щелкнув на кнопке Save (Сохранить). 

РИС. 3.10. Диалоговое окно конструктора таблиц с определениями полей в новой таблице

НА ЗАМЕТКУ

Теперь можно создать уникальные идентификаторы для каждой записи в таблице. Поле с такими идентификаторами называется идентификационным полем. Учтите, что идентификационное поле нужно определить во время создания потому что его нельзя создать впоследствии после включения данных в таблицу. Дело в том, что такое поле не может содержать неопределенные значения, а поля без неопределенных значений можно создавать только до вставки данных. В этом отношении SQL Server не обладает такой гибкостью, которой обладает база данных Microsoft Access, но это именно та цена, которую придется заплатить за повышенную производительность и масштабируемость SQL Server. В следующем разделе более подробно описывается способ создания идентификационных полей в таблице базы данных.

10. После этого на экране появится диалоговое окно Choose Name (Выбор имени), в котором следует ввести имя созданной таблицы. Здесь можно ввести любое имя, но для примеров данной главы следует использовать имя tblCustomer.

11. Вновь созданная таблица появится в окне Microsoft SQL Servers.

 

Создание идентификационного поля для уникальной идентификации записей

Полезно, но не обязательно, для каждой записи иметь информацию, которая будет уникально идентифицировать ее. Часто этот уникальный идентификатор не имеет ничего общего с бизнес-данными. В SQL Server можно создавать идентификационное поле, аналогичное полю AutoNumber в базах данных Microsoft Jet. При создании каждой записи ей автоматически присваивается уникальное числовое значение в идентификационном поле.

Идентификационное поле в SQL Server отличается от поля AutoNumber в Microsoft Jet и обладает следующими возможностями:

• любой числовой тип данных (в Jet оно может иметь тип только длинного целого числа);

• увеличение своего значения на любое определенное число (в Jet это может быть либо единица, либо случайное значение);

• нумерация с любого значения (в Jet нумерация может начинаться только с 1);

• восстановление значений; это позволяет вставить специфическое число в уникальное поле для восстановления записи, которая, например, была случайно удалена (в Jet уникальное поле всегда доступно только для чтения).

Идентификационное поле в SQL Server обладает меньшей гибкостью, чем поле AutoNumber в Jet: если вы собираетесь создать идентификационное поле, то должны сделать это при создании таблицы. Это происходит из-за того, что в SQL Server допускается позднее создание полей, содержащих неопределенные значения, а поля, не содержащие неопределенных значений, могут быть созданы только во время создания таблицы.

Чтобы создать идентификационное поле с помощью программы SQL Server Enterprise Manager, выполните ряд действий.

1. В окне конструктора таблицы Design Table создайте новое поле ID. Выберите для него тип данных int. Помните, что этот тип данных имеет размер четыре байта, подобно типу данных Integer в Visual Basic .NET.

2. Снимите флажок в столбце Allow Nulls. Это значит, что в данном поле не допускаются неопределенные значения и оно наилучшим образом подходит для превращения в идентификационное.

3. Нижняя часть диалогового окна Design Table содержит страницу свойств для свойств текущего выбранного поля в таблице. Щелкните в странице свойств на текстовом поле Identity.

4. Выберите в нем параметр Yes. По желанию укажите значения в текстовых полях Identity Seed (Начальное значение) и Identity Increment (Приращение).

После создания идентификационного поля окно SQL Server Enterprise Manager будет выглядеть, как на рис. 3.11.

Помните, что значения идентификационного поля в SQL Server не всегда последовательны. Например, если пользователь Антон пытается создать запись с ID, равным 101, а пользователь Степан создает следующую запись (ее ID равен 102) и транзакция Антона не будет выполнена, то запись с номером 101 не будет создана никогда.

В этом ничего страшного нет, особенно в том случае, когда в приложениях значение первичного ключа не используется пользователем. Однако помните, что такие "потерянные" значения возможны, так что не удивляйтесь, если, например, при просмотре номеров счетов вы не обнаружите счета с номером 101. 

РИС. 3.11. Создание идентификационного поля в диалоговом окне конструктора таблиц Design Table программы SQL Server Enterprise Manager

 

Использование других методов для генерации первичных ключей

Вовсе не обязательно, чтобы каждая таблица имела первичный ключ, но в практическом отношении желательно, чтобы было именно так. Важность первичного ключа в таблице трудно переоценить. Как отмечалось в предыдущей главе, с помощью первичных ключей очень просто выполнять операции объединения нескольких таблиц в запросе. Первичный ключ можно также использовать для указания на запись в пользовательском интерфейсе. Применяя первичный ключ в передаче записи от одной процедуры к другой, можно свести к минимуму количество передаваемых данных, принадлежащих записи. Существует несколько альтернативных способов генерации первичного ключа.

• Первый вариант — генерация случайного значения в поле первичного ключа для каждой создаваемой записи. Этот способ используется таблицами, содержащими поля AutoNumber, которые преобразованы при переносе данных из Microsoft Access в SQL Server. Он также используется при репликации баз данных Access для устранения коллизий между записями, которые вводятся неподключенными пользователями.

• Второй вариант — сохранение значения счетчика во временной таблице и использование этого значения для создания каждого нового первичного ключа создаваемой записи. При этом необходимо использовать транзакцию, которая считывает текущее значение из таблицы счетчика, определяет с его помощью первичный ключ новой записи и увеличивает значение в таблице счетчика. Причем все эти действия представляют собой одну атомарную операцию. При использовании этой технологии есть одно преимущество: соблюдается последовательность значений первичного ключа. К недостаткам (по сравнению с простым созданием идентификационного поля) можно отнести необходимость написания хранимой процедуры и добавления нужных таблиц к базе данных. Сохранение значения счетчика в одной таблице также может привести к возникновению конфликтов при одновременном доступе к ней, что может вызвать проблемы с производительностью в интенсивно используемой системе.

• Третий вариант — создание первичного ключа на основе данных. Например, пер вичный ключ для записи клиента Vito Polito может иметь вид VP001. Для другого клиента с аналогичными инициалами ключ будет иметь вид VP002 и т.д. К преимуществам можно отнести ассоциацию ключа с данными, а к недостаткам – необходимость создания дополнительного кода в виде хранимых процедур.

 

Создание поля с первичным ключом

Созданное идентификационное поле можно использовать в качестве первичного ключа. Для создания первичного ключа таблицы с помощью программы SQL Server Enterprise Manager выполните приведенные ниже действия.

РИС. 3.12. Выбор поля для создания первичного ключа в программе SQL Server Enterprise Manager

1. Установите курсор мыши в том поле, которое собираетесь использовать в качестве первичного ключа.

2. Щелкните на кнопке Set primary key (Установить первичный ключ) с изображением ключа. После этого в определении таблицы появится первичный ключ, а диалоговое окно конструктора таблицы Design Table будет иметь такой вид, как на рис. 3.12. Левый столбец в перечне полей в верхней части окна содержит обозначения (в виде изображения ключа) полей, которые образуют первичный ключ таблицы. Учтите, что любое поле может быть первичным ключом, а не только идентификационным полем.

НА ЗАМЕТКУ

Для создания первичного ключа таблицы можно использовать несколько полей, и такой ключ называется конкатенированным ключом (concatenated key). Для него можно использовать, например, имя и фамилию клиента. Это позволяет предотвратить ввод записи-дубликата для клиента Amy Rosenthal. Чтобы выбрать несколько полей для первичного поля, щелкните на них, удерживая нажатой клавишу <Ctrl>.

 

Использование программы SQL Query Analyzer для доступа к базе данных

 

РИС. 3.13. Основное окно программы SQL Query Analyzer

Для выполнения команд SQL Server можно использовать программу SQL Query Analyzer (раньше она называлась ISQLW). С помощью этой программы можно не только осуществлять SQL-запросы, но также обновлять записи, удалять их и выполнять другие действия над ними. Эта программа также позволяет проводить очень сложные операции с базами данных и сервером базы данных, например создавать базы данных, представления и хранимые процедуры.

 Если вы знакомы с синтаксисом SQL, то изучение принципов работы программы SQL Query Analyzer не составит для вас никакого труда. (Однако выполнение некоторых специализированных и сложных операций может оказаться более трудным, поэтому далее в примерах вместо SQL Query Analyzer используется программа SQL Server Enterprise Manager.)

Для создания и выполнения команд с помощью программы SQL Query Analyzer запустите ее, щелкнув на кнопке Start (Пуск) и выбрав команду Programs→ Microsoft SQL Server→Query Analyzer (Программы→Microsoft SQL Server→Query Analyzer) или выбрав команду меню Tools→Query Analyzer (Инструменты→Query Analyzer) в окне программы SQL Server Enterprise Manager. На экране появится диалоговое окно Connect to SQL Server (Подключение к серверу SQL Server), в котором нужно выбрать подключаемый сервер баз данных, учетное имя и пароль, а затем щелкнуть на кнопке Connect (Подключиться). После этого появится основное окно программы SQL Query Analyzer (рис. 3.13). При выполнении команд на экране будут появляться дополнительные вкладки для отображения результатов, сообщений, статистических данных и планов. Более подробно они описываются далее в главе.

Перед выполнением команд SQL необходимо протестировать соединение с сервером. Для этого выполните приведенные ниже действия с базой данных pubs, которая поставляется вместе с SQL Server.

1. Выберите используемую базу данных. Это можно сделать с помощью SQL-команды USE. Введите следующую команду в диалоговое окно ввода запросов Query (Запрос): USE pubs

НА ЗАМЕТКУ

Команды SQL можно вводить как строчными, так и прописными буквами. Но ключевые слова SQL принято вводить прописными буквами, поэтому следуйте такому соглашению.

2. Выполните введенную команду, нажав клавишу или щелкнув на кнопке Execute Query (Выполнить запрос) с изображением зеленого треугольника. После выполнения этой команды SQL появится вкладка Messages (Сообщения) со следующим сообщением:

The command(s) completed successfully.

Что в переводе означает:

Команды успешно выполнены.

3. Для удаления введенной команды SQL выберите команду меню Edit→Clear Window (Редактировать→Очистить окно) или используйте комбинацию клавиш .

4. Теперь попробуйте выполнить простой запрос к базе данных pubs. Для этого введите следующий код SQL в окно Query:

SELECT * FROM authors 

5. Выполните запрос, нажав клавишу или щелкнув на кнопке Execute Query (Выполнить запрос) с изображением зеленого треугольника. После выполнения этой команды SQL появится вкладка Grid (Решетка) с результатами выполнения запроса (рис. 3.14) и вкладка Messages (Сообщения) со следующим сообщением о количестве извлеченных строк:

(23 row(s) affected)

Что в переводе означает:

(Извлечено 23 строки)

РИС. 3.14. Результат выполнения простого запроса к таблице pubs в окне программы SQL Query Analyzer

СОВЕТ 

Помимо выполнения сразу всех команд сценария в диалоговом окне Query одну или несколько строк с командами SQL можно выполнять, выделяя нужные строки и нажимая клавишу <F5> или щелкая на кнопке Execute Query. Это позволяет повторно выполнять части команд, возможно, даже после их модификации.

 

Просмотр всех объектов базы данных с помощью хранимой процедуры sp_help

SQL Server позволяет просмотреть все объекты, доступные в любой базе данных. Это можно сделать с помощью хранимой процедуры (stored procedure) – небольшого кода, хранящегося и выполняемого на сервере. 

Просмотреть все объекты базы данных можно с помощью хранимой процедуры sp_help. Для этого необходимо ввести ее и выполнить как обычный SQL-запрос в окне программы Query Analyzer.

Для просмотра всех объектов базы данных с помощью хранимой процедуры sp_help выполните действия, приведенные ниже.

1. Очистите диалоговое окно запроса Query, нажав комбинацию клавиш .

2. Введите в нем следующую команду:

sp_help

3. Выполните введенную команду. SQL Server сгенерирует список доступных объектов базы данных, как показано на рис. 3.15.

РИС. 3.15. Результат выполнения хранимой процедуры sp_help для базы данных pubs

НА ЗАМЕТКУ

Вы можете создавать собственные хранимые процедуры. Этот процесс описан в разделе о создании и выполнении хранимых процедур далее в этой главе. Кроме пользовательских хранимых процедур используемой базы данных, существуют и системные хранимые процедуры, которые доступны для любой базы данных на SQL Server. Примеры использования системных хранимых процедур приведены далее в главе.

 

Использование существующей базы данных

Для работы с определенной базой данных в программе Query Analyzer можно использовать команду USE. После выбора с ее помощью соответствующей базы данных все вводимые SQL-команды будут выполняться для этой выбранной базы данных. Обратите особое внимание на необходимость применения команды USE, поскольку существует ряд команд, которые имеют один и тот же синтаксис при использовании с разными базами данных. Выполнение такой команды "не с той базой данных" может привести к неприятным последствиям.

НА ЗАМЕТКУ

Во избежание случайного ошибочного выполнения команд по отношению к "не базе данных" нужно явно указать используемую по умолчанию базу данных вместо используемой по умолчанию основной базы данных master (т.е. в ней сохраняются только данные конфигурации сервера). Для каждой учетной записи можно указать свою используемую по умолчанию базу данных во время создания учетной записи или впоследствии с помощью способа, описанного далее в главе.

Например, для активизации базы данных novelty вместо основной базы данных master выполните перечисленные ниже действия.

1. Введите в окне Query Analyzer команду USE novelty. Если база данных novelty существует, то SQL Server вернет следующее сообщение:

The command(s) completed successfully.

Что в переводе означает:

Команды успешно выполнены.

2. Если же базы данных novelty на этом сервере нет, то появится сообщение

Server: 911, Level 16, State 1, Line 1

Could not locate entry in sysdatabases for database 'novelty'. No entry found with that name. Make sure that the name is entered correctly.

Что в переводе означает следующее:

Сервер: Сообщение Уровень 16, Состояние 1, Строка 1

Не могу обнаружить системную базу данных 'novelty'. Нет никаких регистрационных записей с этим именем. Убедитесь в том, что введено правильное имя базы данных.

Если вы забыли имя базы данных, то запустите программу SQL Server Enterprise Manager и найдите интересующую вас базу данных. Для просмотра объектов базы данных можно также воспользоваться хранимой процедурой sp_helpdb.

 

Создание команд SQL в программе Query Analyzer

С помощью программы Query Analyzer можно создавать практически любые команды SQL, причем этот способ обладает многими преимуществами по сравнению со всеми другими способами создания команд SQL. Учтите, что синтаксис некоторых команд SQL может оказаться гораздо сложнее, чем простое использование графических элементов управления в программе SQL Server Enterprise Manager, особенно при использовании редко выполняемых команд, например для создания баз данных. В этом смысле программа Query Analyzer обладает несомненным преимуществом интерактивного создания команд SQL и мгновенно реагирует на создаваемые команды. Query Analyzer обладает некоторыми другими функциональными возможностями, которых нет программе SQL Server Enterprise Manager, например способностью запускать запросы и хранимые процедуры.

В главе 2, "Запросы и команды на языке SQL", рассматриваются некоторые наиболее часто используемые команды SQL. Большая часть этого материала относится также к выполнению запросов и хранимых процедур для SQL Server.

 

Использование представлений для управления доступом к данным

 

Представление (view) — это, по сути, определение запроса, хранящегося в базе данных. Оно подобно определению запроса в базах данных Microsoft Jet, однако отличается местом хранения: располагается в базе данных и предоставляет приложению-клиенту доступ к данным.

Представление можно использовать в том случае, если необходимо предоставить пользователю доступ к данным, но нежелательно, чтобы он мог обращаться непосредственно к данным в таблице. Представления можно рассматривать как виртуальные таблицы, которые могут использоваться точно так же, как и другие реальные таблицы базы данных. Фактически для приложения-клиента представление выглядит как обычная таблица, а кроме того, дает ему ряд преимуществ.

Например, если пользователь получает доступ к данным с помощью представления, а не посредством прямого обращения к таблице, это открывает ему следующие возможности:

• изменять структуру таблицы, не меняя ассоциированного с ней представления;

• ограничивать количество строк и столбцов, возвращаемых представлением;

• обеспечивать простой доступ к данным, возвращаемым из нескольких таблиц, с помощью объединений в представлении.

Для того чтобы полностью использовать все преимущества представлений, необходимо разработать стратегию безопасности базы данных. Это позволяет применить специализированные разрешения для представлений, а не таблиц, что упрощает выдачу и отмену разрешений для разных типов пользователей. Эти и другие вопросы обеспечения безопасности обсуждаются далее в главе.

 

Создание представлений с помощью программы SQL Server Enterprise Manager

Представления, как и большинство других объектов базы данных, можно создавать с помощью программ SQL Server Enterprise Manager или SQL Query Analyzer. Программа SQL Server Enterprise Manager обладает мощными и выразительными графическими инструментами, а программа SQL Query Analyzer- интерактивными инструментами для создания и выполнения команд SQL, а также тестирования созданных представлений.

Для создания представления с помощью программы SQL Server Enterprise Manager выполните приведенные ниже действия.

1. В диалоговом окне Server Manager щелкните правой кнопкой мыши на папке Views в той базе данных, в которой необходимо создать представление. В этом примере используется база данных pubs.

2. Из контекстного меню выберите команду New View (Создать представление), и на экране появится окно конструктора представлений программы, как показано на рис. 3.16.

РИС. 3.16. Создание нового представления в окне программы SQL Server Enterprise Manager

НА ЗАМЕТКУ

При первом открытии диалогового окна Design View в его заголовке будут слова New View, а не Design View.

СОВЕТ

Эти графические инструменты создания представлений можно использовать для создания запросов. Для этого щелкните правой кнопкой мыши на таблице базы данных и выберите из контекстного меню команду Open Table→Query (Открыть таблицу→Запрос). Созданный запрос нельзя сохранить, потому что отдельный запрос не является объектом базы данных SQL Server. Однако конструктор базы данных полезен для создания и тестирования хранимых процедур и извлечения отдельного набора данных.

3. Для открытия диалогового окна Add Table (Добавить таблицу) щелкните на кнопке Add Table с изображением плюса и таблицы или щелкните правой кнопкой мыши на пустом поле со схемой представления и выберите в контекстном меню команду Add Table.

4. Выберите таблицу jobs и щелкните на кнопке Add (или дважды щелкните на таблице jobs) для включения таблицы jobs в представление.

5. Выберите таблицу employee и щелкните на кнопке Add (или дважды щелкните на таблице employee) для включения таблицы employee в представление.

6. Щелкните на кнопке Close, чтобы закрыть диалоговое окно Add Table.

7. Выберите поля в каждой таблице, т.е. поле job_desc в таблице jobs и поля fname и lname в таблице employee.

8. Проверьте созданное представление, щелкнув на кнопке Run с изображением восклицательного знака или щелкнув правой кнопкой мыши на пустом поле со схемой представления, а затем выбрав из контекстного меню команду Run. Результат проверки созданного представления показан на рис. 3.17.

РИС. 3.17. Результаты создания и выполнения нового представления в окне конструктора представлений программы SQL Enterprise Manager

9. Сохраните новое представление, щелкнув на кнопке Save или щелкнув правой кнопкой мыши на пустом поле со схемой представления, а затем выбрав из контекстного меню команду Save.

НА ЗАМЕТКУ

Для указания имени представления можно использовать соглашение об именах с суффиксом _view, например SpecialCustomers_view. Это позволяет пользователям сразу же определить, что они имеют дело с представлением , а не с таблицей. Конечно, для этого можно использовать любое соглашение об именах, либо вообще не использовать его. 

10. В диалоговом окне Save As (Сохранить как) введите имя представления и щелкните на кнопке OK. Здесь можно указать любое имя, но в данном примере используется EmployeeJobs_view.

После создания представления EmployeeJobs_view в базе данных появится еще один объект, которым можно манипулировать так же, как любой простой таблицей, несмотря на то что это результат объединения двух таблиц. Таким образом, можно получить более короткие и простые команды SQL на основе этого одного объекта, но по отношению к прежней корректно структурированной (нормализованной) базе данных.

Аналогично можно создать представление на основе вычислений или манипуляций с данными таблицы. Предположим, что нужно извлечь имена сотрудников в виде одного поля с именем и фамилией в формате имя, фамилия. Для этого можно создать следующее представление:

CREATE VIEW EmployeeNames_view AS

SELECT lname + ', ' + fname AS Name FROM employee

 

Использование представлений в приложениях

Представление — это конструкция, которая позволяет управлять процессом извлечения информации из базы данных SQL Server. Это управление может осуществляться несколькими способами. В представлении можно ограничить количество строк или столбцов, что позволяет управлять данными, возвращаемыми пользователю. Для этого необходимо создать критерий отбора, который известен только разработчику базы данных, или предоставить пользователям доступ к данным на основе разрешений системы безопасности. Каждый объект базы данных — таблица, представление, хранимая процедура — может быть ассоциирован с пользователем или группой системы безопасности. В базах данных, которые используют преимущества представлений и хранимых процедур, прямой доступ к таблицам обычно ограничивается администратором базы данных. Клиентские приложения при этом ограничены только доступом к связанным представлениям или хранимым процедурам, которые, в свою очередь, отвечают за извлечение данных из основных таблиц.

Создание скрытого поля — еще один способ ограничения доступа. При этом данные такого поля не возвращаются пользователю, а отфильтровываются с помощью представления. Клиентскому приложению даже не будет известно, что существуют еще какие-либо данные, поскольку оно будет ограничено лишь данными представления.

Практически все профессиональные серверы баз данных SQL ограничивают непосредственный доступ к базе данных. Помимо ограничения доступа к строкам и полям, сокрытие таблиц баз данных с помощью представлений позволяет изменять их незаметно для клиентских приложений.

Кроме этого, с помощью компонентов среднего уровня можно отделить изменения структуры базы данных от изменений бизнес-правил. Эти компоненты аналогичны представлениям и хранимым процедурам тем, что скрывают изменения структуры базы данных от клиентского приложения. Помимо этого, существует еще одно преимущество использования таких компонентов по сравнению с представлениями и хранимыми процедурам SQL Server: они упрощают процесс программирования, возвращают данные в виде объектов, а не строк и столбцов, а также не привязаны к конкретной СУБД или языку программирования. Более подробно компоненты среднего уровня рассматриваются в главе 12, "Web-службы и технологии промежуточного уровня".

 

Создание представления с помощью программы SQL Query Analyzer

Для создания представлений можно использовать программу SQL Query Analyzer. Процесс создания представления в ней аналогичен подобному процессу в программе SQL Server Enterprise Manager, но обладает большей гибкостью, несмотря на использование более скромных графических инструментов. Для создания представления tblEmployee без конфиденциального поля Salary в программе SQL Query Analyzer выполните приведенные ниже действия.

1. Введите в окно программы SQL Query Analyzer следующий код (он организован таким образом, чтобы представление создавалось независимо от того, существует оно уже или нет):

USE novelty GO

DROP VIEW Employee_view GO

CREATE VIEW Employee_view AS

SELECT ID, FirstName, LastName, DepartmentID

FROM tblEmployee GO SELECT * FROM Employee_view

2. Для выполнения этой последовательности команд нажмите клавишу или щелкните на кнопке Execute Query. Представление будет создано и запущено, а результаты будут показаны во вкладке Grids (или Results).

3. Проверьте работоспособность представления с помощью программы SQL Server Enterprise Manager, в которой нужно выбрать вкладку Views для базы данных Novelty.

НА ЗАМЕТКУ

Ранее в этой главе рассматривалось, как создать представление графическими средствами в программе SQL Server Enterprise Manager, щелкая на нем правой кнопкой мыши и выбирая команду Design View (Создать представление) из контекстного меню. Текст команды SQL для создания представления можно редактировать, дважды щелкнув на представлении и изменяя этот текст в диалоговом окне.

В рассматриваемом примере, кроме создания представления с помощью программы SQL Server Enterprise Manager, демонстрируется удобство использования пакетов команд SQL. Приведенный выше пакет команд SQL не только создает новое представление, но и связывает его с нужной базой данных и извлекает данные для него. Полученный результат подтверждает, что представление работает именно так, как и предполагалось. 

Пакеты можно создавать для упрощения процесса создания объектов базы данных с помощью программы SQL Server Enterprise Manager, потому что в большинстве случаев при создании объектов базы данных приходится выполнять сразу несколько операций. Типичным примером пакета команд SQL является удаление старой таблицы, создание новой таблицы и наполнение ее данными. Кроме этой и других задач, пакет команд SQL может использоваться для проверки наличия учетной записи и создания учетной записи с используемым по умолчанию паролем.

 

Создание и запуск хранимых процедур

 

С помощью представления можно контролировать данные, возвращаемые SQL Server, однако существует еще более мощное средство — хранимые процедуры (stored procedures). Хранимые процедуры подобны представлениям, но могут выполнять более сложные операции над данными. Например, с помощью хранимых процедур можно выполнять следующие операции:

• вычисления;

• установка или возврат параметров;

• реализация логики приложения, для чего требуется выполнить несколько этапов или запросов с помощью языка программирования, предназначенного для использования с базой данных;

• возврат данных в форме, которая наилучшим образом подходит для приложения-клиента.

Заметьте: не все эти операции можно выполнить с помощью представлений.

Хранимую процедуру можно представить себе как особый вид процедуры, так как она хранится в самой базе данных, а не является частью приложения, которое выполняется на клиентском компьютере или прикладном сервере (именно поэтому она так и называется). В предыдущем списке операций указано, что хранимая процедура может содержать не только простой однострочный запрос, но и сложный многострочный запрос, который способен выполнить несколько действий, прежде чем возвратить результат.

Хранимые процедуры создаются на специальном языке программирования, который применяется в используемой базе данных. Этот язык содержит практически все распространенные программные конструкции, хотя его синтаксис не всегда очевиден. В SQL Server для создания хранимых процедур используется язык Transact SQL.

НА ЗАМЕТКУ

Компания Microsoft заявила, что будущие версии SQL Server позволят создавать хранимые процедуры на любом языке, который совместим с платформой .NET (например, Visual Basic .NET), а не только на языке Transact SQL. Это позволит разработчикам легко переходить от одного аспекта программирования к другому, не изучая синтаксиса нового языка программирования.

В этом разделе не ставится задача подробного описания всех команд, которые доступны программисту при создании хранимых процедур, а только дается общее описание принципов работы хранимых процедур, достоинств и способов применения в приложениях на основе SQL Server.

Создание хранимых процедур с помощью программы SQL Server Enterprise Manager

Для создания хранимой процедуры с помощью SQL Server Enterprise Manager выполните ряд действий.

1. В окне Microsoft SQL Servers программы SQL Server Enterprise Manager щелкните правой кнопкой мыши на папке Stored Procedures рабочей базы данных. В нашем примере это база данных pubs.

2. Из контекстного меню выберите команду New Stored Procedure (Создать хранимую процедуру). Появится диалоговое окно Stored Procedure Properties (Свойства хранимой процедуры).

НА ЗАМЕТКУ

Хотя диалоговое окно Stored Procedure Properties выглядит как окно с фиксированными размерами, его размер можно изменить, перетаскивая один из краев или уголков окна, как это делается с другими диалоговыми окнами. Таким образом можно изменить размер окна для более удобного отображения всего введенного текста.

3. Введите текст хранимой процедуры, который показан на рис. 3.18.

РИС. 3.18. Диалоговое окно создания новой хранимой процедуры Stored Procedure Properties в программе SQL Server Enterprise Manager

4. После выполнения этих действий щелкните на кнопке OK в нижней части диалогового окна Stored Procedure Properties.

 

Запуск хранимых процедур в окне программы SQL Query Analyzer

Для запуска хранимых процедур (а также представлений и других команд SQL) можно воспользоваться программой SQL Query Analyzer. Таким образом можно протестировать созданную хранимую процедуру или представление. Для запуска хранимой процедуры в окне программы SQL Query Analyzer выполните приведенные ниже действия.

1. В окне программы SQL Server Enterprise Manager выберите команду Tools→SQL Query Analyzer (Сервис→SQL Query Analyzer); запустится программа SQL Query Analyzer.

2. В диалоговом окне Query введите имя хранимой процедуры, которую нужно запустить. Например, для запуска хранимой процедуры, описанной в предыдущем разделе, введите procEmployeesSorted.

3. Выполните запрос, нажав клавишу или щелкнув на кнопке Execute Query. Хранимая процедура будет выполнена и возвратит (при наличии данных в таблице) результирующий набор во вкладке Grids (или во вкладке Results).

4. В окне Microsoft SQL Servers программы SQL Server Enterprise Manager выберите папку Stored Procedures для проверки наличия только что созданной хранимой процедуры. Здесь для обновления содержимого консольного окна, возможно, понадобится щелкнуть на кнопке Refresh (Обновить).

Конечно, хранимую процедуру можно запустить, непосредственно запуская программу SQL Query Analyzer, и для этого совсем не обязательно запускать ее изнутри программы SQL Server Enterprise Manager.

 

Создание хранимой процедуры с помощью программы SQL Query Analyzer

Процесс создания хранимой процедуры с помощью SQL Query Analyzer практически не отличается от аналогичного процесса в окне программы SQL Server Enterprise Manager.

НА ЗАМЕТКУ

Убедитесь в том, что хранимая процедура создается в базе данных Novelty. Довольно часто разработчики забывают переключиться на нужную базу данных (с помощью команды USE или списка баз данных в программе SQL Query Analyzer) до выполнения команд по отношению к ней. Создание хранимых процедур с помощью программы SQL Server Enterprise Manager только усугубляет последствия этой ошибки.

Для создания хранимой процедуры с помощью программы SQL Query Analyzer используйте команду CREATE PROCEDURE.

1. В окне программы SQL Query Analyzer введите следующий код:

CREATE PROCEDURE GetCustomerFromID @custID int

AS

SELECT * FROM tblCustomer

WHERE ID = @custID

2. В этом коде создается хранимая процедура GetCustomerFromID, которая принимает аргумент @custID и возвращает запись, в поле ID которой находится значение, совпадающее со значением аргумента @custID (поскольку поле ID в таблице tblCustomer является первичным ключом, эта процедура всегда будет возвращать либо нуль, либо одну запись).

3. Выполните введенную команду для создания хранимой процедуры.

4. Теперь необходимо протестировать созданную хранимую процедуру в окне Query. Для этого попробуйте извлечь запись из таблицы, введя следующую команду:

GetCustomerFromID 22

5. Сервер вернет запись клиента с идентификационным номером 22 (рис. 3.19). Использование другого идентификационного номера в качестве параметра этой хранимой процедуры позволит вернуть другую запись с данными о другом клиенте.

Созданная процедура вернет данные только в том случае, если они есть в таблице.

РИС. 3.19. Запись клиента возвращается с помощью хранимой процедуры GetCustomerFromID

НА ЗАМЕТКУ

Теперь можно приступить к загрузке данных в таблицу. В прилагаемых к книге файлах (их вы можете найти на Web-узле Издательского дома "Вильяме" по адресу: http://www.williamspublishing.com ) находится текстовый файл CustomerData.sql, который предназначен для загрузки данных о клиенте в базу данных Novelty. Кроме него, этому адресу располагаются и другие сценарии загрузки данных в таблицы базы данных Novelty.

 

Отображение текста существующих представлений или хранимых процедур

Для отображения кода представлений или хранимых процедур можно использовать хранимую процедуру sp_helptext. Для того чтобы отобразить эти данные, необходимо ввести команду sp_helptext, а затем имя интересующего вас объекта базы данных. После этого SQL Server возвратит полный текст представления или хранимой процедуры. Рассмотрим пример отображения текста представления Employee_view, создание которого описано в предыдущих разделах.

1. В окне Query программы SQL Query Analyzer введите следующую команду:

sp_helptext Employee_view

2. Выполните введенную команду, нажав клавишу или щелкнув на кнопке Execute Query панели инструментов программы SQL Query Analyzer. В результате выполнения этой команды SQL Server вернет текст хранимой процедуры во вкладке Grids (рис. 3.20).

РИС. 3.20. Отображение текста представления с помощью хранимой процедуры sp_helptext

 

Создание триггеров

Триггер (trigger) — это особый тип хранимой процедуры, который выполняется при доступе к данным в таблице. Понятие триггера в SQL Server аналогично понятию процедуры события в Visual Basic: триггер выполняется при обновлении, удалении или вставке данных в таблицу.

Триггер обычно используется при сложном доступе к данным, например: сохранение в файле журнала информации об обновлениях базы данных или же создание в новой записи сложного значения поля (по умолчанию) на основе запроса к одной или нескольким таблицам.

Не нужно использовать триггеры для поддержки ссылочной целостности; для этого лучше обратиться к встроенным средствам SQL Server. Старайтесь при работе с базами данных использовать средства, предоставляемые SQL Server.

Например, можно использовать триггеры, чтобы обеспечить уникальное значение в столбце для сохранения первичного ключа. Этот способ характерен для программы Microsoft Access Upsizing Tools; в ней генерируется случайное значение первичного ключа каждой записи с помощью триггера. (Для этого можно использовать уникальное поле, как уже упоминалось ранее в главе.) Пример такого кода генерации первичного ключа приведен ниже.

CREATE TRIGGER tblCustomer_ITrig ON dbo.tblCustomer

FOR INSERT

AS

DECLARE @randc int, @newc int

SELECT @randc = (SELECT convert(int, rand () * power(2, 30)))

SELECT @newc = (SELECT ID FROM inserted)

UPDATE tblCustomer SET ID = @randc WHERE ID = @newc

НА ЗАМЕТКУ

Для корректной работы каждого из этих триггеров и обновления идентификационного поля нужно переустановить значения этого поля таким образом, чтобы оно не считалось идентификационным. Для этого перейдите в диалоговое окно Design Table и задайте для свойства Identity(Идентификационное поле) значение No.

Создание первичного ключа записи на основе случайного значения – самый простой способ уникальной идентификации записи. Однако такой способ имеет два недостатка.

Во-первых, первичный ключ генерируется в произвольном порядке. В некоторых случаях это не очень существенная проблема, однако если использовать первичный ключ для нумерации выписываемых счетов, то может случиться так, что счет с номером 20010 будет выписан раньше, чем счет с номером 20009.

Во-вторых, существует потенциальная проблема, состоящая в том, что сгенерированный уникальный ключ на самом деле не будет уникальным, т.е. при создании ключа не выполняется проверка существования записи с таким же значением первичного ключа. Конечно, вероятность того, что будет сгенерировано два одинаковых значения, очень мала, но она все же существует (тип данных integer в SQL Server имеет длину 4 бита, т.е. диапазон возможных значений: -2,1×109…2,1×109).

 

Бизнес-ситуация 3.1: создание триггера для поиска созвучных слов

Брэд Джонс, президент компании Jones Novelties Incorporated, одобрил предварительную работу своего разработчика базы данных. Теперь он готов приступить к следующей проблеме, связанной с базой данных, и создать запросы для извлечения информации о клиентах по введенному созвучному имени (например, имена произносятся одинаково, но пишутся по-разному) с учетом случайных опечаток в нем. Как организовать поиск клиента, если вы не помните точное написание его имени, а только его произношение: Smith или Smyth, McManus или MacManus? Каждому человеку с необычной фамилией наверняка приходилось сталкиваться с ее неверной записью на слух.

Разработчик базы данных для решения этой проблемы решил воспользоваться функцией soundex(), специально предусмотренной для этого в SQL Server. Она преобразует слово в алфавитно-цифровое значение, которое представляет базовые звуки слова. Если такое значение создается в момент ввода имени, то поиск имени можно вести по его алфавитно-цифровому значению. Конечно, такой запрос вернет гораздо больше записей, чем нужно, но все они будут отвечать одному произношению.

Для реализации этого компонента в базе данных Jones Novelties нужно выполнить следующие действия:

• изменить таблицу tblCustomer для вставки нового поля LastNameSoundex;

• запустить запрос обновления данных для создания алфавитно-цифровых значений звучания для имен клиентов в таблице tblCustomer;

• создать триггер, который сгенерирует в поле LastNameSoundex алфавитно-цифровое значение звучания для введенного или измененного имени;

• создать хранимую процедуру, которая возвращает всех клиентов с одинаково звучащими именами.

Разработчик базы данных начинает с создания нового поля LastNameSoundex в таблице tblCustomer для хранения в нем алфавитно-цифровых значений звучания имен всех клиентов. Это можно сделать с помощью следующей команды:

ALTER TABLE tblCustomer ADD

LastNameSoundex varchar(4) NULL

Затем разработчику нужно создать и только один раз выполнить команду UPDATE для вычисления алфавитно-цифровых значений звучания уже имеющихся имен в базе данных.

UPDATE tblCustomer

SET LastNameSoundex = soundex(lastName)

GO

SELECT LastName, LastNameSoundex

FROM tblCustomer

GO

Включать команду SELECT в пакет команд SQL после команды UPDATE совсем необязательно, это нужно лишь для того, чтобы разработчик базы данных смог убедиться в правильности выполненных действий.

Далее разработчику нужно создать триггер, чтобы вставить алфавитно-цифровое значение звучания для каждого введенного в базу данных имени нового клиента.

CREATE TRIGGER trCustomerT

ON tblCustomer

FOR insert, update

AS

 UPDATE tblCustomer

 SET tblCustomer.LastNameSoundex = soundex(tblCustomer.LastName)

 FROM inserted

 WHERE tblCustomer.ID = inserted.ID

НА ЗАМЕТКУ

Хотя в SQL Server 2000 для одной таблицы допускается определение нескольких триггеров одного типа (для вставки, обновления и удаления), но порядок их выполнения контролируется только частично, т.е. можно указать только первый и последний выполняемый триггер. Для гарантированного выполнения данного триггера после всех триггеров вставки для таблицы tblCustomer (например, триггера присвоения значения столбцу ID) нужно выполнить в программе SQL Query Analyzer следующую команду:

sp_settriggerorder @triggername=@order='last', @stmtype='INSERT'

Причина такой сложной организации триггеров заключается в том, что они выполняются только один раз, даже если операция вставки, обновления или удаления, которая вызвала запуск триггера является частью пакета команд для тысяч записей. Поэтому созданные разработчиком базы данных триггеры должны уметь обрабатывать потенциально неограниченное количество записей.

Для обработки нужного набора записей триггеру должно быть известно, какие записи участвовали в выполнении процедуры, которая привела к ее запуску. Откуда же у триггера такие сведения? Триггеры обладают доступом к этой информации благодаря виртуальным таблицам вставки и удаления. Виртуальная таблица вставки содержит записи, вставленные (или обновленные) процедурой, которая привела к запуску триггера вставки. Аналогично, виртуальная таблица удаления содержит записи, удаленные процедурой, которая привела к запуску триггера удаления.

Поскольку разработчику базы данных в данном примере нужно создать триггер вставки и триггер удаления, то упоминание записей во вставленной виртуальной таблице охватывает все вставленные и удаленные записи, независимо от способа вставки или удаления. Каждая запись в таком случае будет иметь алфавитно-цифровое значение звучания его имени, генерированное триггером.

После создания надежного триггера, который генерирует алфавитно-цифровое значение звучания для имени для каждой записи в таблице tblCustomer, нужно проверить его работоспособность, вставив запись, которую невозможно извлечь с помощью традиционного запроса. Допустим, что в базе данных есть несколько клиентов с именем Smith, и пробуем вставить в нее запись о клиенте Smythe с помощью следующей команды INSERT:

INSERT INTO tblCustomer (FirstName, LastName)

VALUES ('Abigail', 'Smythe')

Теперь работу созданного триггера можно проверить с помощью следующего запроса:

SELECT LastNameSoundex, LastName

FROM tblCustomer

WHERE LastName = 'Smythe' 

После подтверждения работоспособности триггера можно создать хранимую процедуру, которая будет использовать преимущества поля LastNameSoundex. Эта процедура принимает один параметр, т.е. фамилию искомого клиента, и возвращает информацию обо всех клиентах в таблице tblCustomer, чьи имена звучат так же, как имя искомого клиента. Вот как выглядит код такой хранимой процедуры:

CREATE PROC LastNameLookup

@name varchar(40) AS

SELECT * FROM tblCustomer

WHERE soundex(@name) = LastNameSoundex

Наконец, можно приступать к извлечению записей из базы данных на основе значений звучания. Для этого нужно выполнить хранимую процедуру LastNameLookup. LastNameLookup 'smith'

После выполнения этой процедуры программа Query Analyzer возвращает набор записей, состоящий из клиентов с фамилией, созвучной smith, включая клиента с фамилией Smythes (рис. 3.21).

РИС. 3.21. Набор записей, возвращенный хранимой процедурой LastNameLookup

 

Управление пользователями и средства безопасности с помощью программы SQL Server Enterprise Manager

 

Одной из наиболее важных причин использования сервера SQL Server является управление несколькими пользователями, которые пытаются осуществить доступ к одним и тем же данным одновременно. Хотя это приводит к возникновению большого количества проблем (например, при попытке пользователей получить доступ к привилегированной информации или одновременно обновить одну запись), но их можно решить с помощью параметров работы сервера.

Параметры безопасности SQL Server позволяют добиться большой гибкости в определении доступа к данным. Каждая база данных обладает своим набором пользователей, которые обладают своими наборами разрешений. Набор разрешений дает пользователю возможность доступа к данным и их изменения, а также (в случае необходимости) потенциального создания и удаления самой базы данных.

Параметры безопасности SQL Server также позволяют присвоить роли отдельным пользователям для упрощения присвоения разрешений. Например, можно создать роль разработчика, который обладает доступом ко всем объектам базы данных, либо роль менеджера, который обладает доступом к конфиденциальной информации, например зарплате или продажах компании, либо роль пользователя без экстраординарных разрешений доступа к данным. Способ присвоения ролей целиком находится во власти разработчика, но для упрощения доступа к информации роли нужно использовать даже в очень простой базе данных.

 

Создание и сопровождение учетных записей пользователей

Для надежной и гибкой системы безопасности требуется создать систему идентификации каждого пользователя. В SQL Server система идентификации пользователей основана на учетных записях пользователей. Учетной записью (login) называется объект (как правило, человек), который обладает доступом к SQL Server. Учетные записи используются для регистрации в системе пользователей. Пользователь может обладать специальными разрешениями учетной записи для доступа к отдельной базе данных. Широкий набор разрешений пользователей определяется с помощью ролей.

Для регистрации пользователя нужно сначала создать его учетную запись, выполнив приведенные ниже действия.

1. В программе SQL Server Enterprise Manager откройте папку Security для используемого сервера SQL Server.

2. Щелкните правой кнопкой мыши на объекте Logins и выберите команду Action→New Login (Действие→Новая учетная запись).

3. Появится диалоговое окно SQL Server Login Properties — New Login (рис. 3.22).

4. Для создания новой учетной записи установите переключатель SQL Server Authentication (Аутентификация на сервере SQL Server) и введите имя пользователя в поле Name. По желанию введите пароль в поле Password.

НА ЗАМЕТКУ

При использовании аутентификации Windows нужно предусмотреть процедуру в клиентском приложении, с помощью которой пользователь мог бы изменить свой пароль. Эту процедуру можно реализовать с помощью sp_password. Учтите, что при использовании интегрированной системы безопасности это необязательно, потому что в таком случае используются механизмы аутентификации и изменения паролей системы Windows NT/2000. 

РИС. 3.22. Диалоговое окно SQL Server Login Properties, предназначенное для создания новой учетной записи

5. При отображении учетной записи Windows NT/2000 на учетную запись SQL Server установите переключатель Windows Authentication (Аутентификация Windows), а затем щелкните на кнопке с многоточием для выбора существующей учетной записи Windows NT/2000.

6. Укажите используемую по умолчанию базу данных, выбрав Novelty в списке баз данных Database.

7. Укажите базы данных, к которым осуществляется доступ с помощью этой учетной записи, воспользовавшись вкладкой Database Access (Доступ к базе данных) в диалоговом окне SQL Server Login Properties (рис. 3.23).

8. Щелкните на кнопке по окончании присвоения учетной записи. После создания такой учетной записи связанный с ней пользователь может осуществлять доступ к указанной базе данных. Новая учетная запись сразу же отображается в консольном окне Microsoft SQL Servers программы SQL Server Enterprise Manager (рис. 3.24). 

РИС. 3.23. Создание новой учетной записи для доступа к базе данных

 

Управление ролями с помощью программы SQL Server Enterprise Manager

В SQL Server 2000 роли используются для группирования пользователей с одинаковыми разрешениями. Любой пользователь отдельной роли наследует все разрешения данной роли, а изменения разрешений роли изменяют разрешения всех пользователей данной роли. Поэтому, чтобы одновременно изменить разрешения для большого количества пользователей, следует изменить разрешения их роли.

В SQL Server 2000 используются два типа ролей: серверные и роли базы данных. Серверные роли управляют доступом к операциям, которые влияют на сервер SQL Server, например запуск и остановка сервера, конфигурирование таких усовершенствованных компонентов, как репликация, управление системой безопасности и создание баз данных. Роли баз данных управляют операциями и доступом к данным указанной базы данных.

Для добавления пользователя с серверной ролью в программе SQL Server Enterprise Manager выполните перечисленные ниже действия.

1. В окне Microsoft SQL Servers программы SQL Server Enterprise Manager откройте папку Security используемого сервера и выберите папку Server Roles для отображения фиксированного набора серверных ролей. 

РИС. 3.24. Новая учетная запись отображается в консольном окне Microsoft SQL Servers программы SQL Server Enterprise Manager

2. Щелкните правой кнопкой мыши на изменяемой роли и выберите команду Properties из контекстного меню или щелкните дважды на изменяемой роли. При этом на экране появится диалоговое окно Server Role Properties (Свойства серверной роли), показанное на рис. 3.25.

3. Чтобы указать учетную запись для данной роли, щелкните на кнопке Add и выберите учетную запись из списка доступных учетных записей.

4. Для удаления учетной записи из роли выберите нужную запись (или несколько записей) из списка учетных записей, которые в данный момент являются членами роли, а затем щелкните на кнопке Remove (Удалить).

5. Щелкните на кнопке OK, чтобы закрыть диалоговое окно Server Role Properties.

СОВЕТ

Для включения или удаления учетной записи из серверной роли можно использовать вкладку Server Roles (Серверные роли) диалогового окна SQL Server Login Properties, которое рассматривалось выше в главе. 

РИС. 3.25. Диалоговое окно Server Role Properties с примером использования учетной записи для роли Process Administrators (Администраторы процессов)

Дня создания учетной записи с ролью базы данных в программе SQL Server Enterprise Manager выполните ряд действий.

1. В окне Microsoft SQL Servers программы SQL Server Enterprise Manager откройте папку Roles (Роли) для той базы данных, в которой необходимо создать новую роль. После этого на экране будут показаны все имеющиеся роли базы данных.

2. Щелкните правой кнопкой мыши на нужной роли и выберите команду Properties в контекстном меню или щелкните дважды на изменяемой роли. При этом на экране появится диалоговое окно Database Role Properties (Свойства роли базы данных), показанное на рис. 3.26.

3. Для добавления новой роли к базе данных щелкните на кнопке Add и выберите одного или нескольких пользователей из списка всех пользователей этой базы данных.

4. Для удаления пользователя из роли выберите одного или нескольких пользователей из списка всех пользователей роли и щелкните на кнопке Remove.

5. Щелкните на кнопке OK, чтобы закрыть диалоговое окно Database Role Properties. 

РИС. 3.26. Диалоговое окно Database Role Properties с примером добавления роли db_accessadmin

СОВЕТ

В SQL Server 2000, помимо предварительно заданных ролей базы данных, предусмотрено использование определенных пользователем ролей базы данных. Эти роли позволяют настроить способ доступа к данным и выполняемым операциям с базой данных (на этом этапе станет активной кнопка Permissions). Более информацию о ролях базы данных можно найти в справочных руководствах SQL Server Books Online.

 

Тестирование системы безопасности с помощью программы SQL Query Analyzer

Здесь у читателя может возникнуть вопрос: а что произойдет, если "обычный" пользователь попытается получить доступ к объектам базы данных, не имея разрешения. Поскольку программа SQL Query Analyzer разрешает регистрироваться под любым именем, то ответ на этот вопрос можно получить, выполнив приведенные ниже действия с помощью диалогового окна Query.

1. Убедитесь в том, что для проверяемой учетной записи снят флажок роли db_owner для базы данных Novelty, который показан на рис. 3.23.

2. Отключитесь от используемого сервера, выбрав команду File→Disconnect (Файл→Отключиться) или команду File→Disconnect All (Файл→Отключиться от всех) в меню программы SQL Query Analyzer.

3. Теперь выберите команду File→Connect (Файл→Подключиться). В появившемся диалоговом окне Connect to SQL Server введите имя пользователя и пароль, созданные в предыдущем разделе для подключения к базе данных Novelty.

4. Теперь попробуйте выполнить запрос к таблице, доступ к которой этому пользователю запрещен. Например, выполните запрос

SELECT *

FROM tblCustomer

SQL Server вернет следующую строку:

Server: Msg 229, Level 14, State 5, Line 1

SELECT permission denied on object database 'Novelty', owner 'dbo'.

НА ЗАМЕТКУ

В этом примере (особенно в п. 5) предполагается, что используется база данных Novelty, а не какая-то другая.

5. Попытаемся теперь выполнить следующую хранимую процедуру:

LastNameLookup' smith'

В ответ SQL Server извлечет из таблицы tblCustomer все имена, созвучные имени Smith.

 

Применение ограничений безопасности в программе SQL Query Analyzer

Параметры системы безопасности можно контролировать с помощью программы SQL Query Analyzer. Обычно для этого используется тот же пакет команд SQL, что и для создания базы данных. Такой порядок позволяет разработчику учесть и применить все необходимые ограничения безопасности для вновь созданных объектов базы данных.

Для создания новой учетной записи со средствами аутентификации SQL Server с помощью программы SQL Query Analyzer следует использовать хранимую процедуру sp_addlogin. Например, чтобы создать учетную запись Frances, выполните такую команду:

sp_addlogin 'Frances'

А чтобы создать пароль stairmaster для учетной записи Frances, выполните команду

sp_addlogin 'Frances', 'stairmaster'

Если вместо создания учетной записи SQL Server требуется добавить уже существующую учетную запись Windows, то для этого нужно аналогичным образом использовать хранимую процедуру sp_grantlogin. Учтите, однако, что в таком случае нельзя указать пароль, так как в SQL Server пароли не являются отдельной частью определения учетной записи Windows (потому что они поддерживаются системой безопасности Windows).

Чтобы пользователь с учетной записью Frances мог работать с базой данных Novelty, используйте хранимую процедуру sp_adduser.

USE Novelty

GO

sp_adduser 'Frances', 'Frannie'

GO 

Для отображения списка всех учетных записей и баз данных, связанных с ними по умолчанию, в используемой вами версии SQL Server с помощью программы SQL Query Analyzer выполните приведенную ниже команду.

USE Novelty

GO

SELECT name, dbname

FROM syslogins

Для включения нового пользователя в состав группы пользователей с ролью базы данных db_datawriter выполните хранимую процедуру sp_addrolemember.

USE Novelty

GO

sp_addrolemember 'db_datawriter', 'Frannie'

Для отображения списка всех ролей базы данных выполните хранимую процедуру sp_helprole.

Чтобы выдать и отменить разрешения для любого объекта базы данных, используйте команды SQL GRANT и REVOKE соответственно. Команда GRANT разрешает пользователю выполнять указанную роль, а команда REVOKE отменяет разрешение. Например, для выдачи членам роли public разрешения на полный доступ к таблице Customer воспользуйтесь следующей командой SQL:

GRANT ALL

ON tblCustomer

TO public

А для выдачи членам роли public разрешения только на выборку данных из таблицы tblCustomer воспользуйтесь командой SQL

GRANT SELECT

ON tblCustomer

TO public

Для отмены разрешения на полный доступ к таблице tblCustomer со стороны членов роли public используйте команду SQL REVOKE.

REVOKE ALL

ON tblCustomer

TO public

Аналогично можно указывать разрешения на обновление, выборку, удаление и вставку данных в таблицы и представления. Более того, разрешения можно выдавать и отменять специально для выполнения хранимых процедур.

 

Определение подключенных пользователей

 

Для того чтобы определить пользователей, подключенных к базе данных, можно использовать хранимую процедуру sp_who. При выполнении эта процедура возвращает список пользователей, которые в настоящий момент подключены к базе данных (рис. 3.27).

РИС. 3.27. Результат выполнения хранимой процедуры sp_who

С помощью списка подключенных пользователей можно выполнять разные действия, например прекращать пользовательские сеансы работы с сервером, как описывается в следующем разделе.

 

Завершение процесса с помощью команды KILL

В SQL Server администратор может удалить процесс, например пользовательское подключение или блокировку базы данных, с помощью команды KILL. Обычно эта команда применяется для чрезвычайного прекращения пользовательского сеанса, устранения зависшего сеанса или удаления установленной пользователем блокировки данных и продолжения работы с ними. (Эти ситуации хотя и крайне редко, но все же встречаются, особенно в процессе создания приложения.)

Перед использованием этой команды необходимо узнать идентификатор процесса, выполнив хранимую процедуру sp_who (если предполагается удалить пользовательский сеанс) или хранимую процедуру sp_lock (если предполагается удалить блокировку базы данных). В обоих случаях в поле spid возвращаются идентификаторы всех процессов. Зная идентификатор нужного процесса, его можно удалить.

Допустим, что после выполнения хранимой процедуры sp_who вы узнали номер процесса, например 10, который необходимо удалить. Для его удаления введите в окне Query программы SQL Query Analyzer команду

KILL 10

После выполнения этой команды указанный процесс будет немедленно удален.

НА ЗАМЕТКУ

Рекомендуется периодически выполнять процедуру sp_who, особенно в процессе создания приложения, только для того, чтобы знать, что происходит с вашей базой данных.

 

Удаление объектов базы данных

В SQL Server для удаления объектов используется команда DROP. Удаленный с ее помощью объект исчезает безвозвратно, причем удаляется не только структура объекта, но и его содержимое.

Для удаления объекта с помощью программы Enterprise Manager, например таблицы, выделите ее, щелкните правой кнопкой мыши и из контекстного меню выберите команду Delete.

А для удаления объекта из базы данных с помощью программы SQL Query Analyzer используйте команду DROP. Например, для удаления таблицы tblCustomer введите следующую команду:

DROP TABLE tblCustomer

 

Бизнес-ситуация 3.2: SQL-сценарий для создания базы данных

Для запуска примеров кода требуется запустить сценарий NoveltyDB.sql, который предназначен для создания и запуска базы данных Novelty. (Наверное, вы уже заглядывали в него и интересовались тем, что он делает.)

Поскольку структура базы данных может изменяться в процессе создания приложения, разработчику нужно периодически создавать сценарий для документирования текущей структуры базы данных, а также для автоматического создания (или воссоздания) базы данных. Хотя разработчик может обладать полным контролем и вручную создавать такие сценарии, но гораздо лучше применять для этого программу SQL Server Enterprise Manager. По крайней мере она прекрасно подходит для создания основы сценария и его последующего редактирования. Этот подход позволяет гораздо быстрее добиться решения поставленной задачи с меньшей вероятностью возникновения ошибок.

Разработчик базы данных для компании Jones Novelties Incorporated решил применить этот подход для создания корпоративной базы данных. Созданный им сценарий позволяет просто инсталлировать объекты базы данных на компьютере, на котором она даже не определена. Иначе говоря, сценарий выполняет все необходимые действия для создания и инсталляции базы данных и ее объектов на совершенно "пустом" компьютере, что обычно требуется при инсталляции системы на новом рабочем месте. На рис. 3.28 показана схема базы данных Novelty в диалоговом окне программы SQL Server Enterprise Manager.

РИС. 3.28. Структура базы данных Novelty компании Jones Novelties Incorporated в диалоговом окне программы SQL Server Enterprise Manager

Сценарий создания базы данных выполняется в программе SQL Query Analyzer. Чтобы сократить до минимума ошибки, этот сценарий удаляет все прежние объекты базы данных. Это значит, что при любом изменении структуры базы данных в режиме конструктора целостность базы данных может быть восстановлена с самого начала просто за счет повторного выполнения сценария. Этот подход гарантирует, что все изменения структуры базы данных учитываются каждый раз при ее повторном создании.

Недостатком этого подхода является то, что если разработчик будет недостаточно аккуратен, то сценарий удалит все таблицы в базе данных вместе с содержащимися в них данными. Поэтому все такие сценарии нужно удалить после переноса создаваемой системы на рабочее место. При этом, как обычно, большое значение имеет резервное копирование базы данных еще до внесения в нее каких-либо существенных изменений для восстановления в случае непредвиденных сбоев.

Для генерации сценариев создания базы данных для компании Jones Novelties Incorporated выполните перечисленные ниже действия.

1. Откройте программу SQL Server Enterprise Manager и щелкните правой кнопкой мыши на базе данных Novelty.

2. Выберите команду All Tasks→Generate SQL Script (Все задачи→Генерировать сценарий SQL) из контекстного меню для открытия диалогового окна Generate SQL Scripts.

3. Щелкните на кнопке Show All для отображения всех доступных объектов выбранной базы данных.

4. Теперь у вас есть возможность выбора одного или нескольких объектов сценария. Установите флажок Script all objects (Включить в сценарий все объекты), чтобы выбрать все объекты базы данных, как показано на рис. 3.29.

РИС. 3.29. Выбор всех объектов базы данных Novelty для включения в сценарий в диалоговом окне Generate SQL Scripts

5. Выберите вкладку Formatting (Форматирование). Помимо установленных по умолчанию флажков параметров установите флажок Include descriptive headers in the Script files (Включить описательные заголовки в файлы сценариев).

СОВЕТ

Не забудьте установить во вкладке Formatting флажок Include descriptive headers in the script files, потому что он приводит к автоматическому созданию строки заголовка с указанием времени и даты генерации сценария. Это очень полезное усовершенствование позволит вам впоследствии легко определить самую последнюю (или наиболее правильную) версию сценария.

6. Если вам нужен сценарий только для создания объектов базы данных, то на этом можно остановиться. Однако для генерации сценария создания физической базы данных нужно продолжить работу, выбрав вкладку Options (Параметры).

7. В группе параметров Security Scripting Options (Параметры сценария безопасности) установите флажок Script (Включить в сценарий базу данных). Кроме него, можно также установить флажки других параметров для пользователей базы данных, ролей и учетных записей, но здесь мы этого делать не будем, считая это отдельной задачей администрирования базы данных.

8. В группе параметров Table Scripting Options (Параметры сценария таблицы) установите флажки Script indexes (Включить в сценарий индексы), Script triggers (Включить в сценарий триггеры) и Script PRIMARY keys, FOREIGN keys, defaults, and check constraints (Включить в сценарий первичные ключи, внешние ключи, принимаемые по умолчанию значения и ограничения целостности), как показано на рис. 3.30.

РИС. 3.30. Вкладка Options диалогового окна Generate SQL Scripts

9. Щелкните на кнопке OK для запуска процесса генерации сценария. При этом на экране появится стандартное диалоговое окно Save As (Сохранить как), в котором следует ввести имя файла (с расширением .sql) и указать путь к нему. Сделайте это и щелкните на кнопке Save. После успешного создания сценария на экране появится диалоговое окно с сообщением об этом. Щелкните на кнопке OK для его удаления.

НА ЗАМЕТКУ

Созданный вами сценарий может отличаться от приведенного ниже из-за использования другого компьютера, сервера или параметров базы данных. Однако сейчас об этом не следует беспокоиться. 

Приведенный далее сценарий содержит множество строк с командой GO, которая предназначена для принудительного выполнения предыдущих команд еще до перехода к следующим командам сценария. Например, довольно часто можно встретить такие блоки команд:

SET QUOTED_IDENTIFIER OFF

GO

SET ANSI_NULLS ON

GO

или

SET QUOTED IDENTIFIER ON

GO

SET ANSI_NULLS ON

GO

Они гарантируют корректную (временную) конфигурацию базы данных для выполнения нужной операции и переустановку параметров для выполнения следующих операций.

Далее созданный сценарий предлагается в виде отдельных фрагментов, но на практике его рекомендуется создавать и применять в виде целого файла. В таком случае после создания рабочего сценария можно вставить его текст в окно Query программы SQL Query Analyzer (либо загружая его из тестового файла, либо копируя и вставляя с помощью буфера обмена) и щелкнуть на кнопке Execute для запуска. Можно также использовать отдельные фрагменты сценария или создать на основе единого сценария несколько отдельных сценариев и выполнять каждый из них. При создании сценариев SQL с помощью программы SQL Query Analyzer отдельные команды SQL можно редактировать в диалоговом окне Query, тестировать и проверять результаты их выполнения, а затем сохранять их в файле после завершения этих операций.

Сначала нужно создать физическую базу данных, с помощью сценария, который представлен в листинге 3.1.

Листинг 3.1. Сценарий создания физической базы данных Novelty

/****** Object: Database Novelty Script Date: 10-Jul-02 12:41:09 PM ******/

IF EXISTS (SELECT name FROM master.dbo.sysdatabases WHERE name = N'Novelty')

 DROP DATABASE [Novelty]

GO

CREATE DATABASE [Novelty] ON (NAME = N'novelty_Data',

 FILENAME = N'c:\program files\microsoft sql server\mssql\data\Novelty_Data.mdf',

 SIZE = 3, FILEGROWTH = 10%) LOG ON (NAME = N'novelty_Log',

 FILENAME = N'c:\program files\microsoft sql server\mssql\data\Novelty_Log.LDF', SIZE = 3, FILEGROWTH = 10%)

 COLLATE Latin1_General_CI_AI

GO

Перед попыткой создания любого нового объекта сценарий всегда проверяет его существование, а затем удаляет его. Поэтому в данном сценарии после проверки и удаления существующей базы данных Novelty создается новая база данных.

Код в листинге 3.2 задает параметры базы данных, описание которых приводится в официальной справочной документации SQL Server Books Online.

Листинг 3.2. Сценарий указания параметров базы данных Novelty

exec sp_dboption N'Novelty', N'autoclose', N'false'

GO

exec sp_dboption N'Novelty', N'bulkcopy', N'false'

GO

exec sp_dboption N'Novelty', N'trunc.log', N'false'

GO

exec sp_dboption N'Novelty', N'torn page detection', N'true'

GO

exec sp_dboption N'Novelty', N'read only', N'false'

GO

exec sp_dboption N'Novelty', N'dbo use', N'false'

GO

exec sp_dboption N'Novelty', N'single', N'false'

GO

exec sp_dboption N'Novelty', N'autoshrink', N'false'

GO

exec sp_dboption N'Novelty', N'ANSI null default', N'false'

GO

exec sp_dboption N'Novelty', N'recursive triggers', N'false'

GO

exec sp_dboption N'Novelty', N'ANSI nulls', N'false'

GO

exec sp_dboption N'Novelty', N'concat null yields null', N'false'

GO

exec sp_dboption N'Novelty', N'cursor close on commit', N'false

GO

exec sp_dboption N'Novelty', N'default to local cursor', N'false'

GO

exec sp_dboption N'Novelty', N'quoted identifier', N'false'

GO

exec sp_dboption N'Novelty', N'ANSI warnings', N'false'

GO

exec sp_dboption N'Novelty', N'auto create statistics', N'true'

GO

exec sp_dboption N'Novelty', N'auto update statistics', N'true'

GO

Теперь после создания базы данных можно приступить к работе с ней, т.е. начать выполнять команды по отношению к ней. Для выполнения команд SQL с другой базой данных NoveltyTest (например, для ее тестирования на том же сервере) нужно просто указать другую базу данных с помощью команды USE.

USE [NoveltyTest]

GO

Далее в сценариях создания объектов базы данных также проверяется их наличие и удаление (если они имеются). Это относится к ограничениям, триггерам, хранимым процедурам, представлениям и таблицам. Этот порядок имеет большое значение, потому что таблицу нельзя удалить, если существует какой-то из связанных с ней объектов. Код выполнения этих операций приведен в листинге 3.3.

Листинг 3.3. Сценарий удаления существующих объектов в базе данных Novelty

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[FK_tblOrder_tblCustomer]')

and OBJECTPROPERTY(id, N'IsForeignKey') = 1)

ALTER TABLE [dbo].[tblOrder] DROP CONSTRAINT FK_tblOrder_tblCustomer

GO

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[FK_tblEmployee_tblDepartment]')

and OBJECTPROPERTY(id, N'IsForeignKey') = 1)

ALTER TABLE [dbo].[tblEmployee] DROP CONSTRAINT FK_tblEmployee_tblDepartment

GO

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[FK_tblOrderItem_tblInventory]')

and OBJECTPROPERTY(id,N'IsForeignKey') = 1)

ALTER TABLE [dbo].[tblOrderltem] DROP CONSTRAINT FK_tblOrderItem_tblInventory

GO

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[FK_tblOrderItem_tblOrder]')

and OBJECTPROPERTY(id, N'IsForeignKey') = 1)

ALTER TABLE [dbo].[tblOrderltem] DROP CONSTRAINT FK_tblOrderItem_tblOrder

GO

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[FK_tblCustomer_tblRegion] ')

and OBJECTPROPERTY(id, N'IsForeignKey') = 1

ALTER TABLE [dbo].[tblCustomer]

DROP CONSTRAINT FK_tblCustomer_tblRegion

GO

/****** object: Trigger dbo.trCustomerI Script Date: 10-Jul-02 12:41:09 PM ******/

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[trCustomerI]')

and OBJECTPROPERTY(id,N'IsTrigger') =1)

drop trigger [dbo].[trCustomerI]

GO

/****** Object: Stored Procedure dbo.DeleteEmployee Script Date: 10-Jul-02 12:41:09 PM ******/

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[DeleteEmployee]')

and OBJECTPPOPERTY(id, N'IsProcedure') = 1)

drop procedure [dbo].[DeleteEmployee]

GO

/****** object: Stored Procedure Script Date: 10-Jul-02 12:41:09 PM ******/

if exists (select * from dbo.sysobjects dbo.sysobjects where id = object_id(N'[dbo].[GetCustomerFromID]')

and OBJECTPROPERTY(id, N'IsProcedure') = 1)

drop procedure [dbo].[GetCustomerFromID]

GO

/****** Object: Stored Procedure dbo.insertEmployee Script Date: 10-Jul-02 12:41:09 PM ******/

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[InsertEmployee]')

and OBJECTPROPERTY(id, N'IsProcedure') = 1)

drop procedure [dbo].[InsertEmployee]

GO

/****** Object: Stored Procedure dbo.InsertEmployeeOrg Script Date: 10-Jul-02 12:41:09 PM ******/

if exists (select * from dbo.sysobjects where id = object_id (N'[dbo].[InsertEmployeeOrg]')

and OBJECTPROPERTY(id, N'IsProcedure') = 1)

drop procedure [dbo].[InsertEmployeeOrg]

GO

/****** Object: Stored Procedure dbo.LastNameLookup Script Date: 10-Jul-02 12:41:09 PM ******/

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[LastNameLookup]')

and OBJECTPROPERTY(id, N'IsProcedure') = 1)

drop procedure [dbo].[LastNameLookup]

GO

/****** object: Stored Procedure Script Date: 10-Jul-02 12:41:09 PM ******/

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[SelectEmployees]')

and OBJECTPROPERTY(id, N'IsProcedure') = 1)

drop procedure [dbo].[SelectEmployees]

GO

/****** object: Stored Procedure dbo Script Date: 10-Jul-02 12:41:09 PM ******/

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[UpdateEmployee]')

and OBJECTPROPERTY(id, N'IsProcedure') = 1)

drop procedure [dbo].[UpdateEmployee]

GO

/****** object: Stored Procedure dbo.procEmployeesSorted Script Date: 10-Jul-02 12:41:09 PM ******/

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[procEmployeesSorted]')

and OBJECTPROPERTY(id, N'IsProcedure') = 1)

drop procedure [dbo].[procEmployeesSorted]

GO

/****** object: View dbo.EmployeeDepartment_view Script Date: 10-Jul-02 12:41:09 PM ******/

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[EmployeeDepartment_view]')

and OBJECTPROPERTY(id, N'IsView') = 1)

drop view [dbo].[EmployeeDepartment_view]

GO

/****** Object: View dbo.qryEmployee_view Script Date: 10-Jul-02 12:41:09 PM ******/

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[qryEmployee_view]')

and OBJECTPROPERTY(id,N'IsView') = 1)

drop view [dbo].[qryEmployee_view]

GO

/****** Object: Table [dbo].[tblCustomer] Script Date:10-Jul-0212:41:09 PM ******/

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[tblCustomer]')

and OBJECTPROPERTY(id, N'IsUserTable') = 1)

drop table [dbo].[tblCustomer]

GO

/****** Object: Table [dbo].[tblDepartment] Script Date: 10-Jul-02 12:41:09 PM ******/

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[tblDepartment]')

and OBJECTPROPERTY(id, N'IsUserTable') = 1)

drop table [dbo].[tblDepartment]

GO

/****** Object: Table [dbo].[tblEmployee] Script Date: 10-Jul-02 12:41:09 PM ******/

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[tblEmployee]')

and OBJECTPROPERTY(id, N'IsUserTable') = 1)

drop table [dbo].[tblEmployee]

GO

/****** Object: Table [dbo].[tblInventory] Script Date: 10-Jul-02 12:41:09 PM ******/

if exists (select * from dbo.sysobjects where id = object_id(N' [dbo].[tblInventory]')

and OBJECTPROPERTY(id, N'IsUserTable') = 1)

drop table [dbo].[tblInventory]

GO

/****** Object: Table [dbo].[tblOrder] Script Date: 10-Jul-02 12:41:09 PM ******/

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[tblOrder]')

and OBJECTPROPERTY(id, N'IsUserTable') = 1)

drop table [dbo].[tblOrder]

GO

/****** object: Table [dbo].[tblOrderItem] Script Date: 10-Jul-02 12:41:09 PM ******/

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[tblOrderItem]')

and OBJECTPROPERTY(id, N'IsUserTable') = 1)

drop table [dbo].[tblOrderltem]

GO

/****** object: Table [dbo].[tblRegion] Script Date: 10-Jul-02 12:41:09 PM ******/

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[tblRegion]')

and OBJECTPROPERTY(id, N'IsUserTable') = 1)

drop table [dbo].[tblRegion]

GO

Теперь можно приступать к созданию новых объектов базы данных. Начнем с создания таблиц; сценарий этих операций приведен в листинге 3.4.

Листинг 3.4. Сценарий создания таблиц базы данных Novelty

/****** Object: Table [dbo].[tblCustomer] Script Date: 10-Jul-02 12:41:10 PM ******/

CREATE TABLE [dbo].[tblCustomer] (

 [ID] [int] IDENTITY (1, 1) NOT NULL,

 [FirstName] [varchar] (20) COLLATE Latin1_General_CI_AI NULL,

 [LastName] [varchar] (30) COLLATE Latinl_General_CI_AI NULL,

 [Company] [varchar] (50) COLLATE Latin1_General_CI_AI NULL,

 [Address] [varchar] (50) COLLATE Latin1_General_CI_AI NULL,

 [City] [varchar] (30) COLLATE Latin1_General_CI_AI_NULL,

 [State] [char] (2) COLLATE Latin1_General_CI_AI_NULL,

 [PostalCode] [varchar] (9) COLLATE Latin1_General_CI_AI NULL,

 [Phone] [varchar] (15) COLLATE Latinl_General_CI_AI NULL,

 [Fax] [varchar] (15) COLLATE Latinl_General_CI_AI NULL,

 [Email] [varchar] (100) COLLATE Latinl_General_CI_AI NULL,

 [LastNameSoundex] [varchar] (4) COLLATE Latinl_General_CI_AI NULL

) ON [PRIMARY]

GO

/****** object: Table [dbo].[tblDepartment] Script Date: 10-Jul-02 12:41:11 PM ******/

CREATE TABLE [dbo].[tblDepartment] (

 [ID] [int] IDENTITY (1, 1) NOT NULL,

 [DepartmentName] [varchar] (75) COLLATE Latin1_General_CI_AI NOT NULL

) ON [PRIMARY]

GO

/****** Object: Table [dbo].[tblEmployee] Script Date: 10-Jul-02 12:41:11 PM ******/

CREATE TABLE [dbo].[tblEmployee] (

 [ID] [int] IDENTITY (1, 1) NOT NULL,

 [FirstName] [varchar] (50) COLLATE Latin1_General_CI_AI NOT NULL,

 [LastName] [varchar] (70) COLLATE Latin1_General_CI_AI NOT NULL,

 [DepartmentID] [int] NULL,

 [Salary] [money] NULL

) ON [PRIMARY]

GO

/****** object: Table [dbo]. [tblInventory] Script Date: 10-Jul-02 12:41:11 PM ******/

CREATE TABLE [dbo].[tblInventory] (

 [ID] [int] IDENTITY (1, 1) NOT NULL,

 [ProductName] [varchar] (75) COLLATE Latin1_General_CI_AI NOT NULL

 [WholesalePrice] [money] NULL,

 [RetailPrice] [money] NULL,

 [Description] [ntext] COLLATE Latin1_General_CI_AI NULL

) ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]

GO

/****** object: Table [dbo].[tblOrder] Script Date: 10-Jul-02 12:41:12 PM ******/

CREATE TABLE [dbo].[tblOrder] (

 [ID] [int] IDENTITY (1, 1) NOT NULL,

 [CustomerlD] [int] NULL,

 [OrderDate] [datetime] NULL,

 [Amount] [money] NULL

) ON [PRIMARY]

GO

/****** object: Table [dbo].[tblOrderItem] Script Date: 10-Jul-02 12:41:12 PM ******/

CREATE TABLE] (

 [ID] [int] IDENTITY (1, 1) NOT NULL, [OrderID] [int] NOT NULL,

 [int] NOT NULL, [Quantity] [int] NULL,

 [Cost] [money] NULL

) ON [PRIMARY]

GO

/******* object: Table [dbo].[tblRegion] Script Date: 10-Jul -02 12:41:12 PM *******/

CREATE TABLE [dbo]. [tblRegion] (

 [ID] [int] IDENTITY (1, 1) NOT NULL,

 [State] [char] (2) COLLATE Latin1_General_CI_AI NOT NULL,

 [RegionName] [varchar] (25) COLLATE Latin1_General_CI_AI NULL

) ON [PRIMARY]

GO

Далее следует создать ограничения, как показано в листинге 3.5.

Листинг 3.5. Сценарий создания ограничений для базы данных Novelty

ALTER TABLE [dbo].[tblCustomer] WITH NOCHECK ADD

 CONSTRAINT [PK_tblCustomer] PRIMARY KEY CLUSTERED (

  [ID]

 ) ON [PRIMARY]

GO

ALTER TABLE [dbo].[tblDepartment ] WITH NOCHECK ADD

 CONSTRAINT [tblDepartment_IDPK] PRIMARY KEY CLUSTERED (

  [ID]

 ) ON [PRIMARY]

GO

ALTER TABLE [dbo]. [tblEmployee] WITH NOCHECK ADD

 CONSTRAINT [PK_tblEmployee] PRIMARY KEY CLUSTERED (

  [ID]

 ) ON [PRIMARY]

GO

ALTER TABLE [dbo].[tblInventory] WITH NOCHECK ADD

 CONSTRAINT [PK_tblInventory] PRIMARY KEY CLUSTERED (

  [ID]

 ) ON [PRIMARY]

GO

ALTER TABLE [dbo].[tblOrder] WITH NOCHECK ADD

 CONSTRAINT [PK_tblOrder] PRIMARY KEY CLUSTERED (

  [ID]

 ) ON [PRIMARY]

GO

ALTER TABLE [dbo].[tblOrderltem] WITH NOCHECK ADD

 CONSTRAINT [PK_tblOrderItem] PRIMARY KEY CLUSTERED (

  [ID]

 ) ON [PRIMARY]

GO

ALTER TABLE [dbo]. [tblRegion] WITH NOCHECK ADD

 CONSTRAINT [PK_tblRegion] PRIMARY KEY CLUSTERED (

  [ID]

) ON [PRIMARY]

GO

CREATE UNIQUE INDEX [IX_tblRegion] ON [dbo]. [tblRegion] ([State]) ON [PRIMARY]

GO

ALTER TABLE [dbo].[tblCustomer] ADD

 CONSTRAINT [FK_tblCustomer_tblRegion] FOREIGN KEY ([State])

 references [dbo].[tblRegion] (

  [State]

 ) ON DELETE CASCADE ON UPDATE CASCADE

GO

ALTER TABLE [dbo].[tblEmployee] ADD

 CONSTRAINT [FK_tblEmployee_tblDepartment] FOREIGN KEY ([DepartmentID])

 REFERENCES [dbo].[tblDepartment] (

  [ID]

 ) ON DELETE CASCADE ON UPDATE CASCADE

GO

ALTER TABLE [dbo]. [tblOrder] ADD

 CONSTRAINT [FK_tblOrder_tblCustomer] FOREIGN KEY ( [CustomerID])

 REFERENCES [dbo].[tblCustomer] ([ID]) ON DELETE CASCADE ON UPDATE CASCADE

GO

ALTER TABLE [dbo].[tblOrderItem] ADD

 CONSTRAINT [FK_tblOrderItem_tblInventory] FOREIGN KEY ([ItemID])

 REFERENCES [dbo].[tblInventory] ([ID])

 ON DELETE CASCADE ON UPDATE CASCADE,

 constraint [FK_tblOrderItem_tblOrder] foreign key ([OrderID])

 REFERENCES [dbo].[tblOrder] ([ID])

 ON DELETE CASCADE ON UPDATE CASCADE

GO

SET QUOTED_IDENTIFIER OFF

GO

SET ANSI_NULLS ON

GO

Наконец, для создания представлений, хранимых процедур и триггеров следует выполнить сценарий из листинга 3.6.

Листинг 3.6. Сценарий создания представлений, хранимых процедур и триггеров

/****** object: View dbo.EmployeeDepartment_view Script Date: 10-Jul-02 12:41:13 PM ******/

CREATE view EmployeeDepartment_view as

 select e.ID, FirstName, LastName, DepartmentName

 from tblEmployee e, tblDepartment t

 where e.DepartmentID = t.ID

GO

SET QUOTED_IDENTIFIER OFF

GO

SET ANSI_NULLS ON

GO

SET QUOTED_IDENTIFIER ON

GO

SET ANSI_NULLS ON

GO

/****** Object: View dbo.qryEmployee_view Script Date: 10-Jul-02 12:41:13 PM ******/

create view qryEmployee_view as

 SELECT ID, FirstName, LastName, DepartmentID from tblEmployee

GO

SET QUOTED_IDENTIFIER OFF

GO

SET ANSI_NULLS ON

GO

SET QUOTED_IDENTIFIER ON

GO

SET ANSI_NULLS ON

GO

/****** Object: Stored Procedure dbo.DeleteEmployee Script Date: 10-Jul-02 12:41:13 PM ******/

CREATE PROCEDURE dbo.DeleteEmployee (@Original_ID int)

AS

 SET NOCOUNT OFF;

 DELETE FROM tblEmployee WHERE (ID = @Original_ID)

GO

SET QUOTED_IDENTIFIER OFF

GO

SET ANSI_NULLS ON

GO

SET QUOTED_IDENTIFIER ON

GO

SET ANSI_NULLS ON

GO

/****** Object: Stored Procedure dbo.GetCustomerFromID Script Date: 10-Jul-02 12:41:13 PM ******/

create procedure GetCustomerFromID @custID int

as

 select * from tblCustomer where ID = @custID

GO

SET QUOTED_IDENTIFIER OFF

GO

SET ANSI_NULLS ON

GO

SET QUOTED_IDENTIFIER OFF

GO

SET ANSI_NULLS OFF

GO

/****** Object: Stored Procedure Script Date: 10-Jul-02 12:41:13 PM ******/

CREATE PROCEDURE dbo.InsertEmployee (

 @FirstName varchar(50),

 @LastName varchar(70),

 @DepartmentID int,

 @Salary money)

AS

 SET NOCOUNT OFF;

 if (@Salary = 0 or @Salary is null) begin

  -– Do complicated salary calculations

  set @Salary = @DepartmentID * 10000

 end

 INSERT INTO tblEmployee(FirstName, LastName, Salary) VALUES

  (@FirstName, @LastName, @DepartmentID, @Salary)

GO

SET QUOTED_IDENTIFIER OFF

GO

SET ANSI_NULLS ON

GO

SET QUOTED_IDENTIFIER ON

GO

SET ANSI_NULLS ON

GO

/****** Object: Stored Procedure dbo.InsertEmployeeOrg Script Date: 10-Jul-02 12:41:13 PM ******/

CREATE PROCEDURE dbo.InsertEmployeeOrg (

 @FirstName varchar(50),

 @LastName varchar(70),

 @DepartmentID int,

 @Salary money

)

AS

 SET NOCOUNT OFF;

 INSERT INTO tblEmployee(FirstName, LastName, DepartmentID, Salary) VALUES

  (@FirstName, @LastName, @DepartmentID, @Salary)

GO

SET QUOTED_IDENTIFIER OFF

GO

SET ANSI_NULLS ON

GO

SET QUOTED_IDENTIFIER ON

GO

SET ANSI_NULLS ON

GO

/****** Object: Stored Procedure dbo.LastNameLookup Script Date: 10-Jul-02 12:41:13 PM ******/

create proc LastNameLookup

 @name varchar(40) as

 select * from tblCustomer where soundex(gname) = LastNameSoundex

GO

SET QUOTED_IDENTIFIER OFF

GO

SET ANSI_NULLS ON

GO

SET QUOTED_IDENTIFIER ON

GO

SET ANSI_NULLS ON

GO

/****** Object: Stored Procedure dbo.SelectEmployees Script Date: 10-Jul-02 12:41:13 PM ******/

create procedure dbo.SelectEmployees

AS

 SET NOCOUNT ON;

 SELECT FirstName, LastName, Department ID, Salary, ID FROM tblEmployee

GO

SET QUOTED_IDENTIFIER OFF

GO

SET ANSI_NULLS ON

GO

SET QUOTED_IDENTIFIER ON

GO

SET ANSI_NULLS ON

GO

/****** Object: Stored Procedure dbo.UpdateEmployee Script Date: 10-Jul-02 12:41:13 PM ******/

CREATE PROCEDURE dbo.UpdateEmployee (

 @FirstName varchar(50),

 @LastName varchar(70),

 @DepartmentID int,

 @Salary money,

 @Original_ID int)

AS

 SET NOCOUNT OFF;

 UPDATE tblEmployee SET FirstName = @FirstName, LastName = @LastName, DepartmentID = @DepartmentID, Salary = @Salary WHERE (ID = @Original_ID)

GO

SET QUOTED_IDENTIFIER OFF

GO

SET ANSI_NULLS ON

GO

SET QUOTED_IDENTIFIER OFF

GO

SET ANSI_NULLS OFF

GO

/****** Object: Stored Procedure dbo.procEmployeesSorted Script Date: 10-Jul-02 12:41:13 PM ******/

CREATE PROCEDURE procEmployeesSorted

AS

 select * from tblEmployee

 order by LastName, FirstName return

GO

SET QUOTED_IDENTIFIER OFF

GO

SET ANSI_NULLS ON

GO

SET QUOTED_IDENTIFIER ON

GO

SET ANSI_NULLS ON

GO

/****** Object: Trigger dbo.trCustomerT Script Date: 10-Jul-02 12:41:14 PM ******/

create trigger trCustomerT

on dbo.tblCustomer

for insert, update

as

 update tblCustomer

 set tblCustomer.LastNameSoundex = soundex(tblCustomer.LastName)

 from inserted

 where tblCustomer.ID = inserted.ID

GO

SET QUOTED_IDENTIFIER OFF

GO

SET ANSI_NULLS ON

GO

Хотя сценарий, созданный автоматически с помощью программы SQL Server Enterprise Manager, достаточно хорош для запуска его даже в том состоянии, в котором он находится, его можно отредактировать нужным вам образом. Учтите, что при повторной генерации сценария внесенные вручную изменения будут утрачены.

Полезной модификацией сценария может стать включение команды PRINT в стратегически важных местах сценария, например для отображения некоторых фрагментов текста в диалоговом окне Messages программы SQL Query Analyzer. Это позволит отслеживать прогресс выполнения сценария, а также использовать выводимые сообщения для отладки сценария: поиска и устранения замеченных ошибок. Использование команды PRINT совсем не обязательно и не имеет прямой связи с процессом создания базы данных.

Помните, что при использовании подобных пакетов команд SQL их можно запускать повторно нужное количество раз. Дело в том, что он создан так, чтобы полностью удалить и воссоздать повторно базу данных. При загрузке тестовых данных для проверки работоспособности базы данных не следует беспокоиться о повреждении или утрате данных при выполнении такого сценария. Кроме того, создавая базу данных с помощью пакета команд SQL, можно легко переносить структуру базы данных на другие cерверы. Это позволяет создавать две совершенно разные физические базы данных: одну для создания приложения, а другую для работы.

 

Резюме

В этой главе представлены основные сведения об использовании СУБД SQL Server компании Microsoft для создания распределенных вычислительных систем. И хотя здесь рассматривается SQL Server 2000 компании Microsoft, все описанные основные действия по управлению базами данных, но уже с особенностями реализации, применимы и к СУБД других компаний – Oracle, Sybase, Informix и пр. Не забывайте, что при наличии драйвера ODBC или провайдера OLE DB, которые позволяют при разработке приложений абстрагироваться от конкретной реализации СУБД, с этими базами данных можно работать с помощью Visual Basic .NET.

 

Вопросы и ответы

Меня всегда пугала сложность работы с SQL Server, потому что эта СУБД казалась мне "черным ящиком". Мне знакомы случаи, когда люди чуть ли не сходили с ума от работы по созданию серверной части приложения. Неужели материала этой главы будет достаточно?

Можно сказать, и да и нет. В этой главе рассматриваются только основы использования SQL Server и совсем не охвачены вопросы ежедневного администрирования базы данных, настройки производительности и т.д. Эту главу следует рассматривать как введение в SQL Server, а не подробное руководство по его использованию. В первой части главы приведены необходимые сведения, которые могли бы облегчить работу с SQL Server и развеять опасения, что для этого нужны какие-то сверхусилия. Конечно, работа с SQL Server включает более сложные операции, например миграцию приложений от однопользовательских систем к распределенным, но для этого вовсе не нужно обладать искусством "черной" магии. (А чтобы не потерять рассудок, нужно не перетруждаться и почаще консультироваться с врачами.)

Если большинство моих запросов очень просты и не содержат сложных логических выражений, нужно ли мне использовать хранимые процедуры?

Да. По сути, есть два основных преимущества использования хранимых процедур вместо кодирования запросов SQL в коде приложения.

1. Производительность. Для многих программистов производительность является единственной причиной, по которой они стремятся использовать хранимые процедуры. Более высокая производительность хранимой процедуры по сравнению с кодом приложения связана с тем, что хранимая процедура откомпилирована и спланирована в SQL Server еще до вызова на выполнение. При передаче серверу на выполнение обычной команды SQL от клиентского приложения она должна быть обработана синтаксическим анализатором, откомпилирована, а также должен быть создан план ее выполнения. Поэтому выполнение всех этих действий непосредственно во время работы системы связано с большими накладными расходами и снижением производительности.

2. Управляемость. Реализация запросов в виде хранимых процедур означает, что все запросы приложения хранятся в одном централизованном месте, а не разбросаны среди сотен тысяч строк кода. Более того, такая организация запросов позволяет использовать их повторно и одновременно для одной базы данных во многих проектах и приложениях. Это приводит к меньшему объему работы (кодирование/отладка/тестирование) и меньшей вероятности возникновения ошибок. Это также позволяет использовать систему безопасности SQL Server. Наконец, применение хранимых процедур позволяет использовать стратегию "разделяй и властвуй", т.е. специализацию при создании кода приложения. Разработчики программного обеспечения, которые специализируются на создании бизнес-логики и управлении потоком выполнения приложения, могут сфокусировать внимание на создании кода приложения, а организацией доступа к базе данных и созданием запросов могут заняться разработчики баз данных и серверной части системы.

 

ГЛАВА 4

Модель ADO.NET: провайдеры данных

 

Порой кажется, что не успели еще разработчики приложений баз данных привыкнуть к новой технологии, как компания Microsoft предложила совершенно новую модель доступа к базам данных. В этой главе основное внимание уделяется модели ADO.NET, которая является наиболее новым воплощением модели ADO. Сначала обосновывается необходимость введения новой модели доступа к базам данных (с точки зрения авторов), а затем предлагается описание самой модели и ее архитектуры.

В этой главе преследуется цель изложить основные принципы функционирования технологии ADO.NET. Здесь обсуждаются базовые операции и описываются базовые объекты провайдера данных ADO.NET, в частности Connection, Command, Parameter и DataReader. Далее (в главах 5, "ADO.NET: объект DataSet", 6, "ADO.NET: объект DataAdapter", и 7, "ADO.NET: дополнительные компоненты") рассматриваются более сложные объекты, которые тесно связаны с основным объектом ADO.NET — DataSet.

 

Обзор технологии ADO.NET

 

Разработчики приложений для работы с базами данных на основе Visual Basic уже привыкли к тому, что Microsoft каждые несколько лет предлагает новую усовершенствованную модель доступа к данным. Кроме новой трехбуквенной аббревиатуры, технология ADO.NET также предлагает новую модель API-интерфейсов и объектов. В течение последних нескольких лет разработчики уже успели познакомиться с предшественниками ADO.NET — технологиями ODBC, DAO, RDO и ADO. При знакомстве с каждой новой технологией им требовалось тщательно изучить ее назначение и принципы работы. При этом они часто задавали себе один и тот же вопрос: имеет ли смысл переходить на новую технологию? В большинстве случаев ответ был положительным, если только новшества не оказывали никакого влияния на текущие и будущие требования проекта. Действительно, чаще всего переход на новые технологии был вполне обоснован, за исключением технологии RDO (Remote Data Objects) для проектов с процессором баз данных Jet (потому что технология ОАО по-прежнему является более удачной технологией работы с Jet).

 

Мотивация и философия

 

Итак, зачем же все-таки нужна новая объектная модель доступа к данным? Наиболее простой ответ на этот вопрос можно сформулировать по аналогии с рекламным лозунгом компании Toyota конца 1970-х годов: "Спрашивали? Так получите". Технология ADO.NET предоставляет множество функциональных возможностей, о которых разработчики мечтали с момента появления технологии ADO. Некоторые компоненты, например отсоединенные от источника данных наборы записей и поддержка XML, были добавлены в модель ADO уже после ее выпуска. Но, поскольку они являлись добавлениями к основной модели, которые отсутствовали в исходной архитектуре ADO, способ их применения был крайне неудобным.

Классическая модель ADO основана на модели COM и одном объекте recordset, применение которого может быть весьма разнообразным. В зависимости от параметров конфигурации, например типа курсора, его расположения и типа блокировки, объект recordset будет действовать по-разному и выполнять различные операции.

В технологии ADO.NET разные функции разделены и выполняются разными объектами, которые могут использоваться либо отдельно, либо вместе с другими объектами.

Это дает разработчику возможность специализированного применения объектов без дополнительного обременительного "багажа". В то же время совершенно разные объекты могут взаимодействовать друг с другом для выполнения более сложных функций.

 

Поддержка распределенных приложений и отсоединенной модели программирования

В технологии ADO.NET предусмотрена эффективная и гибкая поддержка приложений, распределенных между несколькими компьютерами (серверами баз данных, серверами приложений и клиентскими рабочими станциями). В частности, особая поддержка предусмотрена для отсоединенных (трехуровневых или n-уровневых) приложений с минимизацией нагрузки при работе с параллельными операциями доступа к данным и блокировкой ресурсов сервера базы данных. В результате повышаются возможности масштабирования приложений, т.е. поддержки большего количества параллельно работающих пользователей за счет постепенного увеличения количества клиентских компьютеров. Это преимущество имеет особенно большое значение при создании Web-приложений.

 

Расширенная поддержка XML

Хотя классическая модель ADO способна сохранять и считывать данные в формате XML, фактически используемый для этого формат имеет несколько необычную форму и не так прост в применении. Кроме того, поддержка XML в модели ADO была добавлена в ходе ее эволюции, а потому обладает некоторыми ограничениями, в то время как поддержка XML в технологии ADO.NET является ее ключевым элементом. Философия ADO.NET формулируется очень кратко и просто: "Данные — это данные". Независимо от источника поступления, они могут считываться и обрабатываться как реляционные или иерархические данные, исходя из поставленной задачи и используемых инструментов.

XML используется как формат передачи данных между уровнями и компьютерами. Это не только исключает проблему прохождения COM-объектов через брандмауэры, но и позволяет совместно использовать данные сразу несколькими приложениями, которые работают на платформах, отличных от Windows (так как практически любая платформа способна обрабатывать текстовые данные XML).

 

Интеграция с .NET Framework

ADO.NET – это не просто следующая версия ADO, она специально предназначена для использования на платформе.NET Framework. Код всех объектов ADO.NET полностью управляемый, т.е. работает под управлением платформы.NET Framework. Технология ADO.NET является составной частью платформы.NET Framework, что позволяет избежать проблем с контролем версий объектов, которые хорошо известны разработчикам, имеющим опыт работы с ADO.

 

Внешний вид объектов ADO.NET

Хотя ADO.NET является составной частью платформы .NET Framework, многие ее компоненты будут знакомы опытным разработчикам, поскольку внешне они во многом напоминают объекты ADO. Даже совершенно новые элементы ADO.NET реализованы так, чтобы максимально упростить процесс их изучения и применения на основе имеющихся знаний.

 

ADO.NET И ADO 2.X

При работе с моделью ADO.NET нужно учитывать перечисленные ниже отличия от классической модели ADO.

• В классической модели ADO предусмотрен присоединенный к источнику данных способ доступа и использование физической модели данных.

• В модели ADO.NET проводиться четкое разделение между присоединенным способом доступа к данным и отсоединенной моделью программирования.

• В модели ADO.NET нет свойств CursorType, CursorLocation или LockType, потому что в ADO.NET предусмотрены только статические курсоры, клиентские курсоры и оптимистическая блокировка.

• Вместо использования простого многоцелевого объекта recordset в ADO.NET разные функции распределены среди объектов меньшего размера — DataReader, DataSet и DataTable.

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

В ADO.NET предусмотрена поддержка строго типизированных наборов данных DataSet, а не использование для всех полей типа Variant. Это позволяет эффективнее обнаруживать ошибки времени выполнения и повышает производительность работы приложений.

 

Место ADO.NET в архитектуре .NET Framework

На рис. 4.1 показано место классов ADO.NET в архитектуре.NET Framework. В основе этой платформы лежит общеязыковая исполняющая среда (Common Language Runtime — CLR), которая образует единую среду выполнения для всех .NET-совместимых приложений, независимо от используемого языка программирования. Среда CLR включает общую систему типов, управление памятью и жизненным циклом объектов.

На следующем логическом уровне над средой CLR располагаются базовые системные классы. Именно эти классы отвечают за выполнение базовых функций, которые могут использоваться в .NET-приложениях. На рис. 4.1 показаны только некоторые классы библиотеки классов .NET Framework, которая, по сути, является новым набором API-интерфейсов Windows. В прошлом доступ к функциям операционной системы Windows осуществлялся только через API-интерфейсы, которые состояли из большого набора разрозненных и плохо продуманных функций. На платформе.NET Framework такой доступ организован на основе свойств и методов, которые предлагаются базовыми системными классами. Это объектно-ориентированный, последовательный и комфортабельный способ создания приложений Windows, независимо от типа клиентского приложения: традиционного настольного приложения, броузера или Web-службы.

РИС. 4.1. Классы ADO.NET в структуре платформы .NET Framework

Этот уровень включает несколько пространств имен (групп классов и других определений), предназначенных для организации доступа к данным: System.Data, System.OleDb и System.Data.SqlClient. В оставшейся части данной главы, а также в главах 5, 6 и 7 эти классы и пространства имен рассматриваются более подробно.

 

Прикладные интерфейсы

На этом наиболее высоком уровне происходит дифференциация, или разделение, выполняемых функций, которые разработчики могут использовать в разных типах приложений. Он содержит классы и элементы управления для создания (классических) приложений Windows на основе форм (Windows Forms), другие классы и элементы управления для создания Web-ориентированных приложений (Web Forms), а также классы для создания приложений на основе Web-служб. Однако все они используют для прикладной логики базовую библиотеку классов — системные базовые классы.

Теперь после первого знакомства с расположением классов ADO.NET в общей структуре платформы.NET Framework рассмотрим подробнее основные объекты ADO.NET.

 

Провайдеры данных ADO.NET

 

Несмотря на подчеркнутое значение отсоединенной модели программирования, для извлечения, обновления, вставки и удаления данных все же придется подключиться к физической базе данных. Программное обеспечение ADO.NET для подсоединения и взаимодействия с физической базой данных называется провайдером данных ADO.NET. Провайдер данных (data provider) — это управляемый код .NET, который эквивалентен провайдеру OLEDB или драйверу ODBC. Провайдер данных состоит из нескольких объектов, которые реализуют необходимую функциональность в соответствии с определениями своих классов и интерфейсов.

В настоящее время существует три разных провайдера данных ADO.NET, каждый из которых определен в своем собственном пространстве имен. Для всех объектов в этих пространствах имен используются следующие префиксы: OleDb, Sql и Odbc. Однако при упоминании этих объектов в рамках своего пространства имен имя объекта можно указывать без употребления префикса данного пространства имен.

 

Провайдер данных SqICIient

Оптимизирован для работы с SQL Server версии 7.0 (или выше) и позволяет добиться более высокой производительности по следующим причинам:

• взаимодействует с базой данных непосредственно через собственный протокол табличной передачи данных (Tabular Data Stream — TDS), а не через OLEDB с отображением интерфейса OLEDB на протокол TDS;

• исключает накладные расходы, связанные с использованием COM-служб взаимодействия;

• отсутствуют ненужные функции, которые не поддерживаются в SQL Server (объекты этого провайдера данных находятся в пространстве имен System.Data.SqlClient).

 

Провайдер данных Oledb

Основан на существующем COM-поставщике OLEDB и COM-службах взаимодействия платформы .NET Framework, предназначенных для доступа к базе данных. Этот провайдер данных используется для работы с SQL Server более ранних версий, чем 7.0. Он позволяет осуществлять доступ к любой базе данных, для которой имеется поставщик OLEDB. Объекты этого провайдера данных находятся в пространстве имен System.Data.Oledb.

 

Провайдер данных Odbc

Используется для доступа к базам данных, которые не имеют собственного провайдера данных .NET или COM-поставщика OLEDB. Иногда драйвер ODBC демонстрирует более высокую производительность, чем драйвер OLEDB, поэтому для сравнения их фактической производительности при работе с конкретной базой данных рекомендуется провести ряд тестов. Объекты этого провайдера данных находятся в пространстве имен System. Data.Odbc.

НА ЗАМЕТКУ

Создание провайдера данных для ODBC несколько задержалось и отстало от создания платформы .NET Framework и Visual Studio .NET. Поэтому он не был включен в исходный выпуск Visual Studio .NET и его можно скопировать с Web-узла компании Microsoft. Кроме того, в скором будущем следует учитывать возможное появление дополнительных .NET-совместимых провайдеров данных.

В настоящее время на Web-узле компании Microsoft также можно скопировать провайдер данных Oracle.NEТ. Эти провайдеры данных ОDBС и Oracle будут включены в следующую версию 1.1 платформы .NET Framework и Visual Studio .NET 2003. В результате этого пространство имен провайдера данных ODBC Microsoft.Data.Odbc станет называться System.Data.Odbc.

В примерах этой главы используется провайдер данных ODBC версии 1.0, поэтому при использовании провайдера данных ODBC версии 1.1 нужно изменить имя его  пространства имен.

 

Основные объекты

Каждый провайдер данных имеет четыре основных объекта, которые указаны в табл. 4.1.

Таблица 4.1. Основные объекты провайдера данных 

Объект Краткое описание
Connection Устанавливает соединение с указанным источником данных
Command Выполняет команду по отношению к источнику данных. Содержит коллекцию объектов Parameters и методы для выполнения команд разного типа
DataReader Считывает данные и возвращает из источника поток данных, предназначенный только для чтения и только в одном направлении
DataAdapter Соединяет набор данных DataSet и источник данных для извлечения и сохранения данных  

Каждый объект основан на базовом родовом классе и реализует родовой интерфейс, но имеет собственную реализацию. Например, объекты SqlDataAdapter, OleDBDataAdapter и OdbcDataAdapter являются производными от класса DbDataAdapter и реализуют те же интерфейсы. Однако каждый из них реализует их своим собственным способом для соответствующего источника данных.

Пространство имен System. Data. OleDb содержит объекты:

• OleDbConnection;

• OleDbCommand;

• OleDbDataReader;

• OleDbDataAdapter.

Пространство имен System.Data.SqlClient содержит объекты:

• SqlConnection;

• SqlCommand; 

• SqlDataReader;

• SqlDataAdapter.

Пространство имен Microsoft.Data.Odbc содержит объекты:

• OdbcConnection;

• OdbcCommand;

• OdbcDataReader;

• OdbcDataAdapter.

 Аналогично, все будущие провайдеры данных будут находиться в отдельных пространствах имен и содержать такие же объекты, но с другими реализациями и префиксами.

 

Объект Connection

Этот объект модели ADO.NET очень похож на объект Connection в классической модели ADO. Его предназначение очевидно: он служит для установления соединения с заданным источником данных и с указанным в строке подключения учетным именем и паролем. Соединение можно настроить, редактируя нужным образом значения параметров строки подключения. Объект Command (или DataAdapter) может затем использовать это подключение для выполнения нужных операций с источником данных.

НА ЗАМЕТКУ

В отличие от объекта Connection в модели ADO в объекте Connection в модели ADO.NET нет методов Execute и ОpenSchema. Для выполнения команд SQL следует использовать объекты Command или DataAdapter. Функции метода OpenSchema реализуются с помощью методов GetOleSchemaTable объекта OleDbConnection.

Хотя объекты OleDbConnection, SqlConnection и OdbcConnection реализуют одинаковые интерфейсы, они все же имеют разные реализации. Например, они имеют разный формат строки подключения. В объекте OleDbConnection используется стандартный формат строки подключения OLEDB с незначительными исключениями. В объекте OdbcConnection также используется стандартный формат строки подключения ODBC, но с незначительными отклонениями. Наконец, в объекте SqlConnection используется совершенно другой формат строки подключения, который имеет отношение только к SQL Server версии 7.0 или выше.

Более того, некоторые объекты обладают дополнительными свойствами. Например, объект OleDbConnection имеет свойство Provider для указания используемого провайдера данных OLEDB, а объект OdbcConnection имеет свойство Driver для указания используемого драйвера ODBC. Объект SqlConnection вообще не имеет этих свойств, так как используется с предопределенным источником данных, т.е. с SQL Server. Однако он имеет свойства PacketSize и WorkstationID, которые используются только для работы с SQL Server и не нужны для других типов подключения.

Итак, приступим к созданию кода. Познакомимся последовательно со всеми типами источников данных, начав с самого простого примера, который по мере продвижения к концу главы будет постепенно усложняться.

1. Запустите интегрированную среду разработки приложений Visual Studio .NET.

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

3. Назовите проект DataProviderObjects.

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

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

6. В окне Properties укажите значение Data Provider Objects для свойства Text формы Form1.

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

8. В окне Properties укажите значение cmdConnection для свойства (Name) и значение Connection для свойства Text этой кнопки.

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

10. В окне Properties укажите значение txtResults для свойства (Name), значение True для свойства Multiline и значение Both для свойства ScrollBars этого текстового поля.

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

По окончании этих операций форма будет выглядеть так, как на рис. 4.2.

РИС. 4.2. Форма Form1 проекта DataProviderObjects

Перейдите в окно редактирования кода формы и включите в верхнюю часть файла приведенные ниже строки, которые импортируют пространства имен, используемые здесь и в следующих примерах главы.

Imports System.Data

Imports System.Data.SqlClient

Imports System.Data.OleDb

Imports Microsoft.Data.Odbc

Обратите внимание, что эти пространства имен содержат классы и определения объектов ADO.NET для каждого провайдера данных.

НА ЗАМЕТКУ

Среда Visual Studio .NET может не обнаружить пространство имен Data.Odbc, потому что оно является расширением базовой версии продукта. В таком случае выполните ряд действий.

1. Скопируйте инсталлятор провайдера данных ODBC с Web-узла компании Microsoft и выполните все инструкции по инсталляции.

2. В окне SolutionExplorer щелкните правой кнопкой мыши на папке References проекта DataProviderObjects.

3. Выберите в контекстном меню команду Add Reference.

4. Во вкладке.NET диалогового окна Add Reference прокрутите список компонентов и найдите файл Microsoft.Data.Odbc.dll.

5. Щелкните дважды на файле Microsoft.Data.Odbc.dll для включения его в список избранных компонентов Selected Components в нижней части диалогового окна Add Reference.

6. Щёлкните на кнопке ОК для закрытия диалогового окна Add Reference.

Если по какой-либо причине не распознано какое-то другое импортированное пространство имен, потребуется привести ссылку на файл System.Data.dll. Для этого выполните действия, перечисленные в пп. 2-6, где вместо файла Microsoft.Data.Odbc.dll при выполнении п. 4 нужно использовать файл System.Data.dll.

Теперь для кнопки btnConnection нужно создать код, приведенный в листинге 4.1, для создания подключения к базе данных pubs сервера SQL Server. Этот код создает подключение и отображает состояние подключения до и после попытки подключения к базе данных.

Листинг 4.1. Код открытия подключения и отображения его состояния

Private Sub btnConnection Click(ByVal sender As System.Object, _

 ByVal e As System.EventArgs) Handles btnConnection.Click

 ' Создание экземпляра объекта Connection

 Dim cnn As SqlConnection = New SqlConnection()

 ' Создание строки подключения

 cnn.ConnectionString = "server=localhost;uid=sa;database=pubs"

 txtResults.Clear()

 ' Отображение состояния подключения

 If (cnn.State = System.Data.ConnectionState.Open) Then

  txtResults.Text = txtResults.Text & "Connection is Open"

 Else

  txtResults.Text = txtResults.Text & "Connection is Closed"

 End If

 txtResults.Text = txtResults.Text & ControlChars.CrLf

 ' Открытие подключения

 txtResults.Text & "Opening DB connection…" _

  & ControlChars.CrLf & ControlChars.CrLf

 cnn.Open()

 ' Отображение состояния подключения

 If (cnn.State = System.Data.ConnectionState.Open) Then

  txtResults.Text = txtResults.Text & "Connection is Open"

 Else

  txtResults.Text = txtResults.Text & "Connection is Closed"

 End If

 txtResults.Text = txtResults.Text & ControlChars.CrLf

End Sub

СОВЕТ

Новым полезным компонентом Visual Basic .NET является возможность получения текстового представления для значений перечисления (enum) вместо создания специальной подпрограммы на основе операторов select-case для всех возможных значений перечисления. Все типы перечисления, которые являются объектами, наследуют метод ToString, возвращающий строку с текстовым представлением текущего значения. В листинге 4.1 используется приведенный ниже фрагмент кода для отображения состояния подключения на основе операторов if-else.

' Отображение состояния подключения – вариант 1

If (cnn.State = System.Data.ConnectionState.Open) Then

 txtResults.Text = txtResults.Text& "Connection is Open"

Else

 txtResults.Text = txtResults.Text& "Connection is Closed

End If

Его можно заменить другим вариантом кода, содержащим только одну строку.

' Отображение состояния подключения вариант 2

txtResults.Text & "Connection is " & cnn.State.ToString & ControlChars.CrLf

После запуска полученного приложения DataProviderObjects и щелчка на кнопке Connection в текстовом поле появятся строки о закрытии подключения, о состоянии подключения и повторном открытии подключения, как показано на рис. 4.3.

НА ЗАМЕТКУ

При создании рабочего кода нужно выбрать и реализовать стратегию обработки исключительных ситуаций для большинства подпрограмм и операций. Обычно основана на блоках try-catch обработки исключительных ситуаций. Этот код не включен в приведенные здесь примеры, потому что наша цель — сфокусировать внимание на концепциях программирования баз данных, а не на описании общих принципов программирования для Visual Basic .NET.

 

Объект Command

 

Аналогично объекту Connection, объект Command модели ADO.NET очень похож на своего предшественника из прежней модели ADO 2.X. Объект Command позволяет выполнять команды по отношению к источнику данных и получать возвращенные данные или результаты выполнения команд. 

РИС. 4.3. Состояние приложения DataProviderObjects до и после открытия подключения с помощью кода из листинга 4.1

Этот объект имеет следующие свойства: CommandText и СommandType для определения текста и типа фактической команды; Connection для указания подключения, используемого для выполнения команды; СommandTimeout для указания времени ожидания, по истечении которого команда отменяется и выдается сообщение об ошибке; Parameters для коллекции параметров команды; Transaction для указания транзакции, в которой используется данная команда.

Все три версии объекта Command (в пространствах имен OleDb, Sql, Odbc) имеют идентичные свойства и методы, за исключением того, что объект SqlCommand имеет дополнительный метод, которого нет у двух других вариантов этого объекта, а именно ExecuteXmlReader. Он использует преимущества SQL Server для автоматического возвращения данных в формате XML (если в запрос SQL добавлено предложение FOR XML).

НА ЗАМЕТКУ

Еще одно отличие между версиями объекта Command для разных провайдеров данных заключается в использовании значений свойства CommandType. Все они поддерживают значения Text и StoredProcedure, а объекты OleDbCommand и SqlCommand поддерживают еще одно, третье возможное значение — TableDirect. Это позволяет эффективно загружать все содержимое таблицы за счет установки значения TableDirect для свойства CommandType и имени таблицы для свойства CommandText.

Продолжим работу с формой, показанной на рис. 4.3.

1. Добавим еще одну кнопку сразу под кнопкой btnConnection, перетаскивая пиктограмму кнопки из панели элементов управления.

2. В окне свойств Properties установите значение btnCommand для свойства Name и значение Command для свойства Text.

3. Добавьте для кнопки код, показанный в листинге 4.2.

Листинг 4.2. Код открытия подключения к базе данных и подготовки объекта Command

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

 ByVal e As System.EventArgs) Handles btnCommand.Click

 ' Создание экземпляра объекта Connection

 Dim cnn As SqlConnection = New SqlConnection( _

  "server=localhost;uid=sa;database=pubs")

 ' Создание экземпляра объекта Command

 Dim cmd As SqlCommand = New SqlCommand() txtResults.Clear()

 ' Открытие подключения cnn.Open()

 ' Указание подключения и текста команды

 cmd.Connection = cnn

 cmd.CommandType = CommandType.Text

 cmd.CommandText = _

  "Select au_lname, state from authors"

 ' Вывод текста команды

 txtResults.Text = "Command String:" & ControlChars.CrLf

 txtResults.Text = txtResults.Text & ControlChars.Tab & cmd.CommandText() & ControlChars.CrLf

End Sub

После запуска на выполнение приложения DataProviderObjects щелкните на кнопке Command, и в текстовом поле будет показана команда SQL, которая находится в свойстве CommandText объекта SqlCommand, а именно: SELECT au_lname, state FROM authors.

НА ЗАМЕТКУ

Многие классы платформы .NET Framework, а также созданные другими разработчиками классы перегружают конструкторы объектов. Иначе говоря, существует несколько способов создания нового экземпляра класса, где каждый конструктор принимает свойственный только ему набор аргументов. Таким образом можно выбрать версию, оптимальную для выполнения текущей задачи. Конструктор в листинге 4.2 для объекта SqlConnection отличается от го по умолчанию конструктора в листинге 4.1, в котором не используется никаких аргументов. Позже строке подключения присваивается объект SqlConnection с помощью свойства ConnectionString.

' Создание экземпляра объекта Connection

Dim cnn As SqlConnection = New SqlConnection()

' Создание строки подключения

cnn.ConnectionString = "server=localhost;uid=sa;database=pubs"

В листинге 4.2 используется конструктор объекта SqlConnection, который принимает строку подключения в качестве параметра. Это позволяет создать объект и сразу же указать для него строку подключения в одной строке кода.

' Создание экземпляра объекта Connection

Dim cnn SqlConnection = New SqlConnection("server=localhost;uid-sa;database=pubs")

 

Применение объекта Command с параметрами и хранимыми процедурами

При создании запросов или команд для источника данных часто требуется передавать значения параметров действия (обновление, вставка или удаление данных) или хранимой процедуры. Для решения этой проблемы в объекте Command предусмотрено свойство Parameters, которое является объектом-коллекцией ParameterCollection и содержит коллекцию объектов-параметров Parameter. Это аналогично способу работы, применимому в модели ADO 2.X.

Объекты Parameter и ParameterCollection тесно связаны с соответствующим провайдером данных, поэтому они должны быть реализованы как составная часть провайдера данных ADO.NET. Способы программирования объекта SqlParameterCollection и использование объектов OdbcParameterCollection и OledbParameterCollection имеют существенные отличия. Объекты OdbcParameterCollection и OledbParameterCollection основаны на позиционных параметрах, а объект SqlParameterCollection – на именованных параметрах. Эти различия в значительной степени влияют на способ определения запросов и параметров.

Начнем с создания простого запроса с параметрами для извлечения из базы данных pubs имен и фамилий всех авторов из заданного штата.

С одной стороны, при использовании провайдеров данных OLEDB или ODBC запрос будет иметь следующий вид:

SELECT state, au_fname, au_lname from authors WHERE state = ?

Здесь вопросительный знак заменяет один параметр, а для нескольких параметров можно использовать несколько вопросительных знаков. Порядок расположения параметров в коллекции ParameterCollection должен точно соответствовать порядку, в котором располагаются их заменители в запросе или хранимой процедуре.

С другой стороны, при использовании провайдера данных SqlClient запрос будет выглядеть следующим образом:

SELECT state, au_fname, au_lname from authors WHERE state = @MyParam

Здесь заменителем параметра является его имя, а дополнительные параметры также обозначаются их именами, поэтому порядок расположения параметров в коллекции ParameterCollection не имеет значения.

Объект Parameter можно создать явно, используя конструктор Parameter (т.е. с использованием оператора New) или передавая нужные аргументы методу Add объекта-коллекции ParameterCollection (свойство Parameters объекта Command). Помните, что оба метода (конструктор Parameter и метод Add) имеют перегруженные версии. 

Ниже приведен один из способов включения параметра команды за счет явного указания объекта-параметра.

Dim rayParameter As New OdbcParameter("@MyParam", OdbcType.Char, 2)

myParameter.Direction = ParameterDirection.Input

myParameter.Value = "CA"

cmd.Parameters.Add(myParameter)

А способ включения параметра команды с помощью метода Add выглядит иначе.

cmd.Parameters.Add("@MyParam", OdbcType.Char, 2)

cmd.Parameters("@MyParam").Direction = ParameterDirection.Input

cmd.Parameters("@MyParam").Value = "CA"

Второй метод короче и обычно предпочтительнее, если только нет особой причины для повторного использования объекта Parameter.

Для метода Add объекта Parameter обычно требуется указать имя, тип и длину параметра. Затем нужно указать направление передачи данных: Input, Output, InputOutput или ReturnValue. По умолчанию используется направление Input. Наконец, для присвоения значения параметру нужно использовать свойство Value объекта Parameter. Кроме того, для параметра можно указать другие свойства, например масштаб (свойство Scale), точность (свойство Precision) и допустимость использования неопределенных значений (свойство IsNullable).

При использовании провайдера данных SqlClient можно применять практически идентичный код. Единственным отличием являются префиксы Odbc вместо префиксов Sql, а также тип перечисления SqlDbType вместо OdbcType.

Dim myParameter As New SqlParameter("@MyParam", SqlDbType.Char, 2)

myParameter.Direction = ParameterDirection.Input

myParameter.Value = "CA"

cmd.Parameters.Add(myParameter)

Аналогично выглядит способ включения параметра команды с помощью метода Add.

cmd.Parameters.Add("@MyParam", SqlDbType.Char, 2)

cmd.Parameters("@MyParam").Direction = ParameterDirection.Input

cmd.Parameters("@MyParam").Value = "CA"

СОВЕТ

Для передачи параметру неопределенного значения можно использовать свойство Value объекта DBNull.

cmd.Parameters("@MyParam").Value = DBNull.Value

Измените код кнопки cmdButton, как показано в листинге 4.3. После запуска программы и щелчка на кнопке cmdButton в текстовом поле появится текст запроса, а также имя и значение параметра.

Листинг 4.3. Код подготовки и отображения команды и ее параметров

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

 ByVal e As System.EventArgs) Handles btnCommand.Click

 ' Создание экземпляра объекта Connection

 Dim cnn As SqlConnection = New SqlConnection( _

  "server=localhost;uid=sa;database=pubs")

 ' Создание экземпляра объекта Command и объектов Parameter

 Dim cmd As SqlCommand = New SqlCommand()

 Dim prm As SqlParameter = New SqlParameter()

 txtResults.Clear()

  ' Открытие подключения cnn.Open()

 ' Указание подключения и текста команды

 cmd.Connection = cnn

 cmd.CommandType = CommandType.Text

 cmd.CommandText = _

  "Select au_lname, state from authors where state = @MyParam"

 ' Создание параметра и указание его значения

 cmd.Parameters.Add(New SqlParameter("@MyParam", SqlDbType.Char, 2))

 cmd.Parameters("@MyParam").Value = "CA"

 ' Вывод текста команды

 txtResults.Text = "Command String:" & ControlChars.CrLf

 txtResults.Text = txtResults.Text & ControlChars.Tab & _

  cmd.CommandText() & ControlChars.CrLf

 ' Вывод параметров команды

 txtResults.Text = txtResults.Text & "Command parameters:" & _

  ControlChars.CrLf

 For Each prm In cmd. Parameters

  txtResults.Text = txtResults.Text & ControlChars.Tab & _

   prm.ParameterName & " = " & prm.Value & ControlChars.CrLf

 Next

End Sub

Аналогично вызываются хранимые процедуры, за исключением того, что вместо свойства CommandType.Text используется свойство CommandType.StoredProcedure, а имя хранимой процедуры присваивается свойству CommandText. Таким образом, код вызова хранимой процедуры GetAuthorsFromState с двухсимвольным параметром для извлечения информации обо всех авторах заданного штата будет выглядеть, как показано ниже.

cmd.CommandType = CommandType.StoredProcedure

cmd.CommandText = "GetAuthorsFromState"

cmd.Parameters.Add("@MyParam", SqlDbType.Char, 2)

cmd.Parameters("@MyParam").Direction = ParameterDirection.Input

cmd.Parameters("@MyParam").Value = "CA"

СОВЕТ

Для вызова хранимой процедуры с помощью OdbcCommand нужно использовать стандартные последовательности символов ODBC (с участием фигурных скобок), а не только имя процедуры для свойства CommandText. В качестве заменителей параметров в ODBC используются вопросительные знаки. Вот как выглядит приведенный выше для провайдера данных ODBC:

cmd.CommandType = CommandType.StoredProcedure

cmd.CommandText = "{GetAuthorsFromState ?}"

cmd.Parameters.Add("@MyParam", OdbcType.Char, 2)

cmd.Parameters("@MyParam").Direction = ParameterDirection.Input

cmd.Parameters("@MyParam").Value = "CA"

Хранимая процедура также возвращает значение, которое указывается с помощью специальной последовательности символов (вопросительного знака и знака равенства) у открывающей скобки, как показано ниже.

cmd.CommandText = "{? = GetAuthorsFromState ?}"

Чтобы хранимая процедура возвращала значение, нужно указать направление Output, а затем считать значение свойства параметра после вызова хранимой процедуры. В данном примере также определяется возвращаемое значение хранимой процедуры. Поскольку здесь указан тип Int сервера SQL Server, то для этого параметра не нужно указывать длину, так как по определению она составляет 4 байт.

cmd.Parameters.Add(New SqlParameter("result", SqlDbType.Int)

cmd. Parameters ("result").Direction = ParameterDirection.ReturnValue

cmd.Parameters.Add(New SqlParameter("@MyParam", SqlDbType.Int)

cmd.Parameters("@MyParam").Direction = ParameterDirection.Output

' Вызов хранимой процедуры

Msg (cmd.Parameters("@MyParam").Value)

НА ЗАМЕТКУ

При определении параметра, который будет использоваться для возвращаемого значения ReturnValue хранимой процедуры его нужно указать первым в списке параметров коллекции Parameters. Это обязательное условие для провайдеров данных OLEDB и ODBC, потому что, как отмечалось выше, параметры этих провайдеров определяются по порядку их расположения, а возвращаемое значение может располагаться только с начала. Однако при определении возвращаемого значения для провайдера данных SQL его можно pасполагать в произвольном месте коллекции параметров, потому что параметры провайдера данных SQL определяются по именам.

Далее представлены другие фрагменты кода с указанием параметров команд и хранимых процедур, а также описываются способы их выполнения.

 

Выполнение команд

 

До сих пор мы только указывали свойства и параметры объекта Command, но не выполняли эти команды. Существует три стандартных способа выполнения команд для объекта Command и один способ для объекта SqlCommand.

• Метод ExecuteNonQuery. Выполняет команду SQL и не возвращает записей.

• Метод ExecuteScalar. Выполняет команду SQL и возвращает первое поле первой записи.

• Метод ExecuteReader. Выполняет команду SQL и возвращает набор записей с помощью объекта DataReader.

• Метод ExecuteXmlReader (только для объекта-команды SqlCommand). Выполняет команду SQL и возвращает набор записей в формате XML с помощью объекта XmlReader.

Первые три метода рассматриваются далее в этой главе, а последний – в главе 10, "ADO.NET и XML", при обсуждении способов использования XML в модели ADO.NET.

 

Метод ExecuteNonQuery

Этот метод позволяет выполнять команды без возвращения значений (наборов записей или скалярных значений), кроме значения, сообщающего об успешном или неудачном исходе выполнения команды. Это наиболее эффективный способ выполнения команд по отношению к источнику данных. Таким образом можно выполнять команды SQL или хранимые процедуры, которые являются DDL-командами определения данных (например, для создания или изменения структуры базы данных: таблиц, представлений или хранимых процедур) либо DML-командами управления данными (например, их обновления, вставки или удаления).

НА ЗАМЕТКУ

Метод ExecuteNonQuery возвращает только целочисленное значение, сообщающее об успешном или неудачном исходе выполнения команды.

При удачном выполнении DDL-команд определения данных для изменения структуры баз данных возвращается значение -1, а при удачном выполнении DML управления данными для их обновления, вставки или удаления возвращается количество строк, задействованных в команде. При неудачном выполнении команд обоих типов возвращается значение 0.

Продолжая работу с проектом DataProviderObjects, попробуем использовать объекты пространства имен OleDb и базу данных pubs. Наша задача – создать новую таблицу tblStateZipCodes для этой базы данных с помощью DDL-команды. Новая таблица tblStateZipCodes предназначена для организации связи между почтовыми индексами и штатами. Определения ее полей совпадают с определениями полей в других таблицах базы данных pubs, но отличаются от определений полей в других таблицах базы данных Novelty. Эта таблица имеет два поля: ZipCode для почтового индекса и State для названия соответствующего штата. Ниже приведена команда SQL для создания этой таблицы.

CREATE TABLE tblStateZipCodes (

 ZipCode char (5) NOT NULL,

 State char (2) NOT NULL

)

Теперь нужно изменить исходную форму Form1, выполнив ряд действий.

1. Откройте форму Form1 в интегрированной среде разработки Visual Studio .NET.

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

3. В окне свойств Properties укажите значение btnNonQuery для свойства (Name) и значение ExecuteNonQuery для свойства Text.

Затем создайте код подпрограммы btnNonQuery_Click, который приведен в листинге 4.4.

Листинг 4.4. Код создания таблицы базы данных с помощью объектов пространства имен OleDb

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

 ByVal e As System.EventArgs) Handles btnNonQuery.Click

 ' Создание экземпляра объекта Connection.

 Dim cnn As OleDbConnection = New OleDbConnection( _

  "provider=SQLOLEDB;server=localhost;uid=sa;database=pubs")

 Dim sql As String Dim result As Integer

 ' Создание экземпляра объекта Command.

 Dim cmd As OleDbCommand = New OleDbCommand()

 ' Указание подключения и текста команды

 cmd.Connection = cnn

 cmd.CommandType = CommandType.Text

 ' Указание команды SQL для создания новой таблицы

 sql = "CREATE TABLE tblStateZipCodes (" & _

  "ZipCode char (5) NOT NULL, " & _

  "State char (2) NOT NULL) "

 MsgBox(sql) cmd.CommandText = sql

 ' Открытие подключения перед вызовом метода ExecuteNonQuery.

 cnn.Open()

 ' Для обработки исключительных ситуаций нужно поместить

 ' код в блоке Try-Catch, потому что неудачное выполнение

 ' команды ТАКЖЕ генерирует ошибку времени выполнения.

 Try

  result = cmd.ExecuteNonQuery()

 Catch ex As Exception

  ' Отображение сообщения об ошибке.

  MessageBox.Show(ex.Message)

 End Try

 ' Вывод результатов выполнения команды.

 If result = -1 Then

  MessageBox.Show("Command completed successfully")

  ' MessageBox.Show("Команда выполнена успешно")

 Else

  MessageBox.Show("Command execution failed")

  ' MessageBox.Show("Команда не выполнена")

 End If

 cnn.Close()

End Sub

После запуска полученного приложения и щелчка на кнопке ExecuteNonQuery сначала появится диалоговое окно с сообщением об успешном выполнении команды. Правильность выполнения команды можно проверить, просматривая список таблиц базы данных pubs в диалоговом окне Server Explorer интегрированной среды разработки Visual Studio .NET (которое описывается в главе 1, "Основы построения баз данных") или в программе SQL Server Enterprise Manager (которая рассматривается в главе 3, "Знакомство с SQL Server 2000").

При повторном щелчке на кнопке ExecuteNonQuery появятся два диалоговых окна с сообщениями: одно с сообщением о возникшей исключительной ситуации (оно создается блоком обработки исключительных ситуаций try-catch), а другое — о неудачном выполнении команды.

Аналогичным способом можно создать представление или хранимую процедуру. Для создания представления EmployeeJobs_view, которое возвращает отсортированный по должностям перечень сотрудников с указанием их имен, фамилий и должностей, замените команду SQL в листинге 4.4 приведенной ниже командой.

sql = "CREATE VIEW EmployeeJobs_view AS" & _

 "SELECT TOP 100 PERCENT jobs. job_desc," & _

 "employee.fname, employee.lname" &_

 "FROM jobs INNER JOIN" & _

 "employee ON jobs. job_id = employee. job_id &_

 "ORDER BY jobs.job_desc"

НА ЗАМЕТКУ

Для включения предложения ORDER BY в определение представления с сортировкой результатов нужно включить в команду SELECT предложение ТОР.

Для создания хранимой процедуры, которая принимает один параметр и возвращает значение, нужно изменить эту команду SQL, как показано в листинге 4.5.

Листинг 4.5. Код, содержащий команду SQL для создания хранимой процедуры AuthorsInState1

sql = "CREATE PROCEDURE AuthorsInState1 @State char(2)" & _

 " AS declare @result int" & _

 " select @result = count (*) from authors " & _

 " where state = @State" &_

 " return (@result)"

НА ЗАМЕТКУ

Хотя метод не возвращает записи, входные и выходные параметры, а также возвращаемые значения можно передавать или возвращать с помощью коллекции Parameters. Это более эффективный подход, чем выполнение команды, которая возвращает набор записей или скалярное значение. 

Обратимся теперь ко второму типу команд SQL для управления данными, т.е. их обновления, вставки или удаления. Для этих команд обычно требуется указать параметры, особенно при работе с хранимыми процедурами.

Продолжая работу с проектом DataProviderObjects, предположим, что издательство, которое создало базу данных pubs, решило повысить авторам выраженный в процентах гонорар. Включение новой кнопки и нового текстового поля в форму позволяет главному бухгалтеру издательства повысить гонорары авторов с помощью параметра команды UPDATE. Для этого нужно выполнить перечисленные ниже действия.

1. Создайте новую кнопку под кнопкой cmdExecuteNonQuery.

2. В окне свойств Properties для этой кнопки укажите значение cmdUpdate для свойства (Name) и значение Update для свойства Text.

3. Создайте новое текстовое поле под новой кнопкой Update.

4. В окне свойств Properties для этого текстового поля укажите значение txtParam1 для свойства (Name) и значение 0 для свойства Text. Установка такого значения гарантирует, что при запуске программы и случайном нажатии кнопки Update не будет причинен ущерб данным.

5. Создайте код подпрограммы btnUpdate_Click, приведенный в листинге 4.6.

Листинг 4.6. Код обновления таблицы базы данных с помощью команды UPDATE с параметром

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

 ByVal e As System.EventArgs) Handles btnUpdate.Click

 Dim result As Integer

'  Создание экземпляра объекта Connection.

 Dim cnn As SqlConnection = New SqlConnection(_

  "server=localhost;uid=sa;database=pubs")

 ' Создание экземпляра объекта Command.

 Dim cmd As SqlCommand = New SqlCommand()

 txtResults.Clear()

 ' Указание подключения и текста команды.

 cmd.Connection = cnn

 cmd.CommandType = CommandType.Text

 cmd.CommandText = "UPDATE roysched SET royalty = royalty + @param1"

 ' Создание параметра и указание его значения.

 cmd.Parameters.Add(New SqlParameter("@param1", SqlDbType.Int))

 cmd.Parameters("@param1").Direction = ParameterDirection.Input

 cmd.Parameters("@param1").Value = Val(txtParam1.Text)

 ' Открытие подключения перед вызовом метода ExecuteReader().

 cnn.Open()

 result = cmd.ExecuteNonQuery()

 MessageBox.Show(result & " records updated", "DataProviderObjects")

 cnn.Close()

End Sub

Теперь таблицу с гонорарами авторов в базе данных pubs можно обновить, запустив приложение DataProviderObjects, задав новое значение гонорара в текстовом поле под кнопкой Update и щелкнув на этой кнопке. После этого на экране появится диалоговое окно с указанием количества охваченных записей. Этот результат можно проверить с помощью программы SQL Server Enterprise Manager, просматривая данные о гонорарах в таблице roysched до и после обновления.

Точно такое же обновление можно выполнить с помощью хранимой процедуры, что позволяет добиться более высокой производительности и централизованно хранить код. Потенциальным недостатком использования хранимых процедур является необходимость назначения администратора базы данных или специалиста с опытом создания хранимых процедур. В крупных организациях порой уходят целые дни на то, чтобы администратор базы данных изменил хранимые процедуры, которые можно самостоятельно изменить за несколько минут. Хранимые процедуры создаются с помощью программ SQL Server Enterprise Manager или SQL Query Analyzer, которые описаны в главе 3, "Знакомство с SQL Server 2000". Это можно также сделать с помощью проекта DataProviderObjects, изменив команду SQL, как это делалось ранее.

Итак, в данном примере хранимая процедура имеет следующий вид:

CREATE PROCEDURE UpdateRoyalties

@param1 int

AS

UPDATE roysched SET royalty = royalty + @param1

В листинге 4.6 для организации вызова хранимой процедуры потребуется заменить свойства CommandText и CommandType объекта Command.

cmd.CommandType = CommandType.StoredProcedure

cmd.CommandText = "UpdateRoyalties"

Запуск этой программы должен привести к тем же результатам, что и прежде, однако теперь обновление происходит благодаря хранимой процедуре, а не команде SQL из кода приложения.

 

Метод ExecuteScalar

Иногда нужно выполнить команду, которая возвращает скалярное значение, т.е. только одно значение. Типичными примерами являются команды SQL для вычисления суммы всех значений SUM и общего количества значений COUNT. Другими примерами являются справочные таблицы для подстановки одного значения или команды, возвращающие логическое значение. Метод ExecuteScalar выполняет заданную команду и возвращает значение первой записи из первого поля возвращенного набора записей, а все другие поля и записи игнорируются.

Включим приведенную ниже хранимую процедуру в базу данных pubs.

CREATE PROCEDURE AuthorsInState2

@param1 char(2)

AS

SELECT count(*) FROM authors WHERE state = @param1

Хранимая процедура AuthorsInState2 принимает параметр, который имеет двухсимвольный код штата, и возвращает из таблицы authors количество авторов из этого штата. Эта процедура с функциональной точки зрения эквивалентна процедуре AuthorsInState1 из листинга 4.5, но возвращает вычисленное значение для набора записей, а не только индикатор успешности выполнения команды.

НА ЗАМЕТКУ

Использование метода ExecuteScalar вместо метода ЕxecuteNonQuerу и передача скалярного значения с помощью параметра ReturnValue связаны с дополнительными накладными расходами. Зачем же его используют? Он проще в употреблении, потому что не нужно заботиться об указании параметров в определениях и вызовах команд.

Для вызова данной хранимой процедуры с помощью провайдера данных ODBC выполните следующее.

1. Создайте дополнительную кнопку под текстовым полем txtParam1.

2. В окне свойств Properties укажите значение cmdScalar для свойства (Name) и значение ExecuteScalar для свойства Text.

3. Создайте код подпрограммы btnExecuteScalar_Click, приведенный в листинге 4.7.

Листинг 4.7. Код извлечения скалярного значения из хранимой процедуры с помощью провайдера данных ODBC

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

 ByVal e As System.EventArgs) Handles btnExecuteScalar.Click

 Dim result As Integer

 ' Создание экземпляра объекта Connection.

 Dim cnn As OdbcConnection = New OdbcConnection( _

 "DRIVER={SQL Server};server=localhost;uid=sa;database=pubs")

 ' Создание экземпляра объекта Command.

 Dim cmd As OdbcCommand = New OdbcCommand()

 txtResults.Clear()

 ' Указание подключения и текста команды.

 cmd.Connection = cnn

 cmd.CommandType = CommandType.StoredProcedure

 cmd.CommandText = "{call AuthorsInState2(?) }"

 ' Создание параметра и указание его значения

 cmd.Parameters.Add("@param1", OdbcType.Char, 2)

 cmd.Parameters("@param1").Value = txtParam1.Text

 ' Открытие подключения перед вызовом метода

 ExecuteReader. cnn.Open()

 result = cmd.ExecuteScalar()

 MessageBox.Show("Count is " & result, "DataProviderObjects")

 cnn.Close()

End Sub

Запустите приложение и введите в текстовом поле над кнопкой ExecuteScalar двухсимвольный код штата. После щелчка на кнопке ExecuteScalar появится диалоговое окно с сообщением о количестве авторов в данном штате. Полученный результат можно проверить с помощью программы SQL Server Enterprise Manager, просматривая данные в таблице authors в базе данных pubs.

НА ЗАМЕТКУ

Учтите, что по умолчанию база данных pubs содержит двух авторов из штата Юта (код UТ) и 15 авторов из штата Калифорния (код СА).

 

Метод ExecuteReader

Этот метод применяется для возвращения набора записей. В большинстве приложений для работы с базами данных именно он используется чаще всего. Работа этого метода основана на объекте DataReader, с помощью которого записи обрабатываются последовательно одна за другой. Более подробно метод ExecuteReader и объект DataReader рассматриваются в следующем разделе. 

 

Объект DataReader

Данный объект предназначен для чтения в прямом направлении небуферизуемого потока записей, полученных от метода ExecuteReader объекта Command. Объект DataReader в основном эквивалентен объекту Recordset модели ADO 2.X, который также предназначен для чтения в прямом направлении. Объект DataReader предлагает наиболее быстрый способ доступа к источнику данных, но в нем не предусмотрены возможности прокрутки и обновления данных. Поскольку данные не буферизуются и не сохраняются в кэше, этот метод прекрасно подходит для извлечения большого объема данных. Для перехода к следующей записи объекта DataReader нужно вызвать его метод Read.

Кроме коллекции Fields, доступ к полям каждой записи можно осуществить с помощью строго типизированных методов. Доступ к полям с помощью коллекции Fields аналогичен способу доступа к полям в модели ADO 2.X.

X = MyReader("Myfield")

НА ЗАМЕТКУ

Объект DataReader не имеет явного конструктора, т.е. его нельзя создать с помощью оператора New(). Для инициализации нового объекта нужно вызвать метод ExecuteReader объекта Command.

Зная тип данных в поле, доступ к нему можно получить с помощью типизированных методов доступа. Эти методы извлекают значение поля по номеру поля, нумерация которого начинается с нуля, например:

X = MyReader.GetInt16(1)

или

X = MyReader.GetString(2)

В самом первом примере используется имя поля Myfield, что значительно упрощает его чтение, использование и совместимость с унаследованными программами. Во втором примере используется номер поля, что значительно повышает производительность, поскольку исключается преобразование имени поля в его номер.

Для демонстрации способов использования этих методов выполните следующее.

1. Создайте под кнопкой ExecuteScalar дополнительную кнопку.

2. В окне свойств Properties укажите значение cmdExecuteReader для свойства (Name) и значение ExecuteReader для свойства Text.

3. Создайте код подпрограммы btnExecuteReader_Click, приведенный в листинге 4.8.

НА ЗАМЕТКУ

Кроме способов использования объекта DataReader, в этом примере демонстрируются и другие функциональные возможности. Например, здесь помимо членов Text и StoredProcedure свойства-перечисления CommandType для указания типа команды используется член TableDirect. Он содержит имя таблицы, все поля которой возвращаются данной командой. Учтите, что этот член перечисления поддерживается только для провайдера данных ODBC.

Представления обычно обрабатываются точно также, как и таблицы. Следовательно, при использовании члена TableDirect свойства-перечисления CommandType можно указывать не только имя таблицы, но и имя представления.

Листинг 4.8. Код создания объекта DataReader и извлечения значений полей с помощью представления и члена TableDirect

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

 ByVal e As System.EventArgs) Handles btnExecuteReader.Click

 ' Создание экземпляра объекта Connection.

 Dim cnn As OleDbConnection = New OleDbConnection( _

  "provider=SQLOLEDB;server=localhost;uid=sa;database=pubs")

 ' Создание экземпляра объекта Command.

 Dim As OleDbCommand = New OleDbCommand()

 txtResults.Clear()

 ' Указание подключения и текста команды

 cmd.Connection = cnn

 cmd.CommandType = CommandType.TableDirect

 cmd.CommandText = "EmployeeJobs_View"

 ' Открытие подключения перед вызовом метода

 ExecuteReader. cnn.Open()

 Dim reader As OleDbDataReader

 reader = cmd.ExecuteReader{)

 While reader.Read()

  txtResults.Text = txtResults.Text & reader("fname") & _

   ControlChars.Tab & reader("lname") & _

   ControlChars.Tab & ControlChars.Tab & _

   reader("job_desc") & ControlChars.CrLf

 End While

 reader.Close()

 cnn.Close()

End Sub

(Здесь предполагается, что представление EmployeeJobs_view уже создано с помощью подпрограммы btnNonQuery_Click из листинга 4.4, как описано выше. – Прим. ред.)

НА ЗАМЕТКУ

Перед попыткой доступа к данным объекта DataReader не забывайте вызывать метод Read(). В отличие от объекта Recordset в модели ADO 2.X, в которой после загрузки данных текущее расположение автоматически находится на первой записи, в модели ADO.NET в объекте DataReader нужно явно указать текущее расположение возле первой записи с помощью исходного вызова метода

Для организации доступа к данным можно также применить цикл While с более эффективными строго типизированными методами доступа к полям.

While reader. Read()

 txtResults.Text = txtResults.Text & reader.GetString(1) & _

  ControlChars.Tab & reader.GetString(2) & _

  ControlChars.Tab & ControlChars.Tab & _

  reader. GetString(0) & ControlChars.Ctrlf

End While

Еще одно изменение, которое диктуется личным вкусом и стилем программирования автора, заключается в объединении определения объекта DataReader и выполнения метода ExecuteReader в одной строке, т.е. вместо фрагмента кода

Dim reader As OleDbDataReader reader = cmd.ExecuteReader()

можно использовать следующую строку:

Dim reader As OleDbDataReader = cmd.ExecuteReader()

После запуска приложения DataProviderObjects щелкните на кнопке ExecuteReader, и в текстовом поле справа будут отображены данные из представления EmployeeJobs_view, как показано на рис. 4.4.

РИС. 4.4. Результаты выполнения команды ExecuteReader из листинга 4.8

НА ЗАМЕТКУ

По окончании использования объекта DataReader следует вызвать метод Close. Дело в том, что выходные данные или возвращаемые значения объекта Command недоступны до тех пор, пока объект DataReader открыт. Он остается открытым до тех пор, пока открыто само подключение или объект DataReader.

Объект DataReader также предлагает простой и эффективный способ создания Web-страниц для работы сданными на основе элемента управления DataGrid, который подробно рассматривается в главе 11, "Web-формы: приложения на основе ASP.NET для работы с базами данных".

 

Использование объектов Connection и Command во время создания приложения

Вкладка Data панели элементов управления среды Visual Studio .NET содержит компоненты, которые соответствуют некоторым методам доступа к данным. С помощью окна Properties они позволяют указывать значения свойств во время создания приложения, а не только во время его выполнения. Они также предлагают визуальные инструменты указания значений для более сложных свойств.

Например, для реализации кода из листинга 4.8 с помощью таких элементов управления выполните перечисленные ниже действия.

1. Создайте еще одну форму Form2 в проекте DataProviderObjects.

2. В окне свойств Properties укажите значение Connection and Command Components для свойства Text формы Form2.

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

4. Включите в форму текстовое поле Textbox1.

5. В окне свойств Properties укажите значение True для свойства Multiline и значение Both для свойства Scrollbars этого текстового поля.

6. Увеличьте размер текстового поля так, чтобы оно покрывало большую часть формы.

7. Из вкладки Data панели элементов управления перетащите элемент управления OleDbConnection в форму Form2. Этот компонент невидим во время выполнения приложения, поэтому он появится в разделе невизуальных компонентов в нижней части окна редактирования формы.

8. В окне свойств Properties укажите приведенное ниже значение для свойства ConnectionString элемента управления OledbConnection1.

provider=SQLOLEDB;server=localhost;uid=sa;database=pubs

9. Из вкладки Data панели элементов управления перетащите еще один элемент управления OleDbCommand в форму Form2. Этот компонент также невидим во время выполнения приложения, поэтому он появится в нижней части окна редактирования формы.

10. В окне свойств Properties укажите значение OledbConnection1 для свойства Connection и приведенное ниже значение для свойства CommandText элемента управления OledbCommand1.

SELECT * FROM EmployeeJobs_view 

11. Создайте код подпрограммы Form2_Load, приведенный в листинге 4.9.

СОВЕТ

В главе 6, "ADO.NET: объект DataAdapter" представлены графические инструменты, которые позволяют автоматически создать строку подключения и текст команды SQL вместо создания вручную их кода.

Листинг 4.9. Код создания объекта DataReader и извлечения значений полей с помощью компонентов SqlConnection и SqlCommand

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

 ByVal e As System.EventArgs) Handles MyBase.Load

 ' Открытие подключения перед вызовом метода ExecuteReader.

 OleDbConnection1.Open()

 Dim reader = OleDbCommand1.ExecuteReader()

 TextBox1.Clear()

 While reader.Read()

 TextBox1.Text = TextBox1.Text & reader("fname") & _

  ControlChars.Tab & reader("lname") & _

  ControlChars.Tab & ControlChars.Tab & _

  reader("job_desc") & ControlChars.CrLf

 End While

 ' Отмена выбора всех строк в текстовом поле.

 TextBox1.SelectionLength = 0

 reader.Close()

 OleDbConnection1.Close()

End Sub

12. Щелкните правой кнопкой мыши на проекте DataProviderObjects в окне Solution Explorer и выберите команду Properties в контекстном меню.

13. В папке Common Properties выберите элемент General, а затем выберите форму Form2 в текстовом поле Startup object (Объект запуска) данного приложения.

После запуска приложения DataProviderObjects в текстовом поле формы Form2 будут отображены данные из представления EmployeeJobs_view, как показано на рис. 4.5.

 

Другие провайдеры данных

 

Выше были представлены классы нескольких основных провайдеров данных (например, Parameter и Parameters), а также четыре основных объекта в табл. 4.1. В главе 5, "ADO.NET: объект DataSet", более подробно рассматривается объект DataSet и связанные с ним объекты, а в главе 6, "ADO.NET: объект DataAdapter", – объект DataAdapter.

В оставшейся части главы рассматривается еще один провайдер данных — объект-транзакция Transaction. Транзакции используются для гарантированного успешного завершения сразу нескольких связанных операций по принципу "все или ничего". Это значит, что либо все операции транзакции успешно выполняются, либо они вообще не выполняются. Классическим примером транзакции является банковская операция перечисления денежных средств. Эта операция состоит из двух этапов: удержание денежной суммы с одного счета и зачисление ее на другой счет. При этом желательно избегать ситуаций, когда успешно выполняется только первый этап транзакции!

РИС. 4.5. Результаты отображения данных в форме Form2 с помощью элементов управления OleDbConnection и OleDbCommand

Провайдеры данных ADO.NET содержат объект Transaction, который имеет фундаментальные методы обработки транзакций. Метод Commit фиксирует текущую транзакцию, а метод Rollback – откатывает (отменяет) текущую транзакцию. Выполнение транзакции и создание объекта Transaction осуществляется с помощью вызова метода BeginTransaction по отношению к открытому объекту Connection. Способ использования объекта Transaction демонстрируется на примере бизнес-ситуации 4.1.

 

Бизнес-ситуация 4.1: создание процедуры для архивирования старых заказов по годам

После относительно длительного использования системы управления базами данных некоторые данные рекомендуется архивировать. В каждой рабочей системе операцию архивирования следует включить в состав обязательных и регулярно выполняемых операций резервного копирования. Архивируемые данные — это данные, которые нужны не для постоянного использования (т.е. в оперативном режиме), а только изредка. Удаление этих данных из основных оперативных таблиц базы данных может повысить производительность операций доступа к этим таблицам, так как при этом приходится обрабатывать и фильтровать меньше записей. Однако архивная таблица часто хранится в идентичном формате таблицы и доступ к ней в случае необходимости можно организовать аналогичным образом. В этой бизнес-ситуации создается простая форма для выполнения простого архивирования данных из таблицы tblOrder базы данных Novelty. Она позволит выбирать и архивировать заказы по годам, т.е. после выбора нужного года выполняются перечисленные ниже действия.

1. Сначала в базе данных создается новая таблица tblOrderXXXX, где ХХХХ обозначает тот год, записи о заказах которого будут архивироваться.

2. Затем все записи о заказах за указанный год копируются из таблицы tblOrder втаблицу tblOrderXXXX.

3. Все скопированные записи о заказах за указанный год удаляются из таблицы tblOrder.

Хитрость здесь заключается в том, чтобы отменить всю транзакцию при неудачном выполнении какой-либо ее операции. Нам не нужна новая таблица, если в нее нельзя скопировать данные. Не нужно архивировать данные, если они не удаляются из основной таблицы. Аналогично, не нужно удалять никакие записи из основной таблицы, если они не скопированы в архивную таблицу. Для решения этой задачи можно использовать объект Transaction и вернуть (откатить) базу данных в исходное состояние в случае сбоя каких-то операций. Для создания формы с этими функциями выполните перечисленные ниже действия.

Запустите интегрированную среду разработки Visual Studio .NET.

2. Создайте новый проект Visual Basic Windows Application.

3. Назовите проект BusinessCase4.

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

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

6. В окне Properties укажите значение frmArchive для свойства (Name) и значение Archive Orders для свойства Text формы Form1.

7. Создайте в форме поле со списком lstYears, надпись Label1, кнопку bntOK и кнопку btnCancel, перетаскивая их из панели элементов управления.

8. В окне Properties укажите значение Archive all orders for the year для свойства Text надписи, значение OK для кнопки btnOK и значение Cancel для кнопки btnCancel.

9. Расположите все элементы управления, как показано на рис. 4.6.

РИС. 4.6. Расположение элементов управления в форме frmArchive

В верхней части файла с исходным кодом вставьте приведенную ниже строку кода для импорта пространства имен SqlClient.

Imports System.Data.SqlClient

В теле определения класса для формы frmArchive включите код из листинга 4.10.

Листинг 4.10. Код архивирования данных в новой таблице

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

 ByVal e As System.EventArgs) Handles MyBase.Load

 lstYears.Items.Add("1995")

 lstYears.Items.Add("1996")

 lstYears.Items.Add("1997")

 lstYears.Items.Add("1998")

 lstYears.Items.Add("1999")

 lstYears.Items.Add("2000")

 lstYears.Items.Add("2001")

 lstYears.Items.Add("2002")

 ' Указание значения по умолчанию.

 lstYears.SelectedIndex = 0

End Sub

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

 ByVal e As System.EventArgs) Handles btnCancel.Click

 Me.Close()

End Sub

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

 ByVal e As System.EventArgs) Handles btnOK.Click

 Dim sql As String

 Dim result As Integer

 Dim records As Integer

 Dim SelectedYear As String

 ' Создание экземпляров объектов Connection и Command.

 Dim cnn As SqlConnection = New SqlConnection( _

  "server=localhost;uid=sa;database=novelty")

 Dim cmd As New SqlCommand()

 Dim trans As SqlTransaction

 ' Получение значения года.

 SelectedYear = lstYears.SelectedItem.ToString

 ' Размещение кода внутри блока Try-Catch для

 ' обработки исключительных ситуаций.

 Try

  ' Открытие объекта Connection и запуск транзакции.

  cnn.Open()

  trans = cnn.BeginTransaction

  ' Включение команды в транзакцию.

  cmd.Connection = cnn

  cmd.Transaction = trans

  ' Указание команды SQL для вставки соответствующих

  ' записей в архивную таблицу.

  sql = "SELECT * INTO tblOrder" & SelectedYear & _

   FROM tblOrder WHERE year (OrderDate) = " & SelectedYear

  ' Передача текста команды SQL в транзакцию.

  cmd.CommandText = sql

  result = cmd.ExecuteNonQuery()

  ' Отображение результатов вставки записей в архивную таблицу.

  If result > 0 Then

   records = result MessageBox.Show(records & _

    " records inserted successfully into tblOrder" & SelectedYear)

  Else

   MessageBox.Show( _

    "No records inserted into tblOrder" & SelectedYear)

   ' При отсутствии записей созданная таблица

   ' не нужна и транзакцию нужно откатить.

   trans.Rollback()

  End If

  If records > 0 Then

   ' Команда SQL для удаления соответствующих

   ' записей из текущей таблицы.

   sql = "delete FROM tblOrder WHERE year (OrderDate) = " _

    & SelectedYear

   ' Эта команда находится в той же транзакции.

   cmd.CommandText = sql

   result = cmd.ExecuteNonQuery()

   ' Показать результаты удаления записей.

   If result = records Then

    MessageBox.Show(records & _

     " records deleted successfully")

    ' Все действия успешно выполнены, можно фиксировать транзакцию.

    trans.Commit()

   Else

    MessageBox.Show("No records deleted!")

   End If

  Else

   ' Никаких действий.

  End If

 Catch ex As Exception

  ' Какие-то действия не выполнены, поэтому нужно

  ' отменить (откатить) всю транзакцию.

  Try

   ' Отображение сообщения об ошибке.

   MessageBox.Show(ex.Message & _

    ControlChars.CrLf & ControlChars.CrLf & _

    "Transaction Failed!")

   trans.Rollback()

  Catch ex2 As Exception

  End Try

 Finally

  cnn.Close()

 End Try

End Sub

Подпрограмма frmArchive_Load инициализирует список lstYears значениями, из которых можно выбрать год архивирования, и выбирает используемый по умолчанию год. Конечно, эту подпрограмму можно было бы усовершенствовать так, чтобы в списке отображались только те годы, для которых существуют записи о заказах. Однако для демонстрации принципов работы транзакций достаточно и такой подпрограммы.

Подпрограмма btnCancel_Click обработки щелчков мышью на кнопке Cancel просто закрывает форму, что в данном случае приводит к закрытию программы. Все необходимые действия выполняются обработчиком щелчков мышью на кнопке OK. После объявлений переменных следует получить выбранный год из списка lstYears и сохранить его для дальнейшего использования. Для гарантированной отмены транзакции в случае возникновения любой исключительной ситуации следует окружить активный код блоком Try-Catch-Finally.

Поскольку транзакции определяются на уровне подключения, то сначала нужно открыть подключение, а затем создать объект Transaction с помощью вызова метода BeginTransaction для открытого подключения. Объекты Connection и Transaction присваиваются объекту Command, который будет использоваться для выполнения команд по отношению к базе данных.

Первые два этапа создания архивной таблицы и копирования выбранных строк выполняются с помощью одной команды SELECT, которая содержит предложение INTO имя_таблицы. Указанная таким образом таблица создается автоматически, а если такая таблица уже существует, то генерируется исключительная ситуация. Выбранное значение года добавляется к имени таблицы tblOrder для создания имени новой архивной таблицы.

НА ЗАМЕТКУ

Команда SELECT INTO не создает индекс, если он существует в исходной таблице. Для повышения производительности выполнения запросов по отношению к данной таблице, вероятно, придется создать индексы по одному или нескольким полям.

Для выполнения команды SQL вызывается метод ExecuteNonQuery, который возвращает количество охваченных запросом записей. Если это возвращаемое значение больше нуля, следовательно, нужные записи найдены и вставлены в новую таблицу. В противном случае это значит, что таблица не может быть создана либо для копирования не найдено никаких записей. В любом из этих двух случаев транзакция откатывается, даже если таблица создана, чтобы база данных не наполнялась пустыми и бесполезными таблицами.

Если хотя бы одна запись скопирована в таблицу, то ее прототип в исходной таблице tblOrder удаляется с помощью команды DELETE, содержащей предложение WHERE с заданным годом. В случае успешного выполнения этой команды, т.e. если количество скопированных и удаленных строк совпадает, транзакция считается успешно завершенной и фиксируется. В противном случае, т.е. если какая-то отдельная операция завершится неудачно (нарушится процесс удаления записей, будет отменено разрешение на удаление архивируемых данных или произойдет сбой сервера), вся транзакция будет отвергнута. Откат транзакции гарантирует, что при неудачной попытке удаления корректных записей из таблицы tblOrder архивная таблица tblOrderХХХХ будет удалена.

До сих пор рассматривались только те исключительные ситуации, которые возникают при нарушении последовательного выполнения операций подпрограммы. Однако следует также позаботиться о многих других исключительных ситуациях, которые могут возникнуть во время выполнения. Например, исключительная ситуация может возникнуть при попытке создания уже существующей таблицы. Для ее перехвата и обработки следует использовать блок Try-Catch, который в данном случае выводит текстовое сообщение об исключительной ситуации, а вся транзакция отвергается.

НА ЗАМЕТКУ

Еще один блок Try-Catch потребуется для обработки исключительной ситуации, когда архивная таблица не может быть создана (например, из-за наличия именно такой таблицы). Основная причина, по которой она предлагается, заключается в том, что транзакция началась, но никаких изменений данных не произошло, а потому в файл регистрации транзакций не записано никаких действий, которые нужно откатить.

В блоке Finally используемое подключение закрывается независимо от того, произошла или нет исключительная ситуация.

Выполните все описанные выше действия и поэкспериментируйте с этим приложением, создавая архивы для записей разных лет. Для проверки полученных результатов сопоставьте содержимое новой архивной и исходной таблиц до и после архивирования. Не забывайте, что содержимое исходной таблицы tblOrder всегда можно вернуть в первоначальное состояние, запуская сценарий ее создания и наполнения данными.

 

Резюме

В этой главе приводятся общие сведения об ADO.NET и некоторых объектах провайдеров данных .NET. Провайдеры данных образуют интерфейс ADO.NET для взаимодействия с физическими хранилищами данных и предлагают модель программирования в режиме подключения. Здесь кратко рассматриваются свойства и методы объектов Connection, Command, Parameter, DataReader и Transaction, включая стандартные провайдеры данных SqlClient, OleDb и Odbc. В главе 5, "ADO.NET: объект DataSet", описываются способы работы с данными в отключенном режиме на основе объектов DataSet и DataAdapter.

 

Вопросы и ответы

Судя по содержанию этой главы, модель ADO.NET предназначена для работы в отключенном режиме и нет никакой поддержки для серверных курсоров или пессимистической блокировки. А что же делать, если уже существующее приложение использует их или спецификации нового проекта требуют их применения? Следует ли мне использовать для этого только Visual Basic 6.0?

Во-первых, необходимо тщательно проанализировать приложение и убедиться в том, что действительно всегда нужно использовать серверные курсоры или пессимистические блокировки. Если они (или какие-то другие компоненты, которые не поддерживаются в ADO.NET) действительно необходимы, не стоит отчаиваться. Visual Basic. NET все равно можно использовать для таких приложений, так как на платформе .NET Framework предусмотрена расширенная поддержка взаимодействия с COM, что позволяет использовать в .NET-совместимом приложении COM-объекты, которые, в свою очередь, могут использовать управляемый (.NET-совместимый) код. Иначе говоря, можно использовать не только ADO 2.X, но и любые другие COM-объекты, для которых нет аналогов в .NET. Конечно, за организацию взаимодействия между COM и.NET придется заплатить снижением производительности. В какой мере? Ответ на этот вопрос можно получить только после тщательного тестирования приложения.

Похоже, что программирование объектов, методов и свойств ничем не отличается от способов их программирования в модели ADO 2.X. Зачем же переходить к модели ADO.NET?

Конечно, выполнение основных операций подключения к базе данных не очень отличается от таких же операций в модели ADO 2.X. Однако, кроме уже упомянутых здесь небольших усовершенствований, следует иметь в виду ряд важных отличий.

1. Visual Basic .NET и платформа.NET представляют собой совершенно новый мир, а модель ADO.NET является способом доступа к данным в этом мире.

2. Хотя при создании .NET-совместимых приложений можно продолжать использование уже существующих COM-компонентов, например из модели ADO 2.X, такой способ связан с сокращением производительности при доступе к COM-компонентам и необходимости их корректной инсталляции и регистрации.

3. Рассмотренные в этой главе объекты разных провайдеров данных отвечают только за часть всех операций с базой данных, а именно за чтение и запись данных в подключенном режиме. Другая часть операций выполняется в отключенном режиме и связана с объектом DataSet. Именно в этом режиме прекрасно проявляются преимущества модели ADO.NET, и потому в следующей главе описываются базовые блоки объекта DataSet.

 

ГЛАВА 5

ADO.NET: объект DataSet

 

Объект DataSet является центральным и наиболее революционным элементом модели доступа к данным ADO.NET. По сути, это кэш-область в оперативной памяти для данных из одного или нескольких источников. Его можно представить как полноценную базу данных, которая полностью находится в оперативной памяти. Вероятно, наиболее важной характеристикой объекта DataSet является его использование в отключенном режиме. Описанные в главе 4, "Модель ADO.NET: провайдеры данных", управляемые объекты провайдеров данных предоставляют функции, необходимые при физическом подключении к базе данных или другому источнику данных. А объект DataSet и связанные с ним объекты (DataTable, DataRow, DataColumn и DataRelation) предлагают богатую функциональность в отключенном от источника данных режиме работы.

Еще одной ключевой характеристикой объекта DataSet является независимость загруженных данных от их источника. Он содержит данные и позволяет манипулировать ими в реляционной манере. Поэтому DataSet и подчиненные ему объекты имеют универсальный способ применения и не связаны с каким-то отдельным провайдером данных. Таким образом, существует только один объект DataSet и не существует никаких других специализированных объектов DataSet, например SqlDataSet, OledbDataSet или OdbcDataSet.

Если объекту DataSet не известен источник данных, то как же данные загружаются в него и как изменения данных передаются источнику? Ответ на эти вопросы можно получить, познакомившись с объектом DataAdapter, который служит мостом между объектом DataSet и физическим источником данных. Объект DataAdapter содержит специальные команды чтения данных из источника данных, а также команды обновления, удаления и вставки данных в источнике. Более подробно он рассматривается в главе 6, "ADO.NET: объект DataAdapter".

 

Компоненты объекта DataSet

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

Ниже перечислены возможности, которыми обладает объект DataSet.

• Хранение данных приложения. Объект DataSet может легко и гибко использоваться для хранения локальных данных приложения. Доступ к данным так же прост, как и доступ к данным в массиве, но объект DataSet предлагает дополнительные функции, например для сортировки и фильтрации,

• Использование удаленных данных. Объект DataSet автоматически использует формат XML для маршалинга данных (т.е. их передачи от одного компьютера к другому). Эта возможность существен но упрощает разработку приложений на основе служб, SOAP или удаленного доступа к данным на более низком уровне.

• Кэширование данных. Объект DataSet может кэшировать данные во время создания распределенных приложений на основе ASP.NET или других технологий, сокращая объем передаваемых по сети данных.

• Устойчивое хранение данных. Объект DataSet предлагает методы сохранения своих данных и информации о схеме данных в стандартном формате XML.

• Взаимодействие с пользователями. Объект DataSet эффективно поддерживает взаимодействие с пользователями для разных графических интерфейсов пользователя, комбинируя функции сортировки, фильтрации и прокрутки с возможностями их связывания с разными представлениями данных на основе Windows Forms и Web Forms.

Данные в объекте DataSet организованы в одной или нескольких объектах DataTable. Каждый объект DataTable существует независимо от источника данных, т.е. он всегда отключен от источника данных, как и DataTable. Объект DataTable всего лишь хранит несколько таблиц данных и предлагает возможности манипулирования, передачи или связывания их с элементами управления пользовательского интерфейса. На рис. 5.1 показана схема взаимодействия объекта DataSet и связанных с ним подчиненных объектов.

РИС. 5.1. Схема взаимодействия объекта DataSet с подчиненными объектами

Объекты, которые являются подчиненными по отношению к объекту DataSet, обладают перечисленными ниже возможностями.

• Объект DataTable содержит коллекции объектов DataRow, DataColumn и Constraint, а также коллекции объектов DataRelation, связанные с другими родительскими и дочерними объектами. Представление данных в этом объекте аналогично представлению данных в объекте Recordset в ADO 2.X.

• Объект DataColumn является базовой единицей извлечения данных и определения схемы для объекта DataTable. Он содержит специализированную информацию для каждого поля объекта DataTable, включая имя, тип данных и другие атрибуты (например, свойства Unique, Readonly, AllowDBNull и Кроме того, он имеет свойство Expression для вычисления значения поля или создания итогового поля.

• Объект DataRow представляет одну запись объекта DataTable и используется для добавления, извлечения и изменения данных в объекте DataTable. С его помощью можно осуществлять последовательный или непосредственный доступ к нужным записям объекта DataTable.

• Объект DataRelation определяет отношение между двумя таблицами объекта DataSet. Он представляет классическое отношение между родительской и дочерней таблицей (т.е. между ключевым и внешним полями двух таблиц). Переходы между отношениями выполняются с помощью коллекций ChildRelations и ParentRelations (объектов DataRelation) объекта DataTable.

• Объект Constraint определяет правило, согласно которому поддерживается целостность данных в объекте DataTable. Он содержит уже знакомое ограничение UniqueConstraint, гарантирующее уникальность значений таблицы, а также ограничение ForeignKeyConstraint, определяющее действия по ношению к строкам в связанной таблице. Ограничение может относиться к одному или нескольким объектам DataColumn. Каждый объект DataTable имеет свойство Constraint с коллекцией ограничений для данной таблицы.

 

Ввод данных в объект DataSet

 

Для ввода данных в таблицы DataTable объекта DataSet предусмотрены перечисленные ниже способы.

1. Программирование определений метаданных и прямая вставка данных.

2. Использование объекта DataAdapter для создания запроса по отношению к источнику данных.

3. Загрузка XML-документа.

В этой главе представлен первый из перечисленных выше способов, в главе 6, "ADO.NET: объект DataAdapter", — второй, а в главе 10, "ADO.NET и XML", — третий. Этот раздел начинается с описания базовых функций объектов DataSet и DataTable.

Учтите, что после загрузки данных в объект DataSet, использованный метод загрузки далее уже не имеет никакого значения, потому что все последующие операции с данными выполняются идентично.

 

Определение схемы объекта DataTable

Для иллюстрации основных принципов работы следует создать простую форму с помощью перечисленных ниже действий.

1. Запустите интегрированную среду разработки приложений Visual Studio .NET.

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

3. Назовите проект DataSetCode.

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

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

6. В окне Properties укажите значение frmDataSets для свойства (Name) и значение DataSets для свойства Text формы Form1.

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

8. В окне Properties укажите значение btnCreateDS для свойства (Name) и значение Create DataSet для свойства Text этой кнопки.

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

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

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

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

Imports System

Imports System.Data

Затем в определении класса формы frmDataSets введите приведенный ниже код.

Private dsEmployeelnfo As DataSet

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

 ByVal e As System.EventArgs) Handles btnCreateDS.Click

 CreateDataSet()

 AddData()

 DisplayDataSet()

End Sub

Подпрограмма btnCreateDS_Click обработки щелчков на кнопке Create DataSet вызывает три другие подпрограммы для каждой фазы работы приложения. Переменная dsEmployeelnfo является объектом DataSet, доступ к которому выполняется с помощью подпрограмм внутри подпрограммы btnCreateDS_Click.

НА ЗАМЕТКУ

Обычно объекты DataTable содержатся в объекте DataSet, но объект DataSet можно использовать непосредственно, как правило в наиболее простых ситуациях, когда не требуется организовывать связь между несколькими таблицами. 

Итак, прежде всего нужно определить схему (или структуру) всех используемых таблиц. Для этого нужно определить все объекты DataColumn таблицы и указать их свойства, как показано на примере подпрограммы CreateDataSet () в листинге 5.1. 

ЛИСТИНГ 5.1. Код создания Объектов DataSet и DataTable

Private Sub CreateDataSet()

 ' Создание объекта dsEmployeeInfo.

 dsEmployeelnfo = New DataSet()

 ' Создание таблицы Employees.

 Dim dtEmployees As DataTable = New DataTable("Employees")

 dtEmployees.CaseSensitive = False

 dtEmployees.Columns.Add("FirstName", Type.GetType("System.String"))

 dtEmployees.Columns.Add("LastName", Type.GetType("System.String"))

 dtEmployees.Columns.Add("DepartmentID", Type.GetType("System.Int32"))

 ' Вставка таблицы Employees в объект EmployeeInfo.

 dsEmployeeInfo.Tables.Add(dtEmployees)

 ' Создание таблицы Departments с

 ' помощью перегруженной версии конструктора.

 ' Это более длительный способ при создании стандартных полей,

 ' но он позволяет задавать другие свойства полей (например, Readonly & Unique)

 ' до включения поля DataColumn в коллекцию Columns.

 Dim dtDepartments As DataTable

 dtDepartments = New DataTable()

 dtDepartments.TableName = "Departments"

 dtDepartments.MinimumCapacity = 5

 dtDepartments.CaseSensitive = False

 Dim NewColumn As New DataColumn()

 With NewColumn

  .ColumnName = "ID"

  .DataType = Type.GetType("System.Int32")

  .Readonly = True

  .Unique = True

  .AutoIncrement = True

 End With

 dtDepartments.Columns.Add(NewColumn)

 NewColumn = New DataColumn()

 With NewColumn

  .ColumnName = "DepartmentName"

  .DataType = Type.GetType("System.String")

  .Unique = True

  .AllowDBNull = False

 End With

 dtDepartments.Columns.Add(NewColumn)

 ' Включение таблицы Departments в объект dsEmployeeInfo.

 dsEmployeeInfo.Tables.Add(dtDepartments)

End Sub

После создания экземпляра dsEmployeeInfo объекта DataSet создается таблица Employees с помощью перегруженных конструкторов объекта DataTable с использованием параметра – имени таблицы. Затем задается значение False для свойства CaseSensitivity объекта DataTable. Это свойство определяет, будут ли операции сортировки, поиска и фильтрации выполняться с учетом регистра символов. По умолчанию значение этого свойства определяется как значение свойства CaseSensitivity родительского объекта DataSet или принимается равным False, если объект DataTable создан независимо от объекта DataSet.

НА ЗАМЕТКУ

Свойство CaseSensitivity применяется только для данных объекта DataTable и не влияет на имена самих объектов DataTable. Например, объект DataSet может  иметь две таблицы (или отношения) с именами или mytable или Mytable. Для работы с ними нужно записывать имена с точным указанием регистра символов, поскольку их поиск ведется с учетом регистра (case-sensitive search). Однако это не обязательно при наличии только одной таблицы с таким именем, поскольку при этом используется поиск без учета регистра (case-insensitive search).

Затем создаются определения полей с помощью метода Add объекта Column по указанному имени поля и типу данных. Учтите, что здесь указываются .NET-совместимые типы данных, а не используемые в базе данных типы. При отсутствии типа данных для него по умолчанию принимается строковый тип. Наконец, таблица Employee включается в объект dsEmployeeInfo.

Далее этот процесс повторяется для таблицы Departments, но теперь уже с перегруженными конструкторами и функциями. Таким образом та же цель достигается другим способом. Разработчик может самостоятельно выбрать наиболее подходящий способ на основе собственного вкуса, корпоративных стандартов или особенностей поставленной задачи.

Для свойства MinimumCapacity объекта dtDepartments задается значение 5, т.е. экземпляр объекта DataTable создается уже с пятью записями. Указание для него другого значения (отличного от используемого по умолчанию значения 25) позволяет управлять выделением ресурсов и оптимизировать производительность в критических ситуациях. Конечно, на самом деле эти пять записей фактически появятся только после того, как пользователь добавит их в таблицу DataTable, а пока для них резервируется место.

Кроме того, перед добавлением полей в коллекцию Columns для них задаются значения других свойств. Перечисленные ниже свойства Readonly, Unique, AllowDBNull и AutoIncrement уже наверняка знакомы тем, кто имеет опыт создания приложений для работы с базами данных.

Присвоение свойству Readonly значения True указывает на то, что значение поля нельзя изменить.

Присвоение свойству Unique значения True указывает на то, что значения данного поля во всех записях таблицы должны быть уникальными. Это свойство реализуется с помощью автоматического создания ограничения UniqueConstraint для данного поля. Этот способ более подробно рассматривается в разделе об ограничениях таблицы далее в главе.

Присвоение свойству AllowDBNull значения True указывает на то, что в данном поле допускается использование неопределенных значений.

Присвоение свойству AutoIncrement значения True указывает на то, что значение поля увеличивается при каждом добавлении в таблицу новой записи. Для указания начального значения и приращения используются свойства AutoIncrementSeed и AutoIncrementStep.

НА ЗАМЕТКУ

Объект DataTable принимает новую запись и присваивает автоматически увеличенное значение для поля, свойство которого AutoIncrement имеет значение True, только если значение поля отличается от принимаемого по умолчанию.

Среди других свойств объекта DataColumn следует отметить MaxLength (для полей с данными типа String), DefaultValue и Table. Поле также можно определить с выражением для вычисления значения, создания итогового поля или фильтрования строк. Такое выражение может состоять из имен полей текущей записи или других записей, констант, операторов, символов подстановки, итоговых и других функций. Более подробную информацию и примеры таких выражений можно найти в справочных материалах для свойства Expression объекта DataColumn.

 

Вставка данных в объект DataTable

После определения объекта DataTable и его схемы можно начинать ввод данных.

В листинге 5.2 приводится код вставки записей с данными в DataTable. Подпрограмма AddData включает четыре записи с данными в таблицу Departments и три записи с данными в таблицу Employees следующим образом.

1. Сначала создается новый экземпляр объекта DataRow для нужной таблицы с помощью метода NewRow.

2. Затем присваиваются значения полям этой записи.

3. После этого запись включается в коллекцию записей Rows таблицы с помощью метода Add свойства Rows таблицы.

ЛИСТИНГ 5.2. Код программного ввода данных в объект DataTable

Private Sub AddData ()

 Dim dtDepartments As DataTable = dsEmployeeInfo.Tables ("Departments")

 Dim dtEmployees As DataTable = dsEmployeeInfo.Tables("Employees")

 ' Вставка четырех записей в таблицу Departments.

 Dim rowDept As DataRow

 rowDept = dtDepartments.NewRow

 rowDept("ID") = 11

 rowDept("DepartmentName") = "Administration"

 dtDepartments.Rows.Add(rowDept)

 rowDept = dtDepartments.NewRow rowDept("ID") = 22

 rowDept("DepartmentName") = "Engineering"

 dtDepartments.Rows.Add(rowDept)

 rowDept = dtDepartments.NewRow

 rowDept("ID") = 33

 rowDept("DepartmentName") = "Sales"

 dtDepartments.Rows.Add(rowDept)

 rowDept = dtDepartments.NewRow rowDept("ID") =44

 rowDept("DepartmentName") = "Marketing"

 dtDepartments.Rows.Add(rowDept)

 ' Вставка трех записей в таблицу Employees.

 Dim rowEmployee As DataRow

 rowEmployee = dtEmployees.NewRow

 rowEmployee("FirstName") = "Jackie"

 rowEmployee("LastName") = "Goldstein"

 rowEmployee("DepartmentID") = 22

 dtEmployees.Rows.Add(rowEmployee)

 rowEmployee = dtEmployees.NewRow

 rowEmployee("FirstName") = "Jeffrey"

 rowEmployee("LastName") = "McManus"

 rowEmployee("DepartmentID") = 33

 dtEmployees.Rows.Add(rowEmployee)

 rowEmployee = dtEmployees.NewRow

 rowEmployee("FirstName") = "Sam"

 rowEmployee("LastName") = "Johnson"

 rowEmployee("DepartmentID") = 33

 dtEmployees.Rows.Add(rowEmployee)

End Sub

НА ЗАМЕТКУ

Новую запись можно вставить в таблицу, передавая методу Add массив объектов, содержащих данные в порядке следования полей в определении таблицы. В листинге 5.2 этот способ мог быть представлен так:

Dim empData(2) As Object

empData(0) = "Sam"

empData(1) = "Johnson"

empData(3) = 33

dtEmployees.Rows.Add(empData)

 

Обновление данных в объекте DataSet

 

Для обновления отдельной записи таблицы необходимо просто организовать доступ к нужной записи и присвоить новое значение одному из полей. Например, для изменения номера отдела, к которому относится Sam Johnson, можно использовать следующую строку кода:

dtEmployees.Rows(2) ("DepartmentID") = 2

НА ЗАМЕТКУ

В этой строке кода номер записи (2) приводится из предположения, что нам известно расположение записей в таблице. Но с практической точки зрения этот способ не совсем удачен, более эффективный и безопасный способ основан на поиске нужной строки (или нескольких строк). Он описывается в разделе о доступе к данным в объекте DataTable далее в главе.

Таким образом, в данные можно вносить произвольное количество изменений, но все они не будут зафиксированы до тех пор, пока не будет вызван метод AcceptChanges. Для отката изменений, внесенных после загрузки данных или последнего вызова метода AcceptChanges, используется метод RejectChanges.

НА ЗАМЕТКУ

Метод AcceptChanges (и метод RejectChanges) можно использовать на нескольких разных уровнях, т.е. в классах DataTable, DataSet и DataRow. Вызов метода AcceptChanges объекта DataSet приведет к вызову этого метода для каждой таблицы объекта DataSet. Аналогично вызов метода AcceptChanges DataTable приведет к вызову этого метода для каждой записи объекта DataTable. Таким образом можно зафиксировать изменения отдельно для каждой записи или сразу для всех данных объекта DataSet. To же самое относится к методу RejectChanges.

Строки можно вставлять и удалять целиком. До сих пор был показан только процесс создания записей, а удаление записи основано на методе Remove объекта DataRowCollection (т.е. свойство Rows объекта DataTable). Этот метод полностью удаляет запись из коллекции. Другой способ удаления записи основан на методе Delete объекта DataRow. Этот метод отмечает запись для удаления, которое на самом деле произойдет только после вызова метода AcceptChanges.

После вызова метода Remove все данные записи будут удалены необратимо, даже если после этого вызвать метод RejectChanges.

 

Состояние и версия записи

Каждый объект DataRow имеет свойство RowState, которое обозначает текущее состояние или статус записи. Кроме того, каждая запись хранит информацию о четырех разных версиях своего значения. По мере редактирования записи изменяется ее состояние и версия значения. В табл. 5.1 приведено краткое описание свойства RowState, а в табл. 5.2 – краткое описание свойства DataRowVersion.

Таблица 5 1. Свойство RowState

Член перечисления Описание
Unchanged Никаких изменений не внесено с момента последнего вызова метода AcceptChanges или после загрузки данных с помощью объекта DataAdapter
Added Запись вставлена в коллекцию DataRowCollection (т.е. в свойство Rows объекта DataTable), но метод AcceptChanges еще не вызывался
Deleted Метод Delete вызван для удаления записи, но метод AcceptChanges еще не вызывался
Modified Запись изменена, но метод AcceptChanges еще не вызывался
Detached Запись создана, но не добавлена в коллекцию DataRowCollection, либо метод Remove вызван для удаления записи из коллекции DataRowCollection, либо метод Delete вызван для удаления записи и вызван метод AcceptChanges  

Таблица 5.2. Свойство DataRowVersion

Член перечисления Описание
Original Исходные значения записи. Эта версия не существует для строки со значением Added свойства состояния записи RowState
Current Текущее (возможно измененное) значение записи. Эта версия не существует для строки со значением Deleted свойства состояния записи RowState
Default Используемая по умолчанию версия записи, которая зависит от текущего состояния записи. Если состояние записи RowState имеет значение Deleted, то по умолчанию используется версия Original, если значение Detached – версия Proposed. Во всех остальных случаях по умолчанию используется версия Current
Proposed Предлагаемое значение записи. Эта версия существует только во время редактирования (начинается с вызова метода BeginEdit и заканчивается вызовами методов EndEdit или CancelEdit) либо для записи, которая еще не включена в коллекцию DataRowCollection  

Если запись находится в состоянии Deleted в момент вызова метода AcceptChanges, то она удаляется из коллекции DataRowCollection. В противном случае версия записи Original обновляется версией Current, а состояние записи становится равным Unchanged.

НА ЗАМЕТКУ

Поскольку все четыре версии записей возможны далеко не всегда, то можно вызвать метод HasVersion для объекта DataRow, чтобы проверить конкретную версию в текущем состоянии. Методу HasVersion передается значение одного из членов перечисления DataRowVersion, а он возвращает логическое значение, которое указывает, существует ли данная версия.

Наоборот, если запись находится в состоянии Added в момент вызова метода RejectChanges, то запись удаляется из коллекции DataRowCollection. В противном случае версия записи Current обновляется версией Original, а состояние записи становится равным Unchanged.

НА ЗАМЕТКУ

Доступ к версии поля DataRow (при условии, что она существует) можно получить, указывая нужную версию в качестве второго параметра для метода объекта DataRow при явном или неявном вызове этого метода:

dtEmployees.Rows(2).Item("lastname", DataRowVersion.Proposed)

или

dtEmployees.Rows(2)("lastname", DataRowVersion.Original)

Здесь следует особое внимание обратить на версию Proposed объекта DataRow. При вызове метода BeginEdit объекта DataRow обычные действия и события приостанавливаются, что позволяет пользователю вносить несколько изменений в запись, не применяя правил проверки вводимых значений. В этом режиме вносимые изменения отражаются не в версии Current, а в версии Proposed. И только после вызова метода EndEdit значения версии Proposed становятся (переносятся) значениями версии Current. Любые изменения можно отменить, вызывая метод CancelEdit до вызова метода EndEdit. Учтите, что изменения будут зафиксированы только после вызова метода AcceptChanges.

 

Обработка ошибок ввода данных в записи и поля

В модели ADO.NET предусмотрен гибкий механизм определения и обработки ошибок ввода данных в записи и поля объекта DataTable. Этот механизм позволяет использовать в приложении правила проверки вводимых данных, сообщать об обнаруженных ошибках, но откладывать их исправление до определенного момента в потоке выполнения приложения. (Не путайте их с обычными системными исключительными ситуациями времени выполнения, которые обрабатываются стандартными конструкциями платформы.NET Framework на основе операторов Try-Catch-Finally.)

Если приложение обнаруживает ошибку ввода данных, то оно создает описание найденной ошибки для записи или отдельного поля. Для обозначения наличия ошибки в отдельной записи используется свойство RowError объекта DataRow, например ему присваивается строка с комментарием "Something wrong here" (Здесь произошла какая-то ошибка).

myDataRow.RowError = "Something wrong here"

А для обозначения наличия ошибки в отдельном поле используется метод SetColumnError объекта DataRow, например с его помощью присваивается строка с комментарием "Bad data in this column" (Неверные данные в этом поле).

myDataRow.SetColumnError (2, "Bad data in this column")

Для извлечения строк с сообщениями о таких ошибках в полях или записях можно использовать свойство RowError или вызвать метод GetColumnError. Для сброса значения свойства RowError нужно присвоить ему пустую строку (" ") или использовать метод ClearErrors объекта RowError, который очищает свойство RowError и удаляет все сообщения об ошибках, заданные методом SetColumnError.

Объект DataRow содержит свойство HasErrors, которое имеет значение True, если в поле или записи обнаружены какие-либо ошибки. Значение этого свойства отображается на свойство HasErrors объекта DataTable, которое при наличии ошибок в поле или записи также равно True. Аналогично, если свойство HasErrors для любой таблицы DataTable объекта DataSet имеет значение True, то значение свойства HasErrors объекта DataSet также равно True. Метод GetErrors объекта DataTable возвращает массив объектов DataRow, которые содержат ошибки. В целом этот простой механизм позволяет быстро определить любые ошибки ввода данных, как показано в листинге 5.3.

Листинг 5.3. Пример обнаружения ошибок во всех таблицах объекта DataSet

Private Sub ResolveErrors(myDataSet as DataSet)

 Dim rowsWithErrors() As DataRow

 Dim myTable As DataTable

 Dim myCol As DataColumn

 Dim currRow As Integer

 For Each myTable In myDataSet.Tables

  If myTable.HasErrors Then

   ' Извлечение всех записей с ошибками.

   RowsWithErrors = myTable.GetErrors()

   For currRow = 0 To rowsWithErrors.GetUpper

    For Each myCol In myTable.Columns

     ' Найти поля с ошибками и выбрать

     ' способ их обработки.

     ' Ошибка в поле извлекается с помощью метода

     ' rowsWithErrors(currRow).GetColumnError(myCol)

    Next

    ' очистка ошибок.

    rowsWithErrors(currRow).ClearErrors

   Next currRow

  End If

 Next

End Sub

 

Доступ к данным с помощью объекта DataTable

 

Поскольку объект DataSet и содержащийся в нем объект DataTable всегда наполнены данными и не подключены к источнику данных, метод доступа к записям данных в них существенно отличается от методов доступа в ADO и других моделях доступа к данным (например, ODBC, DAO или RDO). Поскольку все данные доступны одновременно, в модели ADO.NET не существует понятия текущей записи. Поэтому нет никаких свойств или методов для перемещения от одной записи к другой. Каждый объект DataTable имеет свойство Rows, которое является набором объектов DataRow. Доступ к отдельному объекту осуществляется с помощью индекса или оператора For Each. Таким образом, в модели ADO.NET предлагается более простой и эффективный способ доступа и перемещения, аналогичный доступу к элементам массива.

В листинге 5.4 показан код подпрограммы DisplayDataSet, которая отображает содержимое ранее созданных таблиц с загруженными в них данными. В ней применяется циклический обход всех элементов коллекции, т.е. коллекций Rows и Columns, для отображения содержимого таблицы Employees. Далее используется альтернативный метод доступа к записям и полям с помощью числового индекса для отображения содержимого таблицы Departments.

ЛИСТИНГ 5.4. Код отображения данных в объектах DataTable

Private Sub DisplayDataSet()

 Dim dr As DataRow

 Dim dc As DataColumn

 Me.lstOutput.Items.Add("DISPLAY DATASET")

 Me.lstOutput.Items.Add("============")

 ' Отображение данных из таблицы Employees.

 For Each dr In dsEmployeeInfo.Tables("Employees").Rows

  For Each dc In _

   dsEmployeeInfo.Tables("Employees").Columns

   Me.lstOutput.Items.Add( _

    dc.ColumnName & ": " & dr(dc))

  Next

  Me.lstOutput.Items.Add ("============")

 Next

 Me.lstOutput.Items.Add("")

 ' Отображение данных из таблицы Departments.

 ' Пример использования индексов вместо оператора For Each.

 Dim row As Integer

 Dim col As Integer

 For row = 0 To dsEmployeeInfo.Tables("Departments").Rows.Count – 1

  For col = 0 To dsEmployeeInfo.Tables("Departments").Columns.Count – 1

   Me.lstOutput.Items.Add( _

    dsEmployeeInfo.Tables("Departments").Columns(col).ColumnName & ":" & _

    dsEmployeeInfo.Tables("Departments").Rows(row)(col))

  Next col

  Me.lstOutput.Items.Add("============")

 Next row

End Sub

Аналогично можно создать подпрограмму более общего типа для обхода не только записей и полей, но и таблиц объекта DataSet, как показано в листинге 5.5.

ЛИСТИНГ 5.5. Код обхода таблиц из объекта DataSet

Private Sub DisplayDataSet(ByVal ds As DataSet)

 ' Общая подпрограмма для отображения содержимого объекта DataSet.

 ' Отображаемый объект DataSet передается как параметр.

 Dim dt As DataTable

 Dim dr As DataRow

 Dim dc As DataColumn

 Me.lstOutput.Items.Add("DISPLAY DATASET")

 Me.lstOutput.Items.Add("============")

 For Each dt In ds.Tables

  Me.lstOutput.Items.Add(")

  Me. lstOutput.Items.Add("TABLE: " & dt.TableName)

  Me.lstOutput.Items.Add(" ")

  For Each dr In dt. Rows

   For Each dc In dt.Columns

    Me.lstOutput.Items.Add(dc.ColumnName S ": " & dr(dc))

   Next

   Me.lstOutput.Items.Add ("============")

  Next

 Next dt

End Sub

Обратите внимание, что здесь перегружается уже упомянутый ранее метод DisplayDataSet, который теперь принимает в качестве параметра объект DataSet.

Попробуйте запустить полученное приложение; для этого введите упомянутый ранее код в проект DataSetCode и щелкните на кнопке Create DataSet. В результате этого действия создается объект DataSet и наполняется данными, которые затем отображаются в текстовом поле формы, как показано на рис. 5.2.

РИС. 5.2. Результат создания объекта DataSet с таблицами Employees и Departments, наполнения их данными и последующего отображения

НА ЗАМЕТКУ

Для проверки обобщенной версии подпрограммы DisplayDataSet в подпрограмме btnCreateDS_Click следует заменить вызов ее исходной версии DisplayDataSet новой перегруженной версией DisplayDataSet(dsEmployeeInfо) с параметром dsEmployeeInfo.

 

Поиск, фильтрация и сортировка записей

Иногда нужно работать не со всеми, а только с некоторыми записями объекта DataSet, например с одной записью или подмножеством всех записей. Для этого можно использовать методы Find и Select.

Метод Find принадлежит свойству DataRowCollection объекта DataTable, который используется для поиска и возвращения единственной строки, указанной с помощью значения первичного ключа таблицы.

Перед использованием метода Find для обнаружения некоторой строки в таблице Departments, которая определена в листинге 5.1, нужно определить первичный ключ таблицы. Это можно сделать с помощью присвоения одного или нескольких полей свойству PrimaryKey таблицы. (Даже если первичный ключ создан на основе единственного поля, свойство PrimaryKey таблицы является массивом объектов DataColumn.)

В приведенных ниже строках кода, которые следует добавить в конце подпрограммы CreateDataSet из листинга 5.1, первичный ключ таблицы Departments создается на основе поля DepartmentName.

Dim pk(0) As DataColumn

pk(0) = dtDepartments.Columns("DepartmentName")

dtDepartments.PrimaryKey = pk

НА ЗАМЕТКУ

При создании первичного ключа с помощью свойства PrimaryKey для объекта DataTable на основе одного поля для свойства AllowDBNull этого поля автоматически задается значение False, а для свойства Unique — значение True. А если первичный ключ создан на основе нескольких полей, то только для свойства AllowDBNull этих полей автоматически задается значение False.

После определения первичного ключа метод Find используется так, как показано ниже.

Dim desiredRow As DataRow

desiredRow = dtDepartments.Rows.Find("sales")

Здесь переменной desiredRow присваивается объект DataRow с указанным значением первичного ключа или значение Nothing, если такая запись не будет найдена.

Если первичный ключ таблицы основан на нескольких полях, то соответствующие значения первичного ключа передаются в виде элементов массива (типа Object) методу Find.

' Указание первичного ключа.

Dim pk(0) As DataColumn

pk(0) = dtEmployees.Columns("FirstName")

pk(1) = dtEmployees.Columns("LastName")

dtEmployees.PrimaryKey = pk

' Попытка поиска нужной записи.

Dim desiredRow As DataRow

Dim desiredValues (1) As Object

desiredValues(0) = "Sam"

desiredValues(1) = "Johnson"

desiredRow = dtEmployees.Rows.Find(desiredValues)

Метод Select объекта DataTable возвращает массив объектов DataRow. Возвращаемые строки могут соответствовать критерию фильтрования, порядку сортировки и/или спецификации состояния (объект DataViewRowState пространства имен System.Data).

Приведенный ниже код возвращает и отображает имена всех сотрудников с фамилией Johnson.

Dim selectedRows () As DataRow

selectedRows = dtEmployees.Select("LastName = 'Johnson'")

Dim i As Integer

For i = 0 to selectedRows.GetUpperBound(0)

 MessageBox.Show(selectedRows(i)("FirstName"))

Next

Для возврата записей, отсортированных в порядке убывания, можно отредактировать строку с методом Select так, как показано ниже.

selectedRows = dtEmployees. Select ("LastName = 'Johnson'", "FirstName DESC")

Наконец, указание состояния записи в качестве аргумента метода Select позволяет извлекать записи с определенной версией данных непосредственно в процессе их редактирования. Например, для извлечения всех исходных значений записей даже после их редактирования (но еще до вызова метода AcceptChanges) следует указать значение OriginalRows перечисления DataViewRowState, как показано ниже.

selectedRows = dtEmployees.Select(Nothing, Nothing, DataViewRowState.OriginalRows)

Для отбора вновь добавленных записей с фамилией Johnson следует указать значение Added перечисления DataViewRowState, как показано ниже.

selectedRows = dtEmployees. Select ("LastName = 'Johnson'", Nothing, DataViewRowState.Added)

А если нужно отобрать вновь добавленные записи с фамилией Johnson и отсортировать их по имени, то в таком случае следует использовать приведенный ниже код.

selectedRows = dtEmployees.Select("LastName = 'Johnson'", "FirstName DESC", DataViewRowState.Added)

В табл. 5.3 приведены все возможные варианты состояния записи, которые могут быть представлены членами перечисления DataViewRowState. Упомянутые здесь изменения связаны с последней загрузкой данных или вызовом метода АcсеptChanges.

Таблица 5.3. Члены перечисления DataViewRowState 

Член Описание
Added Вновь созданные записи
CurrentRows Все текущие записи (включая новые, измененные или неизмененные записи)
Deleted Все записи, отмеченные как удаленные
ModifiedCurrent Текущая версия измененной записи
ModifiedOriginal Исходная версия измененной записи
None Нет сведений
OriginalRows Все исходные записи, включая неизмененные и удаленные, кроме новых записей
Unchanged Все неизмененные записи 

 

Отношения между таблицами

Поскольку объект DataSet может содержать несколько таблиц, то вполне естественно, что между ними могут существовать какие-то отношения (по крайней мере, если речь идет о реляционных базах данных). В модели ADO.NET для этого предусмотрен объект DataRelation.

Объект DataRelation устанавливает соответствие между полями в двух таблицах, которые имеют родительско-дочерние отношения или связаны первичным и внешним ключами. Классический пример такого отношения существует между таблицами с данными о клиентах и с данными о заказах, где одна запись клиента может быть связана с несколькими записями его заказов. Запись клиента является родительской, а записи заказов — дочерними. Продолжим обсуждение этой темы на примере родительской таблицы  Department и дочерней таблицы Employees, которые находятся в одном объекте  DataSet.

Объект DataRelation выполняет две разные функции.

• Позволяет переходить от одной связанной таблицы к другой и обратно, т.е. при работе с родительской записью можно получить доступ к ее дочерним записям, а при работе с дочерней записью — доступ к ее родительской записи.

• Позволяет задавать и поддерживать ссылочную целостность, например каскадные обновления данных в связанных таблицах при выполнении каких-либо изменений в любой из связанных таблиц.

Продолжим работу с упомянутым ранее проектом DataSetCode.

1. Создайте новую кнопку непосредственно под кнопкой Create DataSet, перетаскивая ее из панели элементов управления.

2. В окне свойств Properties укажите значение btnCreateRelations для свойства (Name) и значение Create Relations для свойства Text.

3. Вставьте код, показанный в листинге 5.6.

Листинг 5.6. Код создания и отображения отношений между таблицами

Private Sub btnCreateRelations_Click( _

 ByVal sender As System.Object, _

 ByVal e As System.EventArgs) Handles btnCreateRelations.Click

 Dim As DataRelation

 CreateDataSet()

 ' Создание отношения между таблицами Departments и Employees.

 rel = dsEmployeeInfо.Relations.Add(_

  "relDepartmentEmployees", _

  dsEmployeeInfo.Tables("Departments").Columns("ID"), _

  dsEmployeeInfo.Tables("Employees").Columns("DepartmentID"))

 DisplayRelations(dsEmployeeInfo)

End Sub

Private Sub DisplayRelations(ByVal ds As DataSet)

 Dim rel As DataRelation

'  Вывод имен полей созданного отношения.

 Me.lstOutput.Items.Add("")

 Me.lstOutput.Items.Add("DISPLAY RELATIONS")

 For Each rel In ds.Relations

  ' Вывод имени отношения.

  Me.lstOutput.Items.Add("NAME: " & rel.RelationName)

  ' Вывод имени родительской таблицы и ее поля,

  ' которое входит в созданное отношение.

  Me.IstOutput.Items.Add("PARENT: " & _

   rel.ParentTable.ToString & " – " & _

   rel.ParentColumns(0).ColumnName)

  ' Вывод имени дочерней таблицы и ее поля,

  ' которое входит в созданное отношение.

  Me.lstOutput.Items.Add("CHILD: " & _

   rel.ChildTable.ToString & " – " & _

   rel.ChildColumns(0).ColumnName)

 Next

 Me.lstOutput.Items.Add("")

End Sub

Сначала нужно создать объект DataRelation. Каждый объект DataSet содержит коллекцию отношений, которая доступна как свойство этого объекта Relations. Это свойство имеет тип DataRelationCollection и поддерживает несколько перегруженных версий метода Add. Версия, использованная в листинге 5.6, принимает три аргумента: имя отношения, ссылку на объект DataColumn в родительской таблице, а также ссылку на объект DataColumn в дочерней таблице. Если отношение между таблицами охватывает более одного поля, то следует использовать другую версию метода Add с аргументами-массивами объектов DataColumn.

Подпрограмма DisplayRelations циклически обходит все отношения свойства Relations объекта DataSet и выводит в текстовом поле имя отношения, имя родительской таблицы и ее поле, которое входит в созданное отношение, а также имя дочерней таблицы и ее поле, которое входит в созданное отношение.

НА ЗАМЕТКУ

Для создания более обобщенной версии подпрограммы DisplayRelations можно было бы вставить код циклического обхода всех полей в свойствах-массивах РаrentColumns и ChildColumns, а не просто отображать их первые элементы.

После компоновки проекта DataSetCode и запуска полученного приложения щелкните на кнопке Create Relations, и в текстовом поле будет выведена информация о вновь созданном отношении между таблицами Employees и Departments.

Кроме коллекции Relations объекта DataSet, которая содержит все отношения, определенные между таблицами объекта DataSet, каждый объект DataTable также содержит две коллекции отношений (т.е. два свойства): ParentRelations и ChildRelations, которые содержат отношения между данным объектом DataTable и связанной с ним другой (дочерней или родительской) таблицей.

После создания отношения между таблицами можно организовать доступ к связанным данным в них. Начните с создания кнопки и вставки кода, приведенного в листинге 5.7.

1. Создайте новую кнопку непосредственно под кнопкой Create Relations, перетаскивая ее из панели элементов управления.

2. В окне свойств Properties укажите значение btnChildRows для свойства (Name) и значение Child Rows для свойства Text.

3. Вставьте код, показанный в листинге 5.7.

Листинг 5.7. Код отображения родительских и дочерних данных из связанных таблиц

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

 ByVal e As System.EventArgs) Handles btnChildRows.Click

 Dim rel As DataRelation CreateDataSet()

 AddData()

 ' Создание отношения между таблицами Departments и Employees

 rel = dsEmployeeInfо.Relations.Add("relDepartmentEmployees", _

  dsEmployeeInfo.Tables("Departments").Columns("ID"), _

  dsEmployeeInfo.Tables("Employees").Columns("DepartmentID"))

 DisplayChildRows(dsEmployeeInfo.Tables("Departments"))

End Sub

Private Sub DisplayChidRows(ByVal dt As DataTable)

 Dim rel As DataRelation

 Dim relatedRows() As DataRow

 Dim row As DataRow

 Dim col As DataColumn

 Dim i As Integer

 Dim rowData As String

 Me.lstOutput.Items.Add("")

 Me.lstOutput.Items.Add("CHILD ROWS")

 For Each row In dt.Rows

  For Each rel In dt.ChildRelations

   Me.lstOutput.Items.Add(_

    dt.TableName & ": " & _

    rel.ParentColumns(0).ColumnName & _

    "= " & row(rel.ParentColumns(0).ToString))

   relatedRows = row.GetChildRows(rel)

   ' Вывод значений записей.

   For i = 0 To relatedRows.GetUpperBound(0)

    rowData = "****" & _

     rel.ChildTable.TableName & ":"

    For Each col In rel.ChildTable.Columns

     rowData = rowData & " " & _

     relatedRows(i)(col.ToString)

    Next col

    Me.lstOutput.Items.Add(rowData)

   Next i

  Next rel

 Next row

End Sub

Подпрограмма btnChildRows_Click для обработки щелчков на кнопке Child Rows сначала создает объект DataSet и объекты DataTable с помощью подпрограммы CreateDataSet (код которой приведен в листинге 5.1), а затем наполняет их данными с помощью подпрограммы AddData (код которой приведен в листинге 5.2). После этого между таблицами Employees и Departments создается отношение с помощью кода, который приведен в листинге 5.6. Наконец, для вывода данных из записей в текстовом поле формы вызывается подпрограмма DisplayChildRows, которой в качестве аргумента (родительской таблицы) передается таблица Departments.

Подпрограмма DisplayChildRows содержит трижды вложенный цикл для отображения всех полей из каждой связанной дочерней таблицы (в данном случае только одной) для каждой записи родительской таблицы. При этом каждая запись родительской таблицы передается циклу как аргумент, происходит обход всех отношений, определенных в свойстве ChildRelations таблицы, отображается имя таблицы, имя поля в родительской таблице, а также значение поля в текущей записи. Затем вызывается метод GetChildRows с текущим отношением в качестве аргумента и возвращается массив объектов DataRow, содержащих дочерние записи. Для каждой записи отображаются все поля с префиксами в виде четырех звездочек и имени дочерней таблицы.

НА ЗАМЕТКУ

Некоторые версии метода GetChildRows принимают дополнительный аргумент, который указывает на используемую версию возвращаемых записей с помощью членов перечисления DataRowVersion из табл. 5.2. Аналогичные методы предусмотрены для извлечения родительской записи (или нескольких родительских записей) по заданной дочерней записи.

Здесь у читателя может возникнуть вопрос: почему упоминается несколько родительских записей? Разве дочерняя запись может иметь несколько родительских записей? Дело в том, что кроме родительских полей, заданных на основе полей с уникальными значениями, могут создаваться родительские поля на основе полей с повторяющимися значениями. Поэтому в таких случаях вместо одной родительской записи (GetParentRow) приходится извлекать несколько родительских (GetParentRows).

РИС. 5.3. Результаты отображения родительских и дочерних записей из таблиц Employees и Departments

После компоновки проекта DataSetCode и запуска полученного приложения щелкните на кнопке Child ROWS, и в текстовом поле будут выведены значения всех родительских записей из таблицы Employees для каждой родительской записи из таблицы Departments (рис. 5.3).

 

Ограничения

Ограничениями называются правила, которые вводятся для поддержания целостности данных в таблице. В модели ADO.NET применяется два типа ограничений целостности данных: UniqueConstraint и ForeignKeyConstraint. Ограничение UniqueConstraint гарантирует, что все значения в указанных полях будут уникальны в рамках всей таблицы. Ограничение ForeignKeyConstraint определяет связь на основе первичного и внешнего ключа в двух таблицах и выполняемые действия в случае добавления, удаления или изменения родительской записи (т.е. первичного ключа). При нарушении заданных ограничений генерируется исключительная ситуация.

Учтите, что ограничения применяются только тогда, когда свойство EnforceConstraints объекта DataSet имеет значение True, которое используется по умолчанию.

Хотя ограничения можно создавать непосредственно, довольно часто они создаются косвенно. Фактически в приведенном ранее примере уже было создано несколько ограничений. Объект UniqueConstraint автоматически создается и включается в коллекцию Constraints объекта DataTable, если для свойства Unique объекта DataColumn задано значение True. Кроме того, объекты UniqueConstraint и ForeignKeyConstraint автоматически создаются при создании отношения между двумя таблицами. В таком случае объект UniqueConstraint создается для связанных полей в родительской таблице, а объект ForeignKeyConstraint — для связанных полей в дочерней таблице.

НА ЗАМЕТКУ

Конечно, объект DataRelation можно создать без определения ограничений, но эффективность такого способа весьма спорна.

Для создания и отображения ограничений таблиц используемого объекта DataSet в данном примере создадим еще одну кнопку и вставим код, приведенный в листинге 5.8.

1. Создайте новую кнопку непосредственно под кнопкой Child ROWS, перетаскивая ее из панели элементов управления.

2. В окне свойств Properties укажите значение btnConstraints для свойства (Name) и значение Constraints для свойства Text.

3. Вставьте код, показанный в листинге 5.8.

Листинг 5.8. Код отображения ограничений

Private Sub btnConstraints_Click(ByVal sender As _

 System.Object, ByVal e As System.EventArgs) _

 Handles btnConstraints.Click

 Dim dt As DataTable Dim rel As DataRelation

 CreateDataSet()

 ' Создание отношения между таблицами Departments и Employees.

 rel = dsEmployeeInfo.Relations.Add(_

  "relDepartmentEmployees", _

  dsEmployeeInfo.Tables("Departments").Columns("ID"), _

  dsEmployeeInfo.Tables("Employees").Columns("DepartmentID"))

 For Each dt In dsEmployeeInfo.Tables

  DisplayConstraints(dt)

 Next dt

End Sub

Private Sub DisplayConstraints(ByVal dt As DataTable)

 Dim i As Integer

 Dim cs As Constraint

 Dim uCS As UniqueConstraint

 Dim fkCS As ForeignKeyConstraint

 Dim columns() As DataColumn

 Me.lstOutput.Items.Add("")

 Me.lstOutput.Items.Add( _

  "CONSTRAINTS FOR TABLE: " & dt.TableName)

 Me.lstOutput.Items.Add( _

 "====================================")

 For Each cs In dt.Constraints

  Me.lstOutput.Items.Add( _

   "Constraint Name: " & cs.ConstraintName)

  Me.lstOutput.Items.Add( _

   "Type: " & cs.GetType().ToString())

  If TypeOf cs Is UniqueConstraint Then

   uCS = CType(cs, UniqueConstraint)

   ' Обработка полей в виде массива

   columns = uCS.Columns

   ' Вывод имен полей.

   For i = 0 То columns.Length – 1

    Me.lstOutput.Items.Add( _

     "Column Name: " & columns(i).ColumnName)

   Next i

  ElseIf TypeOf cs Is ForeignKeyConstraint Then

   fkCS = CType(cs, ForeignKeyConstraint)

   ' Обработка дочерних полей и вывод их имён

   columns = fkCS.Columns

   For i = 0 To columns.Length – 1

    Me.lstOutput.Items.Add( _

     "Column Name: " & columns(i).ColumnName)

   Next i

   ' Вывод имени связанной родительской таблицы.

   Me.lstOutput.Items.Add( _

    "Related Table Name: " & _

    fkCS.RelatedTable.TableName)

   ' Обработка связанных родительских полей и вывод их имен

   columns = fkCS.RelatedColumns

   For i = 0 То columns.Length – 1

    Me.lstOutput.Items.Add( _

    "Related Column Name: " & _

    columns(i).ColumnName)

   Next i

  End If

  Me.lstOutput.Items.Add("====================================")

 Next cs

End Sub

Подпрограмма btnConstraints_Click обрабатывает щелчки на кнопке Constraints: создает объекты DataSet, DataTable и DataRelation (с помощью кода из прежних листингов), а затем вызывает подпрограмму DisplayConstraints для отображения информации о созданных ограничениях.

Подпрограмма общего типа DisplayConstraints принимает в качестве параметра объект DataTable и отображает информацию об ограничениях указанной таблицы. Для этого выполняется циклический обход всех членов свойства-коллекции Constraints указанной таблицы. Каждое найденное ограничение проверяется, т.е. выясняется, имеет ли оно тип UniqueConstraint или ForeignKeyConstraint. Оба они являются производными классами от класса Constraint, поэтому могут сосуществовать в рамках одной типизированной коллекции. Однако эти объекты все же обладают разным набором свойств, поэтому разработчику потребуется идентифицировать тип ограничения в коллекции и преобразовать его к соответствующему уточненному типу. Для ограничения UniqueConstraint отображаются имена всех (одного или нескольких) полей, определенных в данном ограничении. А для ограничения ForeignKeyConstraint отображается имя связанной родительской таблицы вместе с именами всех (одного или нескольких) связанных полей в этой таблице.

РИС. 5.4. Результаты отображения информации о созданных ограничениях для таблиц Employees и Departments

После компоновки проекта DataSetCode и запуска полученного приложения щелкните на кнопке Constraints, и в текстовом поле будет выведена информация о созданных ограничениях (рис. 5.4). Учтите, что все три показанных ограничения (одно для таблицы Employees и два для таблицы Departments) созданы автоматически, так как во время создания отношения между таблицами для свойства Unique объекта DataColumn задано значение True.

Объект ForeignKeyConstraint имеет три свойства-правила, которые управляют действиями, предпринимаемыми при редактировании данных в связанных таблицах. Например, свойства UpdateRule и DeleteRule определяют действия, выполняемые при обновлении и удалении записей в родительской таблице. Эти свойства могут принимать одно из значений перечисления Rule, члены которого описаны в табл. 5.4.

Таблица 5.4. Члены перечисления Rule 

Член перечисления Описание
Cascade Удаление или обновление данных в родительской записи также выполняется для связанных дочерних записей. Это значение используется по умолчанию
None Удаление или обновление данных в родительской записи не выполняется для связанных дочерних записей. Это может привести к появлению дочерних записей, которые ошибочно ссылаются на отсутствующие родительские записи
SetDefault Удаление или обновление данных в родительской записи не выполняется для связанных дочерних записей, но для них задается используемое по умолчанию значение, указанное в свойстве DefaultValue
SetNull Удаление или обновление данных в родительской записи не выполняется для связанных дочерних записей, но для них задается значение DBNull

Еще одно свойство AcceptRejectRule может принимать значения Cascade (или None) при вызове метода AcceptChanges (или RejectChanges) для связанных дочерних записей. По умолчанию для него используется значение Cascade, которое указывает на автоматический вызов методов AcceptChanges или RejectChanges для дочерних записей при вызове этих методов для связанной с ними родительской записи. Если свойство AcceptRejectRule имеет значение None, то вызов одного из этих двух методов для родительской записи никак не повлияет на связанные с ней дочерние записи.

 

Применение объекта DataSet

Панель элементов управления Data среды Visual Studio .NET содержит компонент DataSet, который позволяет задавать значения свойств для набора данных с помощью окна свойств Properties вместо создания специального кода. Этот способ работы с компонентом DataSet аналогичен способам работы с компонентами Connection и Command, которые описываются в главе 4, "Модель ADO.NET: провайдеры данных". Задайте конфигурацию объекта DataSet и связанных с ними объектов с теми же определениями, которые используются в приведенных ранее фрагментах кода.

Для этого выполните перечисленные ниже действия.

1. Создайте другую форму frmDataSetComponent в проекте DataSetCode.

2. В окне свойств Properties формы укажите значение DataSet для свойства Text и значение frmDataSetComponent для свойства (Name).

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

4. Создайте в форме поле со списком, перетаскивая его из панели элементов управления.

5. В окне свойств Properties поля со списком укажите значение lstOutput для свойства (Name).

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

7. Из панели элементов управления Data перетащите в форму компонент DataSet. В появившемся на экране диалоговом окне выберите переключатель Untyped dataset (Нетипизированный набор данных) и щелкните на кнопке OK. Этот компонент невидим во время выполнения приложения, поэтому в режиме создания приложения он будет находиться под формой.

8. В окне свойств Properties этого компонента укажите значение dsEmployeeInfо для свойства (Name).

9. В окне свойств Properties этого компонента выберите свойство Tables и щелкните на кнопке с многоточием в правой части этого свойства для отображения диалогового окна Tables Collection Editor (Редактор коллекции таблиц).

10. Щелкните на кнопке Add для отображения свойств первой таблицы создаваемого набора данных.

11. В панели свойств Table1 Properties укажите значение Employees для свойства TableName, как показано на рис. 5.5.

Рис. 5.5. Диалоговое окно Tables Collection Editor после указания таблицы Employees

12. В панели свойств Employees Properties выберите свойство Columns и щелкните на кнопке с многоточием в правой части этого свойства для отображения диалогового окна Columns Collection Editor (Редактор коллекции полей).

13. Щелкните на кнопке Add для отображения свойств первого поля таблицы Employees.

14. В панели свойств Column1 Properties укажите значение FirstName для свойства ColumnName первого поля.

15. Щелкните на кнопке Add для отображения свойств второго поля таблицы Employees.

16. В панели свойств Column1 Properties укажите значение LastName для свойства ColumnName второго поля.

17. Щелкните на кнопке Add для отображения свойств третьего поля таблицы Employees.

18. В панели свойств Column1 Properties укажите значение Department ID для свойства ColumnName и значение System.Int32 для свойства DataType третьего поля.

После выполнения этих действий диалоговое окно Columns Collection Editor будет выглядеть так, как показано на рис. 5.6.

Рис. 5.6. Диалоговое окно Columns Collection Editor со свойствами полей таблицы Employees

19. Щелкните на кнопке Close в диалоговом окне Columns Collection Editor, чтобы вернуться в диалоговое окно Tables Collection Editor для включения в набор данных dsEmployeeInfо еще одной таблицы Departments.

20. Щелкните на кнопке Add для отображения свойств второй таблицы набора данных dsEmployeeInfо.

21. В панели свойств Table1 Properties укажите значение Departments для свойства TableName второй таблицы.

22. Укажите значение 5 для свойства MinimumCapacity второй таблицы.

23. В панели свойств Departments Properties укажите свойство Columns и щелкните на кнопке с многоточием в правой части этого свойства для отображения диалогового окна Columns Collection Editor (Редактор коллекции полей).

24. Щелкните на кнопке Add для отображения свойств первого поля таблицы Departments.

25. Укажите значение ID для свойства СolumnName и значение System.Int32 для свойства DataType первого поля.

26. В панели свойств ID Properties укажите значение True для свойства Readonly, значение True для свойства Unique и значение True для свойства AutoIncrement первого поля.

27. Щелкните на кнопке Add для отображения свойств второго поля таблицы Departments.

28. В панели свойств Column1 Properties укажите значение DepartmentName для свойства ColumnName.

29. В панели свойств DepartmentName Properties укажите значение True для свой ства Unique и значение False для свойства AllowDBNull первого поля.

30. Щелкните на кнопке Close в диалоговом окне Columns Collection Editor для возвращения в диалоговое окно Tables Collection Editor, а затем щелкните еще раз на кнопке Close для закрытия диалогового окна Tables Collection Editor.

Итак, вы создали набор данных dsEmployeesInfo с таблицами Employees и Departments, указывая для свойств компонентов те же значения, которые использовались в коде из листинга 5.1.

Продолжим работу с этими компонентами и определим отношения между таблицами набора данных dsEmployeesInfo.

1. В окне свойств Properties компонента dsEmployeesInfo выберите свойство Relations, а затем щелкните на кнопке с изображением многоточия, чтобы отобразить на экране диалоговое окно Relations Collection Editor (Редактор коллекции отношений).

2. Щелкните на кнопке Add для отображения в диалоговом окне Relation свойств первого отношения между таблицами набора данных dsEmployeesInfo.

3. В текстовом поле Name диалогового окна Relation укажите значение relDepartmentEmployees свойства Name.

4. В текстовом поле ParentTable диалогового окна Relation выберите таблицу Departments свойства ParentTable.

5. В текстовом поле ChildTable диалогового окна Relation выберите таблицу Employees свойства ChildTable.

6. В поле со списком столбца Key Columns раздела Columns диалогового окна Relation выберите поле ID, в результате этого значение ID будет присвоено свойству ParentColumns объекта relDepartmentEmployees.

7. Аналогично в поле со списком столбца Foreign Key Columns раздела Columns диалогового окна Relation выберите поле DepartmentID, в результате значение DepartmentID будет присвоено свойству ChildColumns объекта relDepartmentEmployees.

8. Воспользуйтесь предлагаемыми по умолчанию значениями в списках Update rule (Правило обновления), Delete rule (Правило удаления) и Accept/Reject rule (Правило подтверждения/отказа), которые соответствуют свойствам UpdateRule, DeleteRule и AcceptRejectRule.

9. Щелкните на кнопке OK для закрытия диалогового окна Relation, а затем на кнопке Close для закрытия диалогового окна Relations Collection Editor.

Теперь остается указать значение свойства PrimaryKey для каждой таблицы.

1. В окне свойств Properties компонента dsEmployeesInfo выберите свойство Tables, а затем щелкните на кнопке с изображением многоточия, чтобы отобразить на экране диалоговое окно Tables Collection Editor.

2. В списке членов набора данных Members выберите таблицу Employees.

3. В панели свойств Employees Properties выберите свойство PrimaryKey и щелкните на кнопке с изображением стрелки в правой части этого свойства для развертывания списка полей.

4. Установите флажки для поля (или нескольких полей) первичного ключа из списка доступных полей. Если первичный ключ охватывает несколько полей, то выберите их в правильном порядке. В данном примере выберите сначала поле FirstName, а затем LastName, как показано на рис. 5.7.

РИС. 5.7. Выбор нескольких полей для определения первичного ключа

5. Нажмите клавишу для утверждения созданного первичного ключа.

6. В списке членов набора данных Members выберите таблицу Departments.

7. В панели свойств Departments Properties выберите свойство PrimaryKey и щелкните на кнопке с изображением стрелки в правой части этого свойства для развертывания списка полей.

8. Установите флажок для поля DepartmentName первичного ключа из списка доступных полей.

9. Щелкните на кнопке Close для закрытия диалогового окна Tables Collection Editor.

Чтобы убедиться в идентичности результатов, полученных в режиме создания компонентов, по сравнению с созданным ранее кодом скопируйте и вставьте некоторые подпрограммы из формы frmDataSets в форму frmDataSetComponent, а затем запустите полученное приложение, выполнив перечисленные ниже действия.

1. Выберите и скопируйте подпрограмму AddData из формы frmDataSets в форму frmDataSetComponent.

2. Повторите п. 1 для подпрограмм DisplayDataSet и DisplayChildRows.

3. Включите следующий код в обработчик события загрузки формы frmDataSetComponent_Load в форме frmDataSetComponent:

Private Sub frmDataSetComponent_Load(ByVal sender As _

 System.Object, ByVal e As System.EventArgs) _

 Handles MyBase.Load

 AddData()

 DisplayDataSet()

 DisplayChildRows(dsEmployeelnfo.Tables("Departments"))

End Sub

4. Щелкните правой кнопкой мыши на проекте DataSetCode в окне Solution Explorer и выберите в контекстном меню команду Properties, чтобы открыть диалоговое окно DataSetCode Property Pages.

5. Выберите раздел General в папке Common Properties в правой части диалогового окна DataSetCode Property Pages, а затем выберите форму frmDataSetComponent в поле Startup object.

После запуска созданного приложения в поле со списком формы frmDataSetComponent будут отображены все данные набора dsEmployeeInfo и дочерние записи из таблицы Departments (рис. 5.8).

НА ЗАМЕТКУ

Анализируя код, сгенерированный при редактировании свойств в режиме создания компонентов, можно убедиться в том, что он очень похож созданный вручную код, описанный в предыдущих разделах. Для просмотра автоматически полученного кода нужно выбрать форму в окне Solution Explorer, щелкнуть правой кнопкой мыши, выбрать команду меню View Code в контекстном меню, а затем раскрыть раздел Windows Form Designer generated code. 

РИС. 5.8. Отображение всех данных набора dsEmployeeInfo и дочерних записей с помощью параметров объекта DataSet, заданных, в режиме создания компонентов

 

Резюме

В этой главе подробно описываются объекты и концепции, которые (вместе с материалом из главы 4, "Модель ADO.NET: провайдеры данных") являются ключевыми для методов создания приложений баз данных на основе ADO.NET и Visual Basic .NET. Здесь показано, как объект DataSet и связанные с ним объекты DataTable, DataRelation, DataRow и DataColumn предоставляют разработчикам гибкую и, мощную модель программирования для обработки данных при отключении от физического источника данных. В главе 6, "ADO.NET: объект DataAdapter", демонстрируются способы использования объекта DataAdapter для наполнения данными объекта DataSet и автоматического обновления источника данных при изменении данных в объекте DataSet.

 

Вопросы и ответы

Насколько я понял, источник данных можно использовать непосредственно (с помощью команд управления данными) или косвенно (в неподключенном стоянии). В каких случаях предпочтительнее использовать каждый из этих способов?

Метод на основе объекта DataSet (в неподключенном состоянии) по сравнению с непосредственным применением команд управления данными обладает несколькими преимуществами. Он предлагает более простой и единообразный способ перемещения данных между разными уровнями и местоположениями в распределенной базе данных, а также между разными приложениями баз данных благодаря встроенной поддержке языка XML. В нем предусмотрен механизм кэширования данных, что позволяет сортировать, фильтровать и искать данные без доступа к источнику данных. Наконец, он позволяет извлекать данные из нескольких таблиц или даже нескольких разных источников данных, а также манипулировать ими индивидуально или совместно на основе заданных между ними отношений.

Прямой способ доступа к источнику данных с помощью объекта Command также обладает определенными преимуществами. Некоторые операции, например изменение структуры базы данных, можно выполнить только с помощью прямого доступа. При прямом доступе даже стандартные команды SQL или хранимые процедуры могут быть выполнены быстрее и эффективнее, что позволяет добиться более высокой производительности и масштабируемости. Кроме того, этот способ позволяет сократить объем оперативной памяти для объекта DataSet, особенно при отсутствии насущной необходимости в кэшировании данных, например при создании Web-страницы или заполнении данными поля со списком.

Итак, когда же предпочтительнее использовать прямой доступ к базе данных вместо объекта DataSet? Прежде всего в тех случаях, когда операция может быть выполнена только с помощью объекта Command. Это относится к вызовам хранимых процедур, которые выполняют манипуляции с данными и возвращают только одно значение и/или значения параметров, а также к DDL-командам изменения структуры базы данных. Кроме того, не рекомендуется использовать объект DataSet, если данные используются только для чтения, используются недолго, а потому не оправданны их загрузка и хранение в оперативной памяти, либо используются сервером и их не нужно передавать на другие уровни приложения или компьютеры. В большинстве других случаев предпочтительнее обращаться к объекту DataSet.

 

ГЛАВА 6

ADO.NET: объект DataAdapter

 

При изучении объектов DataSet, DataTable, DataRelation, DataRow, DataColumn, DataRelation и Constraint в главе 5, "ADO.NET: объект DataSet", у читателя возможно не раз возникало желание воскликнуть: "А где же, собственно, сама база данных?". Действительно, до сих пор ничего не говорилось о способе загрузки данных в объект DataSet из базы данных или другого источника, а также о последующем обновлении источника данных в соответствии с изменениями данных в объекте DataSet. Именно эту задачу и выполняет объект DataAdapter.

Объект DataAdapter является промежуточным звеном между объектом DataSet и физическим источником данных. Он играет роль моста между двумя мирами ADO.NET: подключенным к источнику данных миром провайдеров данных .NET (которые рассматриваются в главе 4, "Модель ADO.NET: провайдеры данных") и неподключенным к источнику данных миром объектов DataSet (которые рассматриваются в главе 5, "ADO.NET: объект DataSet").

В структуре провайдеров данных .NET объект DataAdapter занимает центральное место. Каждый такой провайдер должен иметь собственную реализацию объекта DataAdapter (например, SqlDataAdapter, OleDbDataAdapter, OdbcDataAdapter и т.д.). Причина, по которой этот объект рассматривается только сейчас, заключается в том, что без понимания основных принципов работы с объектом DataSet и подчиненными объектами нельзя понять основные концепции работы с объектом DataAdapter. Теперь можно приступить к описанию объекта DataAdapter с учетом всех приведенных ранее сведений.

На рис. 6.1 показана схема использования объекта DataAdapter. Основным назначением этого объекта является управление процессом передачи данных от источника данных к объекту DataSet и от объекта DataSet к источнику данных. Это выполняется с помощью небольшого набора свойств и методов, которые описываются далее.

РИС. 6.1. Схема работы объекта DataAdapter — как моста между источником данных и объектом DataSet

Основными методами объекта DataAdapter являются Fill и Update. Метод Fill наполняет объект DataAdapter данными, полученными от источника данных, а метод Update обновляет источник данных в соответствии с изменениями данных в таблицах объекта DataSet.

Объект DataAdapter содержит набор из четырех свойств (Select Command, InsertCommand, UpdateCommand и DeleteCommand), которые являются объектами ADO.NET типа Command, конфигурированными для выполнения одноименных операций. Например, объект SelectCommand выполняется при вызове метода Fill объекта DataAdapter, а остальные объекты выполняются для каждой измененной записи при вызове метода Update объекта DataAdapter. Разработчики базы данных обладают полным контролем над этими командами, которые позволяют настраивать команды, используемые для операций вставки, обновления и удаления.

Наконец, коллекция TableMappings объектов DataTableMapping позволяет указать соответствие между таблицей источника данных и объектом DataTable.

 

Передача данных из источника данных в объект DataSet

Для использования объекта DataAdapter требуется, как минимум, подключение к базе данных и команда Select. Для этого можно использовать объекты Connection и Command, т.е. создать их, конфигурировать и присвоить их свойствам Connection и SelectCommand объекта DataAdapter. Однако гораздо удобнее использовать для этого конструктор объекта DataAdapter с двумя строковыми параметрами: один для команды SELECT, а второй для строки подключения, как показано ниже.

Dim da As SqlDataAdapter = New SqlDataAdapter( _

  "select * from tblDepartment" _

  "server=localhost;uid=sa;database=Novelty")

НА ЗАМЕТКУ

Учтите, что указанная в объекте SelectCommand команда SQL может иметь параметры. В главе 4, "Модель ADO.NET: провайдеры данных", приводятся основные сведения об определении этих параметров для разных провайдеров данных .NET.

Попробуем теперь вызвать метод Fill для извлечения данных из базы данных Novelty и загрузки их в объект DataSet. Для этого вернитесь к проекту DataSetCode из главы 5, "ADO.NET: объект DataSet", и выполните перечисленные ниже действия.

1. Щелкните правой кнопкой мыши на проекте DataSetCode в окне Solution Explorer и выберите в контекстном меню команду Properties, чтобы открыть диалоговое окно DataSetCode Property Pages.

2. Выберите раздел General в папке Common Properties в правой части диалогового окна DataSetCode Property Pages, а затем выберите форму frmDataSets в поле Startup object.

3. Откройте форму frmDataSets в окне конструктора формы. 

4. Создайте новую кнопку непосредственно под кнопкой Constraints, перетаскивая ее из панели элементов управления.

5. В окне свойств Properties укажите значение btnDataAdapterFill для свойства (Name) и значение DataAdapter Fill для свойства Text.

6. Для использования провайдера данных SqlClient нужно импортировать его пространство имен с помощью команды, отмеченной полужирным начертанием в следующем фрагменте кода:

Imports System

Imports System.Data

Imports System.Data.SqlClient

7. Вставьте код, показанный в листинге 6.1.

Листинг 6.1. Использование провайдера данных SqlClient для вставки данных В Набор данных dsEmployeeInfо

Private Sub btnDataAdapterFill_Click(ByVal sender As _

 System.Object, ByVal e As System.EventArgs) _

 Handles btnDataAdapterFill.Click

 ReadData()

End Sub

Private Sub ReadData()

 Dim rows As Integer

 Dim daDepartments As SqlDataAdapter = New SqlDataAdapter( _

  "select * from tblDepartment", _

  "server=localhost;uid=sa;database=novelty")

 dsEmployeeInfo = New DataSet()

 rows = daDepartments.Fill(dsEmployeeInfo, "Departments")

 DisplayDataSet(dsEmployeeInfo)

End Sub

После создания объекта daDepartments с двумя аргументами, которые содержат команду Select и строку подключения, вызывается метод Fill для наполнения данными таблицы Departments набора данных dsEmployeeInfo. Метод Fill также возвращает количество записей, которые включены (или обновлены) в набор данных dsEmployeeInfo. При выполнении метода Fill провайдером данных неявно выполняются перечисленные ниже действия.

• Для объекта SelectCommand открывается подключение к источнику данных, если оно еще не открыто.

• Выполняется команда, указанная в свойстве CommandText объекта SelectCommand (вместе с параметрами, если таковые имеются).

• Создается объект DataReader для возвращения имен полей и типов, использованных для создания нового объекта DataTable в указанном наборе данных DataSet, если этого объекта еще не существует.

• Объект DataReader используется для извлечения данных и вставки их в таблицу.

• Объект DataReader закрывается.

• Подключение к источнику данных закрывается, если оно было открыто объектом DataReader, в противном случае оно остается открытым.

НА ЗАМЕТКУ

При выполнении одной команды по отношению к источнику данных обычно проще и эффективнее создавать объекты Command и Connection неявно при создании объекта DataAdapter. Однако при выполнении нескольких команд по отношению к одному источнику данных эффективнее создать объект Connection явно и затем присвоить его объекту DataAdapter. Это позволяет поддерживать подключение постоянно открытым без часто повторяющихся операций его открытия и закрытия, что снижает производительность. Эквивалентный код представлен ниже.

Private Sub ReadData()

 Dim rows As Integer

 Dim daDepartments As SqlDataAdapter

 Dim соnn As New SqlConnection (_

 "server=localhost;uid=sa;database=novelty")

 Dim cmdSelect As New SqlCommand(_

  "select * from tblDepartment")

 dsEmployeeInfо = New DataSet()

 cmdSelect.Connection = conn

 daDepartments.SelectCommand = cmdSelect

 ' Открытие подключения перед выполнением команд

 conn.Open()

 rows = daDepartments.Fill(dsEpmloyeeInfo, "Departments")

 ' Выполнение операций с базой данных.

 ' ...

 DisplayDataSet(dsEmployeeInfо)

 ' Закрытие подключения после выполнения всех команд.

 conn.Close()

End Sub

Конечно, для эффективного использования явно созданных объектов conn и cmdSelect желательно, чтобы количество операций с базой данных было достаточно большим.

Методу Fill передается ссылка на набор данных dsEmployeeInfo и имя таблицы Departments, в которую вставляются данные. Вместо имени таблицы можно было бы передать ссылку на объект DataTable. Еще один вариант указания параметров основан на передаче только ссылки на объект DataSet, а метод Fill в таком случае по умолчанию загрузит данные в объект DataTable по имени Table.

НА ЗАМЕТКУ

Обычно для вставки данных в объект DataTable используется объект DataSet, однако существует перегруженная версия метода Fill для загрузки данных в отдельный объект DataTable.

Для загрузки данных во вторую таблицу можно создать второй объект DataAdapter с другой командой Select. В данном примере для загрузки данных в таблицы Department и Employees из соответствующих таблиц базы данных нужно использовать приведенный ниже код для подпрограммы ReadData() вместо кода из листинга 6.1.

Private Sub ReadData()

 Dim rows As Integer

 Dim daDepartments As SqlDataAdapter = New SqlDataAdapter(_

  "select * from tblDepartment", _

  "server=localhost;uid=sa;database=novelty")

 Dim daEmployees As SqlDataAdapter = New SqlDataAdapter(_

  "select * from tblEmployee", _

  "server=localhost;uid=sa;database=novelty")

 dsEmployeeInfo = New DataSet()

 rows = daDepartments.Fill(dsEmployeeInfo, "Departments")

 rows = daEmployees.Fill(dsEmployeeInfo, "Employees")

 DisplayDataSet(dsEmployeeInfo)

End Sub

Скомпонуйте проект DataSetCode, щелкните на кнопке DataAdapter Fill, и в поле со списком, как и прежде, будет отображена информация о содержании набора данных dsEmployeeInfo, но теперь она извлекается из базы данных под управлением SQL Server, а не генерируется локально кодом приложения.

Для установления родительско-дочерних связей между записями в этих таблицах можно создать объект DataRelation, который служит отношением между ними.

НА ЗАМЕТКУ

Иногда предпочтительнее вставлять в объект DataSet результаты объединения двух таблиц. В таком случае потребуется только один объект DataTable и не понадобится создавать отношение между двумя исходными таблицами. Однако использовать две отдельные таблицы можно более гибко, особенно при обновлении источника данных, потому что обновление объединенной таблицы связано с некоторыми ограничениями, в то время как для обновления независимых таблиц никаких ограничений не существует.

Совсем необязательно использовать разные объекты DataAdapter для таблиц одного набора данных. Иногда для них можно использовать один объект DataAdapter, только изменяя параметр с текстом команды SQL. Этот способ прекрасно подходит для многочисленных вызовов метода Fill, так как программирование всех отдельных операций создания и изменения команд обновления (вставки, обновления и удаления) каждого объекта DataTable в соответствии с изменениями источника данных требует много времени и усилий.

Итак, для использования одного объекта DataAdapter предыдущий код следует заменить приведенным ниже.

Private Sub ReadData()

 Dim rows As Integer

 Dim da As SqlDataAdapter = New SqlDataAdapter( _

  "select * from tblEmployee", _

  "server=localhost;uid=sa;database=novelty")

 dsEmployeeInfo = New DataSet()

 rows = da.Fill(dsEmployeeInfo, "Employees")

 ' Изменение текста команды SQL.

 da.SelectCommand.CommandText = _

  "select * from tblDepartment"

 rows = da.Fill(dsEmployeeInfo, "Departments")

 DisplayDataSet(dsEmployeeInfo)

End Sub

НА ЗАМЕТКУ

Наиболее эффективный способ загрузки данных из двух таблиц в объект DataSet основан на использовании объекта SelectCommand, который вызывает хранимую процедуру, возвращающую результирующий набор записей, или выполняет пакет команд SQL. В таком случае для извлечения данных требуется выполнить только одно обращение к серверу баз данных вместо многократного обращения, как в предыдущих примерах кода. Хотя этот способ упрощает и ускоряет извлечение данных из нескольких таблиц, при этом значительно усложняется обновление данных при их изменении в таблицах объекта DataSet, если между ними задано отношение. Этот способ обновления рассматривается более подробно в бизнес-ситуации 6.1 далее в главе.

В листинге 6.2 демонстрируется еще один способ использования одного объекта DataAdapter для выполнения нескольких операций вставки данных в один объект DataTable.

Листинг 6.2. Использование одного объекта DataAdapter для нескольких операций вставки данных в один объект DataTable

Private Sub ReadData()

 Dim daEmployees As SqlDataAdapter = New SqlDataAdapter(_

  "select * from tblEmployee where DepartmentID = 1", _

  "server=localhost;uid=sa;database=novelty")

 dsEmployeeInfo = New DataSet()

 daEmployees.Fill(dsEmployeeInfo, "Employees")

 ' Изменение текста команды SQL.

 daEmployees.SelectCommand.CommandText = _

  "select * from tblEmployee where DepartmentID = 3"

 daEmployees.Fill(dsEmployeeInfo, "Employees")

 DisplayDataSet(dsEmployeeInfo)

End Sub

Обратите внимание, что в листинге 6.2 возвращаемое значение метода Fill уже не сохраняется в локальной переменной rows. Совсем необязательно сохранять возвращаемое значение, если только в дальнейшем не предполагается проверять его или использовать каким-то другим способом. Предлагаемый в листинге 6.2 код можно было бы расширить несколькими командами Select для обновления объекта DataTable наиболее свежими данными (например, измененными другими пользователями) из источника данных.

НА ЗАМЕТКУ

Существующие в объекте DataTable значения обновляются только при вызове соответствующего метода Fill, если для объекта DataTable задан первичный ключ. По умолчанию метод Fill вставляет в объект DataTable информацию о структуре данных и значения данных в записях без указания каких-либо ограничений, которые могут быть заданы в источнике данных. Для правильной установки значения свойства PrimaryKey (чтобы корректно выполнялись операции обновления данных и метод Fill) еще до вызова метода Fill нужно выполнить одно из следующих действий:

• вызвать метод FillSchema объекта DataAdapter;

• указать значение AddWithKey для свойства объекта DataAdapter;

• явно указать значение свойства PrimaryKey для соответствующих полей, если они известны в режиме создания приложения.

 

Обновление источника данных

 

Обычно после внесения всех необходимых изменений в таблицы набора данных DataSet потребуется сохранить эти изменения в источнике данных. Для этого нужно вызвать метод Update объекта DataAdapter, который анализирует изменения в указанной таблице набора данных (или сразу во всех таблицах, если ни одна из них не указана явно). Для каждой измененной записи по отношению к источнику данных выполняется команда вставки, обновления или удаления с помощью соответствующего объекта InsertCommand, UpdateCommand или DeleteCommand.

НА ЗАМЕТКУ

Возможность прямого указания специализированных пользовательских команд SQL или хранимых процедур в целях их автоматического применения для обновления источника данных при изменении данных в объекте DataSet является наиболее значительным усовершенствованием способа работы с данными в модели ADO.NET по сравнению с моделью ADO 2.X. В модели АDO.NET предусмотрено не только управление способом обновления пакета записей, но и использование хранимых процедур для выполнения этой задачи. Помимо указания команд SQL для операций обновления, применение хранимых процедур позволяет существенно повысить производительность и использовать специализированную бизнес-логику. Далее приводится краткий пример использования этих преимуществ. Кроме того, в отличие от модели ADO которая может применяться только к SQL-совместимым источникам данных, механизм пакетного обновления модели ADO.NET может работать даже с источниками данных, не совместимыми с SQL. 

Каждая измененная запись обновляется отдельно, а не как часть транзакции или пакетной операции. Причем порядок обновления записей определяется порядком их расположения в объекте DataTable.

Для явного управления порядком выполнения операций для заданной таблицы можно использовать методы GetChanges или Select, которые доступны на уровне либо объекта DataSet, либо объекта DataTable. Эти методы используются для извлечения отдельных наборов записей с разными состояниями записей.

Допустим, необходимо обновить базу данных Novelty данными из объекта dsEmployees с помощью объекта daDepartments. Причем сначала требуется выполнить все вставки, затем все обновления, а потом все удаления. Это можно сделать, трижды вызывая метод GetChanges с указанием соответствующих разных состояний записей. После каждого вызова метода GetChanges вызывается метод Update объекта DataAdapter с передачей объекта DataTable, возвращенного методом GetChanges.

dt = dsEmployeeInfo.Tables("Departments")

Внести изменения для каждого типа состояния.

dtChanged = dt.GetChanges(DataRowState.Added)

daDepartments.Update(dtChanged)

dtChanged = dt.GetChanges(DataRowState.Modified)

daDepartments.Update(dtChanged)

dtChanged = dt.GetChanges(DataRowState.Deleted)

daDepartments.Update(dtChanged)

Этот код можно записать более компактно.

dt = dsEmployeeInfo.Tables("Departments")

' Внести изменения для каждого типа состояния.

daDepartments.Update(dt.GetChanges(DataRowState.Added))

daDepartments.Update(dt.GetChanges(DataRowState.Modifled))

daDepartments.Update(dt.GetChanges(DataRowState.Deleted))

Аналогичный результат можно получить с помощью метода Select.

dt = dsEmployeeInfo.Tables("Departments")

' Внести изменения для каждого типа состояния.

daDepartments(Nothing, Nothing, _

 dt.GetChanges(DataViewRowState.Added))

daDepartments.Update(Nothing, Nothing, _

 dt.GetChanges(DataViewRowState.ModifiedCurrent))

daDepartments.Update(Nothing, Nothing, _

 dt.GetChanges(DataViewRowState.Deleted))

Преимущество использования метода Select вместо GetChanges заключается в том, что он может выполнять фильтрацию и сортировку.

Здесь следует напомнить о разнице между операциями удаления записи с помощью методов Remove и о которой сообщалось в главе 5, "ADO.NET: объект DataSet". При использовании метода Remove запись навсегда удаляется из коллекции, а при удалении с помощью метода Delete — только отмечается как удаленная. При обновлении источника данных данными из объекта DataTable с помощью объекта DataAdapter нужно использовать метод Delete, а не Remove. Когда объект DataAdapter встречает помеченную для удаления запись, он автоматически выполняет команду DeleteCommand для базы данных, чтобы осуществить синхронизацию с объектом DataTable. Если вместо метода Delete использовать Remove, то объект DataAdapter не обнаружит уже удаленную запись из объекта DataTable и не сможет удалить ее из источника данных.

 

Указание команд обновления

 

Объект DataAdapter не создает автоматически команды INSERT, UPDATE и DELETE для обновления источника данных в соответствии с изменениями данных в объекте DataSet. Если при вызове команды метода Update не была указана команда INSERT, UPDATE или DELETE, то генерируется исключительная ситуация. Эти команды можно указать одним их следующих способов:

• использовать объект CommandBuilder для автоматической генерации команд во время выполнения приложения;

• явно запрограммировать эти команды;

• использовать компонент DataAdapter DesignTime Component и мастер конфигурирования объекта DataAdapter Configuration Wizard.

 

Использование объекта CommandBuilder

Это самый простой способ, но он связан с существенными ограничениями. Он аналогичен применению метода BatchUpdate в модели ADO 2.X. Когда объект CommandBuilder связывается с соответствующим ему объектом DataAdapter, он автоматически может задавать значения свойств InsertCommand, UpdateCommand и DeleteCommand для данного объекта DataAdapter. А если эти свойства имеют ненулевые значения (т.е. для них не задано значение Nothing), то объект-команда уже существует и объект CommandBuilder не переопределяет ее.

НА ЗАМЕТКУ

Как и следовало ожидать, для каждого типа провайдера данных .NET используется специализированный объект: SqlDataAdapter, OledbDataAdapter или OdbcDataAdapter.

Для автоматической генерации команд нужно указать объект SelectCommand адаптера данных DataAdapter. Объект CommandBuilder использует схему таблицы, полученную с помощью метода Select объекта SelectCommand для генерации соответствующей команды вставки, обновления или удаления. Учтите, что поля, возвращаемые объектом SelectCommand, должны содержать первичный ключ или поле с уникальными значениями.

Изменение текста команды SELECT после автоматической генерации команд обновления может привести к возникновению исключительных ситуаций при одновременном выполнении этой команды обновления. Если в исходной команде SELECT, на основании которой автоматически генерируются команды обновления данных, содержались поля, которых уже нет в генерированной команде, то при выполнении одной из команд обновления с помощью метода Update объекта DataAdapter может произойти попытка обращения к уже несуществующим полям и возникновение исключительной ситуации. Для исключения этой проблемы следует вызвать метод RefreshSchema объекта CommandBuilder после изменения свойства SelectCommand объекта DataAdapter или после изменения текста (объект CommandText) данной команды.

НА ЗАМЕТКУ

Даже после того как объект CommandBuilder автоматически сгенерировал команды вставки, обновления или удаления, соответствующие им свойства объекта DataAdapter не изменяются. Объект CommandBuilder скрывает сгенерированные команды, и доступ к ним можно получить с помощью методов GetInsertCommand, GetUpdateCommand и GetDeleteCommand.

Хотя конструктор команд CommandBuilder прост в применении, нужно учитывать его ограничения. Основное ограничение связано с тем, что нельзя проконтролировать выполняемые им действия, т.е. задать его конфигурацию. Он просто генерирует команды обновления на основе заданной команды SELECT без каких-либо параметров. Кроме того, он предназначен для выполнения команд по отношению к одной таблице базы данных. Иначе говоря, объект DataTable с результатами объединения таблиц не может использоваться объектом CommandBuilder. Более того, команды генерируются для одной таблицы без учета ее возможных связей с другими таблицами базы данных, что может привести к нарушению целостности данных при наличии между таблицами родительско-дочерних отношений.

Еще одно ограничение объекта CommandBuilder связано с тем, что он не способен генерировать команды обновления, если имя таблицы или поля содержит специальные символы, например пробел, точку или другие не буквенно-цифровые символы, даже если это имя заключено в кавычки. Однако он может работать с полностью квалифицированными именами таблиц в формате база_данных.владелец.таблица.

Чтобы извлекать и сохранять данные в базе данных с помощью объекта DataAdapter, создадим в проекте DataSetCode еще одну форму. Для этого выполните перечисленные ниже действия.

1. Создайте новую кнопку непосредственно под кнопкой DataAdapter Fill, перетаскивая ее из панели элементов управления. В окне свойств Properties укажите значение btnDataAdapterUpdate для свойства (Name) и значение DataAdapter Updates для свойства Text.

2. Создайте в проекте DataSetCode новую форму.

3. В окне свойств Properties укажите значение frmUpdates для свойства (Name) и значение DataAdapter Updates для свойства Text.

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

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

6. В окне Properties укажите значение grdDataGrid для свойства (Name) сетки данных.

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

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

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

10. Создайте новую кнопку непосредственно под кнопкой btnLoad, перетаскивая ее из панели элементов управления.

11. В окне Properties укажите значение btnLoad для свойства (Name), значение Load для свойства Text и значение False для свойства Enabled этой кнопки.

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

Imports System

Imports System.Data

Imports System.Data.SqlClient

13. Затем в код формы frmUpdates введите код из листинга 6.3.

Листинг 6.3. Применение объекта SqlCommandBuilder для автоматической генерации команд обновления

Private dsEmployeeInfo As DataSet

Private daEmployees As SqlDataAdapter

Private conn As New SqlConnection( _

 "server=localhost;uid=sa;pwd=;database=novelty")

 ' Применение объекта SqlCommandBuilder

 ' для автоматической генерации команд обновления.

Private cbEmployees As SqlCommandBuilder

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

 ByVal e As System.EventArgs) Handles btnLoad.Click

 dsEmployeeInfo = New DataSet()

 LoadCommandBuilder()

 ' Конфигурирование объекта-сетки DataGrid.

 Me.grdDataGrid.PreferredColumnWidth = 110

 Me.grdDataGrid.AllowSorting = True

 ' Вставка данных в объект DataSet.

 daEmployees.Fill(dsEmployeeInfo, "Employees")

 ' Присвоение объекта DataSet объекту DataGrid.

 Me.grdDataGrid.DataSource = _

  dsEmployeeInfo.Tables("Employees")

 Me.btnUpdate.Enabled = True

End Sub

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

 ByVal e As System.EventArgs) Handles btnUpdate.Click

 daEmployees.Update(dsEmployeeInfo, "Employees")

End Sub

Private Sub LoadCommandBuilder()

 Dim param As SqlParameter

 If conn.State = ConnectionState.Closed Then

  conn.Open()

 End If

 ' Создание нового объекта DataAdapter.

 Dim SQL As String SQL = "Select FirstName, LastName, Department ID, Salary, _

  ID from tblEmployee"

 daEmployees = New SqlDataAdapter(SQL, conn)

'  Создание команды с помощью SqlCommandBuilder.

 cbEmployees = New SqlCommandBuilder(daEmployees)

End Sub

Основная подпрограмма LoadCommandBuilder() вызывается после щелчка на кнопке Load. Она демонстрирует способ явного открытия подключения, возможность избежать возникновения исключительных ситуаций при нескольких последовательных щелчках на кнопке Load и конфигурирование адаптера данных SqlDataAdapter (объект daEmployees) и конструктора команд SqlCommandBuilder (объект cbEmployees). Эти два объекта создаются и инициализируются с помощью их конструкторов, которые принимают значения своих свойств в качестве параметров. Конструктор объекта daEmployees получает строку с командой SELECT и объект подключения, а объект cbEmployees — адаптер данных daEmployees.

НА ЗАМЕТКУ

Только один объект SqlDataAdapter может быть связан только с одним объектом SqlCommandBuilder.

Далее конфигурируется объект-сетка, вызывается метод Fill для загрузки таблицы Employees в объект daEmployees, задается таблица Employees для свойства DataSource объекта daEmployees и автоматически отображаются данные в сетке.

Обработчик события щелчка на кнопке Update содержит только одну строку кода, которая просто вызывает метод Update для объекта daEmployees.

Скомпонуйте проект DataSetCode и щелкните на кнопке DataAdapter Updates в форме frmDataSets. После отображения на экране формы frmUpdates щелкните на кнопке Load. Это приведет к считыванию данных из таблицы Employees, загрузке данных в объект tblEmployees объекта dsEmployeeInfo и отображению их в сетке, как показано на рис. 6.2.

Теперь можно протестировать работу этой формы, внося в данные произвольные изменения. Например, добавьте в сетку новые записи, прокручивая ее вниз и вводя новые данные в последней пустой строке сетки. Удалите несколько строк, выделяя их и нажимая клавишу . Измените значения некоторых данных в уже имеющихся записях. Учтите, что все эти изменения не будут отражены в базе данных до тех пор, пока пользователь не щелкнет на кнопке Update. Внесенные в базу данных изменения можно проверить, используя любые инструменты просмотра таблиц базы данных или щелкая на кнопке Load для повторной загрузки данных из таблиц базы данных в объект grdDataGrid формы frmUpdates. 

РИС. 6.2. Отображение данных из таблицы tblEmployees в сетке grdDataGrid

НА ЗАМЕТКУ

Хотя использование объекта CommandBuilder для генерации команд обновления требует минимального количества кода, оно связано со значительными накладными расходами. Дело в том, что объект CommandBuilder должен выполнить дополнительное обращение к серверу базы данных для извлечения метаданных, которые необходимы для автоматической генерации команд обновления. Эта возможность очень полезна и позволяет создавать запросы "на лету". Однако, если запросы уже известны во время создания приложения, явное указание команд и их параметров в коде и использование явных команд обновления или программы-мастера DataAdapter Configuration Wizard приведет к повышению производительности.

 

Явное указание команд обновления

В отличие от довольно простого способа генерации нужных команд обновления с помощью объекта CommandBuilder, явное указание команд обновления в коде представляет собой хотя и более гибкий, но весьма трудоемкий способ. При его использовании каждая из четырех команд управления данными (Select, Insert, Update и Delete) должна быть создана отдельно. Чаще всего они кодируются в виде хранимой процедуры для каждой команды SQL.

В листинге 6.4 представлен сценарий SQL Server для генерации четырех хранимых процедур. Хранимая процедура SelectEmployees просто выбирает все поля таблицы tblEmployee. Хранимая процедура InsertEmployee принимает четыре параметра, т.е. по одному для каждого обновляемого поля. Хранимая процедура UpdateEmployee принимает те же четыре параметра для обновляемых полей и еще один параметр для исходного значения идентификационного поля, которое используется в предложении WHERE для выбора обновляемой записи (на основании первичного ключа). Хранимая процедура DeleteEmployee принимает исходное значение идентификационного поля для удаления указанной записи.

Листинг 6.4. Сценарий SQL Server для создания хранимых процедур для таблицы tblEmployee

IF EXISTS (SELECT * FROM sysobjects WHERE name =

 'SelectEmployees' AND user__ name(uid) = 'dbo'

 DROP PROCEDURE [dbo].[SelectEmployees]

GO

CREATE PROCEDURE [dbo].[SelectEmployees]

AS

 SET NOCOUNT ON;

 SELECT FirstName, LastName, DepartmentID, Salary, ID FROM

 tblEmployee

GO

IF EXISTS (SELECT * FROM sysobjects WHERE name =

 'InsertEmployee' AND user_name(uid) = 'dbo'

 DROP PROCEDURE [dbo].[InsertEmployee]

GO

CREATE PROCEDURE [dbo].[InsertEmployee] (

 @FirstName varchar(50),

 @LastName varchar(70),

 @DepartmentID int,

 @Salary money

)

AS

 SET NOCOUNT ON;

 SELECT INTO tblEmployee(FirstName, LastName, DepartmentID, Salary)

 VALUES (@FirstName, @LastName, @DepartmentID, @Salary)

GO

IF EXISTS (SELECT * FROM sysobjects WHERE name =

 'UpdateEmployee' and user_name(uid) = 'dbo'

 DROP PROCEDURE [dbo].[UpdateEmployee]

GO

CREATE PROCEDURE [dbo].[UpdateEmployee] (

 @FirstName varchar(50),

 @LastName varchar(70),

 @DepartmentID int,

 @Salary money,

 @Original_ID int

)

AS

 SET NOCOUNT ON;

 UPDATE tblEmployee SET FirstName = @FirstName, LastName = @LastName,

  DepartmentID = @DepartmentID, Salary = @Salary

 WHERE (ID = @Original_ID)

GO

IF EXISTS (SELECT * FROM sysobjects WHERE name

 'DeleteEmployee' and user_name

 DROP PROCEDURE [dbo].[DeleteEmployee]

GO

create procedure [dbo].[DeleteEmployee] (@Original_ID int)

AS

 SET NOCOUNT ON;

 DELETE FROM tblEmployee

 WHERE (ID = @Original_ID)

GO

Вернемся к коду приложения. Во-первых, изменим первую строку кода в подпрограмме btnLoad_Click, т.е. вместо вызова подпрограммы LoadCommandBuilder вставим вызов подпрограммы LoadExplicitCode. Кроме того, для отладки явно заданного кода для команды обновления нужно добавить блок Try-Catch в подпрограмму btnUpdate_Click, которая теперь будет иметь приведенный ниже вид.

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

 ByVal e As System.EventArgs) Handles btnUpdate.Click

 Try

  daEmployees.Update(dsEmployeeInfo, "Employees")

 Catch es As SqlException

  MessageBox.Show(es.Message)

 End Try

End Sub

Наконец, код подпрограммы LoadExplicitCode будет выглядеть так, как показано в листинге 6.5.

Листинг 6.5. Подпрограмма LoadExplicitCode для четырех специализированных команд SQL для адаптера данных daEmployees

Private Sub LoadExplicitCode()

 Dim param As SqlParameter

 If conn.State = ConnectionState.Closed Then

  conn.Open()

 End If

 ' Создание нового объекта DataAdapter.

 daEmployees = New SqlDataAdapter()

 ' Создание специализированной

 ' хранимой процедуры для команды Select.

 daEmployees.SelectCommand = New SqlCommand()

 With daEmployees.SelectCommand

  .Connection = conn

  .CommandType = CommandType.StoredProcedure

  .CommandText = "SelectEmployees"

 End With

 ' Создание специализированной

 ' хранимой процедуры для команды Insert.

 daEmployees.InsertCommand = New SqlCommand()

 With daEmployees.InsertCommand

  .Connection = conn

  .CommandType = CommandType.StoredProcedure.CommandText = "InsertEmployee"

 End With

 param = daEmployees.InsertCommand.Parameters.Add(_

  New SqlParameter(@FirstName ", SqlDbType.VarChar, 50))

 param.Direction = ParameterDirection.Input

 param.SourceColumn = "FirstName"

 param.SourceVersion = DataRowVersion.Current

 param = daEmployees.InsertCommand.Parameters.Add( _

 New SqlParameter("@LastName", SqlDbType.VarChar, 70))

 param.Direction = ParameterDirection.Input

 param.SourceColumn = "LastName"

 param.SourceVersion = DataRowVersion.Current

 param = daEmployees.InsertCommand.Parameters.Add(_

  New SqlParameter("@DepartmentID, SqlDbType.Int))

 param.Direction = ParameterDirection.Input

 param.SourceColumn = "DepartmentID"

 param.SourceVersion = DataRowVersion.Current

 param = daEmployees.InsertCommand.Parameters.Add( _

  New SqlParameter("@Salary", SqlDbType.Money))

 param.Direction = ParameterDirection.Input

 param.SourceColumn = "Salary"

 param.SourceVersion = DataRowVersion.Current

 ' Создание специализированной

 ' хранимой процедуры для команды Update.

 daEmployees.UpdateCommand = New SqlCommand()

 With daEmployees.UpdateCommand

  .Connection = conn

  .CommandType = CommandType.StoredProcedure

  .CommandText = "UpdateEmployee"

 End With

 param = daEmployees.UpdateCommand.Parameters.Add( _

  New SqlParameter("@FirstName@, SqlDbType.VarChar, 50))

 param.Direction = ParameterDirection.Input

 param.SourceColumn = "FirstName"

 param.SourceVersion = DataRowVersion.Current

 param = daEmployees.UpdateCommand.Parameters.Add( _

  New qlParameter("@LastName", SqlDbType.VarChar, 70))

 param.Direction = ParameterDirection.Input

 param.SourceColumn = "LastName"

 param.SourceVersion = DataRowVersion.Current

 param = daEmployees.UpdateCommand.Parameters.Add( _

  New SqlParameter("@DepartmentID, SqlDbType.Int))

 param.Direction = ParameterDirection.Input

 param.SourceColumn = "DepartmentID"

 param.SourceVersion = DataRowVersion.Current

 param = daEmployees.UpdateCommand.Parameters.Add( _

  New SqlParameter("@Salary, SqlDbType.Money))

 param.Direction = ParameterDirection.Input

 param.SourceColumn = "Salary"

 param.SourceVersion = DataRowVersion.Current

 param = daEmployees.UpdateCommand.Parameters.Add( _

  New SqlParameter("@Original_ID, SqlDbType.Int))

 param.Direction = ParameterDirection.Input

 param.SourceColumn = "ID"

 param.SourceVersion = DataRowVersion.Original

 ' Создание специализированной

 ' хранимой процедуры для команды Delete.

 daEmployees.DeleteCommand = New SqlCommand()

 With daEmployees.DeleteCommand

  .Connection = conn

  .CommandType = CommandType.StoredProcedure

  .CommandText = "DeleteEmployee"

 End With

 param = daEmployees.DeleteCommand.Parameters.Add(_

  New SqlParameter("@Original_ID", SqlDbType.Int))

 param.Direction = ParameterDirection.Input

 param.SourceColumn = "ID"

 param.SourceVersion = DataRowVersion.Original

End Sub

НА ЗАМЕТКУ

Код присвоения значений для каждого из объектов-параметров мог быть более компактным за счет вызова другой перегруженной версии метода Add. Эта альтернативная версия принимает значения для всех необходимых свойств-параметров в одном вызове метода с длинным списком параметров.

Невзирая на большой размер, код подпрограммы LoadExplicitCode имеет очень простую и понятную структуру, если определен интерфейс (параметры и типы) для хранимых процедур. Для всех свойств объекта Command создается новый экземпляр объекта SQLCommand. Ему присваивается общий объект Connection и задаются значения свойств CommandType и CommandText. Затем нужно создать и конфигурировать все параметры каждой команды.

Скомпонуем проект DataSetCode и снова проверим работоспособность полученного приложения. Оно будет работать как и прежде, но теперь в подпрограмме LoadExplicitCode используются специализированные команды для обновления базы данных. Этот подход требует больших усилий по созданию кода, но является более гибким, предлагает более высокую производительность и централизованное управление хранимыми процедурами.

 

Вставка бизнес-логики в команды обновления

Прежде уже описывалось, как хранимые процедуры для специализированных команд обновления можно использовать для вставки бизнес-логики в хранимые процедуры, которые вызываются автоматически. По сравнению с прежними версиями модели ADO и другими моделями доступа к данным новизна заключается не во вставке логики в хранимые процедуры, поскольку эта функциональная возможность существовала и раньше. Дело в том, что эти хранимые процедуры вызываются автоматически при выполнении "пакетных" обновлений вместо явной организации вызовов в коде программы.

Для демонстрации этого подхода попробуем изменить хранимую процедуру. Предположим, что бизнес-логика определяется следующим образом: если при вставке новой записи о сотруднике значение зарплаты в поле Salary не определено или равно 0, то для него автоматически задается значение, определяемое функцией отдела. Для реализации этой бизнес-логики применим очень простой механизм: автоматически присвоенное значение будет равно произведению номера отдела и значения 10000. (Конечно, в реальных условиях компания может использовать более удачный алгоритм для указания этого значения!) Измененная хранимая процедура теперь будет выглядеть так, как показано ниже.

CREATE PROCEDURE dbo.SelectEmployees (

 @FirstName varchar(50),

 @LastName varchar(70),

 @DepartmentID int,

 @Salary money)

AS

 SET NOCOUNT ON;

 if (@Salary = 0 or @Salary is null) begin

  -– Вычисления

  set @Salary = @DepartmentID * 1000

 end

 INSERT INTO tblEmployee (FirstName, LastName, DepartmentID, Salary) VALUES

 (@FirstName, @LastName, @DepartmentID, @Salary)

GO

НА ЗАМЕТКУ

Поскольку хранимая процедура InsertEmployee уже существует, то для ее создания в новом виде нужно удалить существующую хранимую процедуру или заменить первую строку данного сценария строкой ALTER PROCEDURE dbo.SelectEmployees. Для выполнения этого сценария можно использовать программу SQL Query Analyzer.

Теперь можно вновь запустить приложение проекта DataSetCode без внесения каких-либо изменений в его код. Попробуйте вставить в форму несколько новых записей с пустыми значениями поля Salary и проверьте работоспособность новой хранимой процедуры, т.е. корректного автоматического присвоения значений для этого поля.

 

Использование компонента DataAdapter во время создания приложения

После описания в предыдущем разделе способа создания кода вручную продемонстрируем метод автоматического создания кода с помощью программы-мастера Data Adapter Configuration Wizard. 

Программа-мастер Data Adapter Configuration Wizard предлагает целый набор параметров для конфигурирования объекта DataAdapter во время создания приложения. Она обладает более широкими функциональными возможностями, чем другие компоненты времени создания приложения. Она содержит графический интерфейс для управления многими внутренними объектами и свойствами компонента, а также инструменты автоматического создания кода.

1. Откройте форму frmUpdates в режиме конструктора формы.

2. Из вкладки Data выберите и перетащите в форму компонент SqlDataAdapter. Этот компонент невидим во время выполнения, поэтому он появится под формой среди других невизуальных компонентов. При этом на экране откроется первое диалоговое окно программы-мастера Data Adapter Configuration Wizard. Щелкните на кнопке Next.

3. В следующем диалоговом окне, Choose Your Data Connection (Выберите подключение к базе данных), выберите подключение к базе данных Novelty. Если оно не указано, то его следует создать, щелкнув на кнопке New Connection (Новое подключение) и указав характеристики подключения в стандартном диалоговом окне Data Link Properties (Свойства соединения с данными). После выбора подключения щелкните на кнопке Next.

4. В следующем диалоговом окне, Choose a Query Type (Выбрать тип запроса), можно выбрать тип запроса: Use SQL statements (Использовать команды SQL), Create new stored procedures (Создать новые хранимые процедуры) или Use existing stored procedures (Использовать существующие хранимые процедуры). В данном примере выберите предлагаемый по умолчанию тип запроса Use SQL Statements, хотя на практике бывает полезно использовать созданные программой-мастером хранимые процедуры.

5. В следующем диалоговом окне, Generate the SQL Statements (Создать SQL-команду), введите в текстовую область приведенную ниже команду SQL, которая будет использоваться объектом DataAdapter в качестве основы для других команд обновления.

SELECT FirstName, LastName, DepartmentID, Salary, ID FROM tblEmployee

В этом диалоговом окне есть еще две кнопки. После щелчка на кнопке Advanced Options (Дополнительные возможности) отображается диалоговое окно Advanced SQL Generation Options (Дополнительные возможности для генерации команд SQL) с тремя параметрами. Первый параметр, Generate Insert, Update and Delete Statements (Создать команды вставки, обновления и удаления), указывает на необходимость создания команд вставки, обновления и удаления на основе указанной команды SQL (или нужно использовать объект DataAdapter только для наполнения данными набора данных DataSet). Второй параметр, Use Optimistic concurrency (Использовать оптимистическую обработку параллельно выполняемых команд), означает включение в команду SQL предложения WHERE для всех значений полей в обновленной записи. Это позволяет обнаружить изменения данной записи, внесенные другими пользователями в базе данных, так как в этом случае такая команда SQL будет отвергнута. Третий параметр, Refresh the Dataset (Обновить набор данных Dataset), позволяет добавить еще одну команду SELECT к создаваемым командам вставки и обновления данных для возвращения значений идентификационных полей, предлагаемых по умолчанию значений полей, а также вычисленных сервером значений. После щелчка на кнопке Query Builder (Конструктор запроса) отображается одноименное стандартное диалоговое окно для графического создания команды SELECT вместо непосредственного ввода ее в текстовой области диалогового окна Generate the SQL statements.

6. Щелкните на кнопке Next для отображения диалогового окна View Wizard Results (Просмотр результатов создания команды SQL с помощью программы-мастера).

7. Щелкните на кнопке Finish для применения указанных параметров объекта DataAdapter.

НА ЗАМЕТКУ

Сразу после создания компонента DataAdapter можно изменить его свойства и параметры с помощью окна свойств Properties или повторного запуска программы-мастера Data Adapter Configuration Wizard. Чтобы повторно запустить программу-мастер для уже имеющегося компонента DataAdapter, щелкните на нем правой кнопкой мыши и выберите в контекстном меню команду Configure Data Adapter (Конфигурировать адаптер данных). Его можно также запустить, выбрав уже имеющийся компонент DataAdapter под формой, а затем щелкнув на ссылке Configure Data Adapter (Конфигурировать адаптер данных) в той части окна свойств Properties, которая находится между списком свойств и их описанием.

Аналогично конструктору команд CommandBuilder, программа-мастер Data Adapter Configuration Wizard предназначена для создания команд для одной независимой таблицы базы данных. Однако эта программа содержит несколько параметров конфигурации, например для создания новых или использования существующих хранимых процедур, что позволяет очень легко и быстро создавать код приложения.

Теперь нужно связать объект DataAdapter, которому автоматически присвоено имя SqlDataAdpater1, с созданным кодом. Для этого нужно явно открыть созданное подключение SqlConnection1.

Подпрограмму btnLoad_Click нужно изменить таким образом, чтобы она вызывала подпрограмму LoadWizardCode вместо подпрограммы LoadExplicitCode. Далее нужно вызвать метод Fill вновь созданного объекта SqlDataAdpater1. Кроме того, для использования нового объекта SqlDataAdpater1 потребуется изменить код подпрограммы btnLoad_Click. Наконец, нужно создать код подпрограммы LoadWizardCode, которая предназначена для открытия нового подключения. Эти три подпрограммы показаны в листинге 6.6.

Листинг 6.6. Измененные и новые подпрограммы для использования нового объекта SqlDataAdapter1 в уже существующем приложении

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

 ByVal e As System.EventArgs) Handles btnLoad.Click

 dsEmployeeInfo = New DataSet()

 LoadWizardCode()

 ' Конфигурирование объекта-сетки DataGrid.

 Me.grdDataGrid.PreferredColumnWidth = 110

 Me.grdDataGrid.AllowSorting = True

 ' Вставка данных в объект DataSet.

 daEmployees.Fill(dsEmployeeInfo, "Employees")

 ' Присвоение объекта DataSet объекту DataGrid.

 Me.grdDataGrid.DataSource = _

  dsEmployeeInfo.Tables("Employees")

 Me.btnUpdate.Enabled = True

End Sub

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

 ByVal e As System.EventArgs) Handles btnUpdate.Click

 Try

  ' daEmployees.Update(dsEmployeeInfo, "Employees")

  SqlDataAdapter1.Update(dsEmployeeInfo, "Employees")

 Catch es As SqlException

  MessageBox.Show(es.Message)

 End Try

End Sub

Private Sub LoadWizardCode()

 If SqlConnection1.State = ConnectionState.Closed Then

  SqlConnection1.Open()

 End If

End Sub

Для просмотра кода, автоматически созданного программой-мастером, нужно открыть раздел Windows Form Designer generated code (Код, сгенерированный конструктором Windows Form). Он напоминает код, созданный вручную в листинге 6.5.

НА ЗАМЕТКУ

В данном примере используются предлагаемые по умолчанию имена объектов SqlDataAdapter1 и SqlSelectCommand. Однако им можно присвоить более информативные имена в соответствии с принятым соглашением об именах. Во время создания компонентов их имена изменяются с помощью установки соответствующего значения для свойства (Name) в окне свойств Properties избранного компонента.

Для изменения имен отдельных объектов-команд (например, объектов SelectCommand и InsertCommand нужно выделить объект DataAdapter, открыть окно свойств Properties, найти нужную команду, раскрыть список ее свойств и указать соответствующее значение для ее свойства (Name). Аналогично можно изменить все остальные свойства объекта-команды.

Скомпонуйте проект DataSetCode и запустите полученное приложение для проверки его работоспособности. Как видите, программа-мастер Data Adapter Configuration Wizard позволяет с удивительной легкостью и быстротой создавать полностью функциональный код. Это усовершенствование смогут по достоинству оценить те программисты, которым раньше приходилось вручную создавать код для хранимых процедур.

Во время создания приложения можно воспользоваться еще одной функциональной возможностью компонента DataAdapter — инструментом предварительного просмотра данных. Для этого щелкните правой кнопкой мыши на объекте DataAdapter и выберите в контекстном меню команду Preview Data (Предварительный просмотр данных) или выберите объект DataAdapter и щелкните на ссылке Preview Data в той части окна свойств Properties, которая находится между списком свойств и их описанием. В списке Data adapters (Объекты – адаптеры данных) выберите нужный объект-адаптер и щелкните на кнопке Fill Dataset (Вставить данные в набор данных). На рис. 6.3 показан результат выполнения этих действий для объекта SqlDataAdapter в форме frmUpdates.

РИС. 6.З. Данные, вставленные в набор данных из таблицы tblEmployee с помощью диалогового окна предварительного просмотра данных Data Adapter Preview

 

Бизнес-ситуация 6.1: комбинация нескольких связанных таблиц

Как уже отмечалось, ни один из перечисленных выше методов указания команд обновления не позволяет обновлять данные сразу в нескольких таблицах, особенно если они связаны родительско-дочерним отношением. Значит ли это, что в модели ADO.NET не поддерживается обработка такой ситуации? Нет, это не так. В данной бизнес-ситуации для доказательства этого утверждения демонстрируются функциональные возможности модели ADO.NET, в частности применение пакета команд SQL для вставки данных из двух таблиц за счет одного обращения к серверу. Итак, программист компании Jones Novelties, Inc. создает форму для отображения и обновления данных о клиентах и их заказах. Для создания такой формы выполните перечисленные ниже действия.

РИС. 6.4. Расположение элементов управления в форме frmCustomersOrders

1. Запустите среду разработки Visual Studio .NET.

2. Создайте новый проект Visual Basic Windows Application.

3. Назовите проект BusinessCase6.

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

5. Увеличьте размер формы Form1 и в окне Properties укажите значение frmCustomersOrders для свойства (Name) и значение Customers and Orders для свойства Text формы Form1.

6. Перетащите в форму кнопку и в окне Properties укажите значение bntFill для ее свойства (Name) и Fill для свойства Text; перетащите в форму кнопку и в окне Properties укажите значение bntUpdate для ее свойства (Name) и значение Update для свойства Text; перетащите в форму сетку данных и в окне Properties укажите значение grdCustomersOrders для ее свойства (Name).

7. Расположите все элементы управления, как показано на рис. 6.4.

В верхней части файла с исходным кодом вставьте следующие строки кода для импорта пространств имен System. Data и System.Data.SqlClient:

Imports System.Data

Imports System.Data.SqlClient

В тело определения класса для формы frmCustomersOrders включите код из листинга 6.7.

Листинг 6.7. Код загрузки и обновления данных сразу в нескольких связанных таблицах

Private ds As DataSet

Private en As New SqlConnection( _

 "server=localhost;uid=sa;database=Novelty")

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

 ByVal e As System.EventArgs) Handles btnFill.Click

 Dim da As New SqlDataAdapter()

 grdCustomersOrders.DataSource = Nothing

 ds = New DataSet()

 ' Создание команды SELECT.

 da.SelectCommand = New SqlCommand()

 da.SelectCommand.Connection = cn

 da.SelectCommand.CommandType = CommandType.Text

 da.SelectCommand.CommandText = _

  "select * from tblCustomer; select * from tblOrder"

 ' Указание информативных имен для таблиц.

 da.TableMappings.Add("Table", "Customers")

 da.TableMappings.Add("Table1", "Orders")

 ' Загрузка данных, da.Fill(ds)

 ' Создание отношения.

 ds.Relations.Add("Customer_Orders", _

  ds.Tables("Customers").Columns("ID"), _

  ds.Tables("Orders").Columns("CustomerID"))

 ' Отображение данных.

 grdCustomersOrders.DataSource = ds

End Sub

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

  ByVal e As System.EventArgs) Handles btnUpdate.Click

 ' Создание адаптеров данных.

 Dim daCustomers As New SqlDataAdapter( _

  "select * from tblCustomer", en)

 Dim daOrders As New SqlDataAdapter( _

  "select * from tblOrder", en)

 Dim cbCustomers As New SqlCommandBuilder(daCustomers)

 Dim cbOrders As New SqlCommandBuilder(daOrders)

 Try

  ' Внесение изменений в таблицы в "правильном"

  ' порядке (см. далее в тексте).

  Dim ChangedTable As New DataTable()

  ' Удаление записей в дочерней таблице.

  ChangedTable = _

   ds.Tables("Orders").GetChanges(DataRowState.Deleted)

  If Not ChangedTable Is Nothing Then

   daOrders.Update(ChangedTable)

  End If

  ' Все измененные записи в родительской таблице.

  ChangedTable = ds.Tables("Customers").GetChanges

  If Not ChangedTable Is Nothing Then

   daCustomers.Update(ChangedTable)

  End If

  ' Новые или измененные записи в дочерней таблице.

  ChangedTable = _

   ds.Tables("Orders").GetChanges(DataRowState.Added _

   Or DataRowState.Modified)

  If Not ChangedTable Is Nothing Then

   daOrders.Update(ChangedTable)

  End If

 Catch ex As Exception

  MessageBox.Show(ex.Message)

 End Try

End Sub

Первая подпрограмма btnFill_Click считывает обе таблицы из базы данных посредством одного обращения к базе данных благодаря выполнению пакета команд SQL. В объекте CommandText отдельные команды пакета отделяются точкой с запятой.

Обратите внимание, что предлагаемые по умолчанию имена таблиц Table и Table1 в приведенных ниже строках кода отображаются на более информативные имена Customers и Orders.

' Указание информативных имен для таблиц.

da.TableMappings.Add("Table", "Customers")

da. TableMappings.Add("Table1", "Orders")

НА ЗАМЕТКУ

Более подробно способы отображения таблиц и полей рассматриваются в главе 7, "ADO.NET: дополнительные компоненты".

После вставки данных в набор данных ds между таблицами Customers и Orders создается отношение DataRelation, где Customers является родительской таблицей, a Orders — дочерней. Последняя строка кода в этой подпрограмме связывает набор данных DataSet с сеткой для отображения данных.

Вторая подпрограмма, btnUpdate_Click, вносит в базу данных изменения данных в объектах-таблицах с учетом родительско-дочерних связей между ними. К сожалению, ссылочная целостность данных не поддерживается автоматически, а потому ее нужно организовать вручную. Для этого разработчику необходимо сгруппировать типы изменений, а затем выполнить их в правильном порядке. Для двух таблиц, между которыми существуют родительско-дочерние связи, изменения следует вносить в приведенном ниже порядке.

1. Сначала удалить записи в дочерней таблице.

2. Вставить, обновить и удалить записи в родительской таблице.

3. Вставить и обновить записи в дочерней таблице.

Для получения соответствующих изменений подпрограмма должна вызвать для данной таблицы метод GetChanges с фильтром состояния записи. Каждый вызов метода GetChanges возвращает объект DataTable только с измененными записями и заданным состоянием. Если таких записей нет, то возвращается значение Nothing. Если есть хотя бы одна измененная строка с заданным состоянием, то для фактического обновления базы данных вызывается метод Update объекта DataAdapter. Код этой подпрограммы окружен блоком операторов Try-Catch для обработки исключительных ситуаций, которые могут возникнуть в процессе обновления базы данных.

Скомпонуйте проект BusinessCase6 и проверьте полученное приложение, выполнив перечисленные ниже действия.

1. Запустите полученное приложение BusinessCase6 и щелкните на кнопке Fill. Это приведет к вставке данных в объект DataSet из базы данных Novelty. Однако строка кода

grdCustomersOrders.DataSource = ds

связывает с сеткой весь объект DataSet, а не какую-то одну таблицу DataTable. Поэтому сетка содержит раскрывающийся список таблиц возле кнопки с изображением знака "плюс", как показано на рис. 6.5.

РИС. 6.5. Исходный вид формы frmCustomersOrders после вставки данных в объект DataSet

2. Щелкните на пиктограмме с изображением знака "плюс", раскроется список ссылок на две таблицы объекта DataSet.

3. Щелкните на ссылке Customers, и в сетке будут отображены данные из таблицы tblCustomers. Обратите внимание, что каждая строка в таблице tblCustomers имеет кнопки с изображением знака "плюс" с левой стороны, что означает связь этой таблицы с другими таблицами. После щелчка на такой кнопке раскрывается список объектов DataRelations для данной таблицы. В нашем примере имеется только одна ссылка для отношения Customer_Orders, созданного в подпрограмме btnFillClick (рис. 6.6).

РИС. 6.6. Ссылка Customer_Orders для первой записи из таблицы Customers

4. Щелкните на ссылке Customer_Orders в первой записи. На основании определения отношения Customer_Orders будут вставлены и отображены записи из таблицы Orders, которые относятся к текущей записи из таблицы Customers.

НА ЗАМЕТКУ

При переходах между разными таблицами и отношениями можно всегда вернуться исходному положению в используя кнопку Navigates back to the parent rows (Обратный переход к родительским записям) с изображением стрелки в правом верхнем углу формы.

Теперь с помощью этой формы пользователи могут просматривать имеющиеся и вводить новые данные. При вводе новой дочерней записи значение 1 в поле указывается автоматически, потому что сетка способна определить его в связанной записи из родительской таблицы. Продолжим и добавим значения для полей OrderDate и Amount. При этом не нужно задавать значение для поля ID, потому что это идентификационное поле, которому значение присваивается автоматически.

5. Щелкните на кнопке Update для выполнения подпрограммы btnUpdate_Click из листинга 6.7, которая вносит указанные изменения данных в базу данных.

6. Чтобы проверить корректность внесенных изменений, щелкните на кнопке Fill для повторной загрузки информации из базы данных в объект DataSet и сетку. Откройте первую запись таблицы Customers и найдите ее дочерние записи. Убедитесь в том, что среди них находится введенная вами дочерняя запись.

Попробуйте внести дополнительные изменения в базу данных вставляя, удаляя и изменяя записи в обеих таблицах и проверяя выполнение обновлений.

НА ЗАМЕТКУ

Успешное удаление записи из родительской таблицы Customer вместе с ее дочерними записями из таблицы Orders возможно благодаря заданному по умолчанию ограничению ForeignKeyConstraint для отношения Customer_Orders, которое заключается в каскадном обновлении (удалении) данных в родительской и дочерней таблицах.

 

Резюме

В этой главе рассмотрен объект DataAdapter, который является одним из основных объектов модели ADO.NET. Он играет роль моста между неподключенными объектами DataSet (и связанными с ними объектами) и подключенными объектами DataProvider, которые фактически связаны и подключены к физическому источнику данных.

Объект DataAdapter используется для вставки данных в объект DataSet из источника данных с помощью явно заданных команд или хранимых процедур. Объект DataAdapter также автоматически обновляет источник данных теми изменениями, которые произошли в объекте DataSet, что позволяет полностью настроить команды вставки, обновления и удаления для источника данных.

 

Вопросы и ответы

Иногда требуется программно создать и вставить в набор несколько записей, а затем внести эти обновления в базу данных. В модели ADO 2.X можно создать набор записей, но нельзя обновить базу данных. А как обстоит дело в модели ADO.NET?

В модели ADO.NET это требование реализуется очень просто. Как отмечалось в главе 5, "ADO.NET: объект DataSet", объект DataSet является контейнером данных, который не зависит от фактически используемого источника данных. Для обновления базы данных изменениями из объекта DataSet достаточно только подключиться к уже сконфигурированному объекту DataAdapter и вызвать его метод Update, который фактически обновит базу данных. Это верно и для программно созданных объектов DataSet, а не только для созданных с помощью команды Select объектов DataAdapter. В момент готовности к внесению изменений в физический источник данных достаточно подключиться к сконфигурированному объекту DataAdapter и вызвать его метод Update.

 

ГЛАВА 7

ADO.NET: дополнительные компоненты

 

В предыдущих главах рассматривается архитектура модели доступа к данным ADO.NET, объекты модели ADO.NET, их основные свойства и методы. В данной главе описываются четыре дополнительных компонента модели ADO.NET, которые имеют огромное значение для создания профессиональных приложений.

 

Обнаружение конфликтов при параллельном доступе к данным

Разработчики, имеющие опыт создания многопользовательских баз данных, знают о потенциальных проблемах при параллельном доступе к данным, возникающих при попытке одновременного обновления одних и тех же данных со стороны нескольких пользователей. Допустим, что пользователь А считывает какие-то данные и пользователь Б считывает те же данные, затем пользователь А изменяет эти данные, а пользователь Б также пытается их изменить. Как можно решить эту проблему? Существует два основных способа решения конфликтных ситуаций при параллельном доступе к данным.

Первый способ — пессимистическая блокировка (или пессимистическое управление параллельностью) — решает проблему перезаписи пользователем Б изменений, внесенных пользователем А. Для этого после считывания данных пользователем А для их редактирования на эти данные накладывается блокировка. Эта блокировка запрещает доступ к данным со стороны других пользователей до тех пор, пока пользователь А не завершит работу с заблокированными данными и не снимет блокировку.

Этот способ особенно полезен при высокой степени параллельности выполняемых операций с данными или при необходимости всегда просматривать наиболее свежие данные. Такая ситуация обычно возникает в системах оперативного учета материальных запасов или системах учета заказов, когда пользователь для принятия заказа должен убедиться в наличии товаров на складе.

Основными недостатками пессимистического управления параллельностью являются дополнительные накладные расходы на управление блокировками данных, необходимость постоянного подключения к базе данных и недостаточная масштабируемость. Плохая масштабируемость, особенно при работе в распределенной среде (например, в Internet), может привести к блокировке записей на несколько десятков секунд или даже минут.

Второй способ — оптимистическая блокировка (или оптимистическое управление параллельностью) — основан на очень кратковременной блокировке записей во время их фактического обновления. Этот способ решает проблему управления блокировками и масштабируемости, а также прекрасно подходит для редактирования наборов данных, отключенных от базы данных. Но что произойдет, если пользователь Б захочет обновить данные, уже обновленные пользователем А? Один из вариантов решения этой проблемы основан на признании только последнего обновления. Однако этот способ годится только для ограниченного круга приложений.

Для использования оптимистической блокировки нужно определить, изменялись ли данные после их последнего извлечения, что называется нарушением параллельного доступа (concurrency violation). Для этого применяются две основные стратегии.

Первая основана на создании временной метки или уникального номера версии для каждой записи, которые изменяются при обновлении записи. Исходное значение или номер версии включаются в состав предложения WHERE в команде обновления.

Вторая стратегия заключается в сохранении исходных значений полей. Эти значения становятся дополнительными условиями предложения WHERE в команде обновления.

В обоих способах, если исходная запись изменена, условие предложения WHERE не удовлетворяется, запись не будет найдена и не будет обновлена.

НА ЗАМЕТКУ

При использовании оптимистической блокировки в модели ADO 2.X в случае нарушения параллельного доступа появляется сообщение о невозможности найти запись, а не о нарушении параллельного доступа.

В модели ADO.NET поддерживается только оптимистическая блокировка и в текущей версии нет встроенной поддержки пессимистической блокировки. В Visual Studio .NET предусмотрено несколько возможностей для реализации оптимистической блокировки. Эта поддержка находится в полном согласии с расширенной поддержкой распределенных, отключенных и асинхронных приложений.

Команды SQL UPDATE и DELETE, сгенерированные объектом CommandBuilder и программой-мастером Data Adapter Configuration Wizard, содержат предложение WHERE для определения конфликтов параллельного доступа. Рассмотрим более внимательно код из главы 6, "ADO.NET: объект DataAdapter", созданный с помощью программы-мастера Data Adapter Configuration Wizard. Для этого нужно открыть раздел кода с заголовком Windows Form Designer generated code (Код, сгенерированный конструктором Windows Form) в коде формы frmUpdates. Но сначала рассмотрим команду SQL UPDATE, которая приводится в листинге 7.1.

Листинг 7.1. Команда SQL UPDATE, созданная программой-мастером Data Adapter Configuration Wizard

UPDATE tblEmployee

SET FirstName = @FirstName,

 LastName = @LastName,

 DepartmentID = @DepartmentID,

 Salary = @Salary

WHERE

 (ID = @Original_ID) AND

 (DepartmentID = @Original_DepartmentID OR

  @Original_DepartmentID IS NULL AND DepartmentID IS NULL)

 AND (FirstName = @Original_FirstName)

 AND (LastName = @Original_LastName)

 AND (Salary = @Original_Salary OR

  @Original_Salary IS NULL AND Salary IS NULL)

;

SELECT FirstName, LastName, DepartmentID, Salary, ID

FROM tblEmployee WHERE (ID = @ID)

Эта команда SQL выглядит как обычная команда UPDATE, которая задает новые значения для четырех обновляемых полей в качестве параметров объекта UpdateCommand. Предложение WHERE содержит первичный ключ (ID), а также исходные значения для каждого поля и проверяет их соответствие текущим значениям записи в базе данных. Более того, эта команда SQL проверяет наличие неопределенных значений NULL в базе данных и полях таблицы tblEmployee.

Команда SELECT (заданная при конфигурировании объекта DataAdapter) располагается вслед за командой UPDATE после точки с запятой. Точка с запятой всегда используется для разделения команд в пакете команд SQL, а команда SELECT добавляется по умолчанию для возвращения обновленной записи в приложение.

Рассмотрим код указания параметров для объекта UpdateCommand, как показано в листинге 7.2.

Листинг 7.2. Код установки параметров команды, сгенерированной с помощью программы-мастера Data Adapter Configuration Wizard

Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@FirstName", System.Data.SqlDbType.VarChar, 50, "FirstName"))

Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@LastName", System.Data.SqlDbType.VarChar, 70, "LastName"))

Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@DepartmentID", System.Data.SqlDbType.Int, 4, "DepartmentID"))

Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Salary", System.Data.SqlDbType.Money, 8, "Salary"))

Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_ID", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "ID", System.Data.DataRowVersion.Original, Nothing))

Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_DepartmentID", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "DepartmentID", System.Data.DataRowVersion.Original, Nothing))

Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_FirstName", System.Data.SqlDbType.VarChar, 50, System.Data.ParameterDirection.Input, False, Byte), CType(0, Byte), "FirstName", System.Data.DataRowVersion.Original, Nothing))

Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_LastName", System.Data.SqlDbType.VarChar, 70, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "LastName", System.Data.DataRowVersion.Original, Nothing))

Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter(System.Data.SqlDbType.Money, 8, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "Salary", System.Data.DataRowVersion.Original, Nothing))

Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@ID", System.Data.SqlDbType.Int, 4, "ID"))

Для данного объекта-команды заданы десять параметров. Первые четыре параметра являются текущими (возможно, измененными) значениями полей, которые следует обновить в базе данных. Как сообщается в главе 5, "ADO.NET: объект DataSet", каждая запись может иметь одну из четырех версий значения в каждой записи. По умолчанию используется текущее значение из считываемого поля.

Следующие пять параметров являются исходными значениями полей, которые упоминаются в предложении WHERE. Учтите, что для извлечения исходной версии значения поля (а не предлагаемой по умолчанию текущей версии) нужно явно указать исходную версию, как показано ниже.

System.Data.DataRowVersion.Original

НА ЗАМЕТКУ

Необязательно использовать исходные версии значения для всех полей в предложении WHERE. Можно настроить нужным образом любые команды обновления, чтобы уведомить об обновлении только одного или двух полей записи. В таком случае достаточно обновить только отдельные поля, а не все поля сразу. 

Последний параметр — текущее значение поля ID — применяется в качестве параметра команды SELECT, используемой для возвращения обновленных значений записи.

После каждой операции вставки, обновления или удаления объект DataAdapter проверяет количество строк, охваченных операцией. Если количество строк равно нулю, то генерируется исключительная ситуация DBConcurrencyException, поскольку обычно предполагается, что это результат конфликта при параллельном доступе к данным. Для ее перехвата и обработки следует включить блок Try-Catch в подпрограмму btnUpdate_Click, которая показана в листинге 7.3.

Листинг 7.3. Блок Try-Catch для обработки исключительной ситуации DBConcurrencyException

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

 ByVal e As System.EventArgs) Handles btnUpdate.Click

 Try

  daEmployees.Update(dsEmployeeInfo, "Employees")

 Catch ec As DBConcurrencyException

  ' Выполнить какие-то действия.

 Catch es As DBConcurrencyException

  MessageBox.Show(es.Message)

 End Try

End Sub

 

Отображения таблиц и полей

Объект DataAdapter содержит коллекцию объектов DataTableMapping. Они предназначены для отображения имен таблиц и полей в источнике данных на их имена в объекте DataSet. Конечно, сразу после конфигурирования этот способ работает в обоих направлениях, т.е. при чтении данных из источника в объект DataSet и при записи данных в источник из объекта DataSet.

В данном примере в методе Fill объекта DataAdapter указывается объект DataSet и имя таблицы в этом наборе данных.

daEmployees.Fill(dsEmployeelnfo, "Employees")

Однако на самом деле второй аргумент метода Fill содержит имя объекта — отображения имени таблицы. Объект DataAdapter ищет определенное отображение с таким же именем и, если находит, использует полученную информацию для выполнения метода Fill. А если отображение не найдено, то создается таблица с именем переданного параметра и в нее вставляются данные.

Это значит, что можно, например, добавить отображение MappingName и отобразить его на таблицу empDataSetTable с помощью кода

daEmployees.TableMappings.Add("MappingName", "empDataSetTable")

А затем можно вызвать метод Fill следующим образом:

daEmployees.Fill(dsEmployeeInfo, "MappingName")

При этом считанные данные вставляются в таблицу empDataSetTable объекта dsEmployeeInfo.

После определения отображения таблицы можно приступать к созданию отображений полей. Эта операция имеет особенно большое значение при использовании в коде приложения имен полей, которые отличаются от имен, использованных в источнике данных. При работе с отображением таблицы для вставки данных в объект DataSet объект DataAdapter ищет все имеющиеся отображения полей для заданного отображения таблицы и использует их для отображения имен полей. При этом в объекте DataSet для всех полей, у которых нет отображения, будут использованы имена полей из источника данных.

Например, тестовая баз данных pubs, которая входит в состав SQL Server, была создана много лет назад, когда существовали очень строгие ограничения для имен полей, поэтому сейчас они имеют вид малопонятных аббревиатур. Отображения полей позволяют загружать данные из базы данных pubs в объект – набор данных с более понятными именами полей. Благодаря отображению удается удовлетворить все самые строгие требования и соглашения об именах, которые могут предъявляться со стороны администратора базы данных и архитектора приложения.

Продолжим работу с примером отображения таблицы и попробуем отобразить имена полей из источника данных, которые соответственно соглашению об именах, заданному архитектором приложения, начинаются с трёхсимвольного префикса. В таком случае код отображения будет выглядеть так, как в листинге 7.4.

Листинг 7.4. Отображение таблицы и полей

daEmployees.TableMappings.Add("MappingName", "empDataSetTable")

With daEmployees.TableMappings("MappingName").ColumnMappings

 .Add("ID", "empEmployeeID")

 .Add("FirstName", "empFirstName")

 .Add("LastName", "empLastName")

 .Add("DepartmentID", "empDepartmentID")

 .Add("Salary", "empSalary")

End With

daEmployees.Update(dsEmployeeInfo, "MappingName")

В главе 6, "ADO.NET: объект DataAdapter" (см. листинги 6.1 и 6.2) представлена функция Read Data, которая вставляет в объект DataSet данные из источника данных и отображает содержимое объекта DataSet в списке формы frmDataSets (см. проект DataSetCode из главы 5, "ADO.NET: объект DataSet"). Если в подпрограмме обработки щелчков на кнопке DataAdapter Fill вместо функции ReadData вызвать ее измененную версию ReadDataMapped, которая содержит код, показанный в листинге 7.5, то после запуска приложения проекта DataSetCode будет получен результат, показанный на рис. 7.1.

РИС. 7.1. Содержимое объекта DataSet с отображениями таблицы и полей

Листинг 7.5. Измененная версия функции ReadDataMapped для отображения таблицы и полей

Private Sub ReadDataMapped()

 Dim daEmployees As SqlDataAdapter = New _

  SqlDataAdapter("select * from tblEmployee", _

  "server=localhost;uid=sa;database=novelty")

 dsEmployeeInfo = New DataSet()

 ' Конфигурация отображений таблицы и полей.

 daEmployees.TableMappings.Add("MappingName", "empDataSetTable")

 With daEmployees.TableMappings("MappingName").ColumnMappings

  .Add("ID", "empEmployeeID")

  .Add("FirstName", "empFirstName")

  .Add("LastName", "empLastName")

  .Add("DepartmentID", "empDepartmentID")

  .Add("Salary", "empSalary")

 End With

 daEmployees.Fill(dsEmployeeInfo, "MappingName")

 DisplayDataSet(dsEmployeeInfo)

End Sub

НА ЗАМЕТКУ

По умолчанию отображение таблицы называется Table. Оно применяется в том случае, если в методе Fill (или методе Update) используется только имя объекта DataSet. Однако его можно указать явно вместе с нужным именем таблицы с помощью приведенного ниже кода.

daEmployees.TableMappings.Add("Table", "MyTableName")

daEmployees.Fill(dsEmployeeInfo)

Это приведет к созданию таблицы MyTableName и вставке данных в нее.

 

Объект DataView

 

Объект DataView позволяет одновременно создавать разные представления данных из объекта DataTable и обладает перечисленными ниже свойствами, которые позволяют настраивать способ отображения данных.

• Порядок сортировки (нисходящий или восходящий) по одному или нескольким полям.

• Выражение для фильтрации записей, которое указывает критерии отображения записей на основе значений полей.

• Фильтр состояния записи, который указывает критерии отображения записей на основе состояния записи (см. перечисление DataViewRowState, показанное в табл. 5.3).

Хотя этот способ может показаться аналогичным способу на основе использования метода Select объекта DataTable, они существенно отличаются. С одной стороны, объект DataView – это полностью динамичное представление данных. Помимо изменений значений полей, вставки и удаления записей в таблице-источнике немедленно отражаются в объекте DataView. С другой стороны, метод Select возвращает массив фиксированный длины со ссылками на записи, которые отражают изменения значений полей в таблице-источнике, но не отражают вставку и удаление записей или их упорядочение. Этот динамический аспект объекта DataView особенно эффективно применяется для создания кода, связанного с данными. 

НА ЗАМЕТКУ

Хотя объект DataView аналогичен классическому представлению базы данных, он все же отличается от него следующим:

• не может использоваться как таблица;

• не может быть объединением нескольких таблиц;

• не может исключать поля, которые присутствуют в таблице-источнике;

• не может включать дополнительные поля (например, вычисленные поля), которых нет в таблице-источнике.

Объекты DataView используются с помощью свойства DefaultView объекта DataTable. Предположим, нужно создать представление для таблицы Customers, причем клиенты в нем должны быть упорядочены по почтовым индексам и иметь фамилии, начинающиеся с символа С. Для этого нужно использовать указанные ниже значения двух соответствующих свойств.

dsCustomers.Tables("Customers").DefaultView.RowFilter = _

 "LastName = 'Like C* ' "

dsCustomers.Tables("Customers").DefaultView.Sort = "Zip"

Если необходимо отобразить в представлении текущие значения только из тех записей, которые были изменены (но еще не сохранены), то нужно указать новое значение для свойства RowFilter и значение свойства RowState.

dsCustomers.Tables("Customers").DefaultView.RowFilter = " "

dsCustomers.Tables("Customers").DefaultView.RowStateFilter = _

 DefaultView.RowState.ModifiedCurrent

НА ЗАМЕТКУ

Объект DataView также имеет метод Find для поиска одной записи и метод FindRows для поиска и возвращения нескольких записей. Если нужно извлечь или набор записей, которые соответствуют заданному критерию, вместо динамического представления данных, то с помощью методов Find и FindRows (вместо указания свойства RowFilter) будут возвращены только интересующие нас записи. Этот метод обладает более высокой производительностью, чем метод на основе установки значения свойства RowFilter. Дело в том, что указание значения свойства RowFilter вызывает перестройку индекса представления, а методы Find и FindRows используют уже существующие индексы.

Для таблицы могут быть созданы также дополнительные объекты – представления данных. Для определения еще одного представления таблицы Customers нужно создать еще один объект dvView2 и указать его свойства так, как показано ниже.

dvView2 = New DataView(dsCustomers.Tables("Customers"), _

 "", "LastName", DataViewRowState.CurrentRows)

Теперь, после определения объекта DataView, можно изменить его свойства.

dvView2.RowFilter = "LastName > 'F'"

dvView2.Sort = "LastName DESC"

dvView2.RowStateFilter = DataViewRowState.Current 

НА ЗАМЕТКУ

Объект DataViewManager предлагает удобный централизованный способ управления параметрами представлений для всех таблиц набора данных DataSet.

В большинстве других случаев объект DataView аналогичен объекту DataTable. Доступ к отдельным записям и полям представления осуществляется с помощью объекта DataRowView. Этот объект также поддерживает отношения между таблицами объекта DataSet.

Объект DataView имеет модель редактирования, аналогичную модели редактирования объекта DataTable. Указание значения True для свойств AllowNew, AllowEdit и  AllowDelete означает разрешение на выполнение соответствующих операций редактирования (вставки, изменения и удаления). Методы BeginEdit и EndEdit и CancelEdit объекта DataRowView управляют внесением изменений в объект DataTable. Метод EndEdit вносит изменения в объект DataRow с версией Current. Эти изменения затем принимаются (или отвергаются) базовым объектом DataTable с помощью метода AcceptChanges (или RejectChanges).

Рассмотрим теперь, как описанные выше идеи применяются на практике. Создайте новую форму frmDataViews в проекте DataSetCode (готовая версия этой формы находится в каталоге с примерами главы 5, "ADO.NET: объект DataSet") для создания двух разных представлений одной таблицы Customers. Каждый объект DataGrid отображает данные представления и содержит кнопки управления сортировкой и фильтрацией. Для этого выполните перечисленные ниже действия.

1. В форме frmDataSets проекта DataSetCode создайте новую кнопку под кнопкой Data Adapter Updates.

2. В окне Properties укажите значение btnDataViews для свойства (Name) и значение Data Views для свойства Text этой кнопки.

3. Создайте новую форму.

4. В окне Properties укажите значение frmDataViews для свойства (Name) и значение Dueling Data Views для свойства Text новой формы Form1.

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

6. Создайте в правой части формы сетку данных DataGrid1, текстовое поле txtFilter1 с надписью, поле со списком cboSort1 и надписью, флажок chkDesc1 с надписью, поле со списком cboRowState1 и надписью, кнопку btnApply1, перетаскивая их из панели элементов управления.

7. В окне Properties укажите значение Descending для свойства Text флажка chkDesc1 и значение Apply для свойства Text кнопки btnApply1. Укажите значение DropDownList для свойства DropDownStyle полей со списком cboSort1 и cboRowState1. Укажите для свойства Text надписей значения by Column: и Row State.

8. Укажите значение Default Data View для свойства CaptionText сетки DataGrid1.

9. Расположите элементы управления так, как показано на рис. 7.2. 

РИС. 7.2. Расположение элементов управления в верхней части формы frmDataViews

РИС. 7.З. Окончательный вид формы frmDataViews

10. Выберите все элементы управления и скопируйте их в нижнюю часть формы frmDataViews. Переименуйте все элементы управления (за исключением надписей) так, чтобы их имена заканчивались цифрой 2, а не 1 (например, btnApply2).

11. Укажите значение DataView2 для свойства CaptionText сетки DataGrid2.

Окончательный вид формы frmDataViews показан на рис. 7.3, а ее код представлен в листинге 7.6.

Листинг 7.6. Код создания двух объектов-сеток для отображения разных представлений одной таблицы данных

Imports System

Imports System.Data

Imports System.Data.SqlClient

Public Class frmDataViews

 Inherits System.Windows.Forms.Form

"Windows Form Designer generated code"

 Private dsCustomers As New DataSet()

 Private dvView2 As DataView

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

  ByVal e As System.EventArgs) Handles MyBase.Load

  Dim i As Integer

  Dim col As DataColumn

  ' Инициализация объекта DataAdapter.

  Dim daCustomers As SqlDataAdapter = New _

   SqlDataAdapter("select * from tblCustomer", _

   "server=localhost;uid=sa;database=novelty")

   ' Вставка данных только в ОДНУ таблицу.

  daCustomers.Fill(dsCustomers, "Customers")

  ' Создание второго объекта DataView.

  dvView2 = New DataView(dsCustomers.Tables("Customer"), _

   "", "LastName", DataViewRowState.CurrentRows)

  ' Вставка списка из имен полей.

  For Each col In dsCustomers.Tables("Customers.Columns")

   cboSort1.Items.Add(col.ColumnName)

   cboSort2.Items.Add(col.ColumnName)

  Next

  ' Вставка объекта DataViewRowState.

  Dim names As String()

  names = DataViewRowState.None.GetNames(DataViewRowState.None.GetType)

  For i = 0 To names.GetUpperBound(0)

   cboRowState1.Items.Add(names(i))

   cboRowState2.Items.Add(names(i))

  Next

  ' Указание значений по умолчанию.

  txtFilter1.Text = ""

  txtFilter2.Text = ""

  cboSort1.SelectedItem = "ID"

  cboSort2.SelectedItem = "ID"

  chkDesc1.Checked = False

  chkDesc2.Checked = False

  cboRowState1.SelectedItem = "CurrentRows"

  cboRowState2.SelectedItem = "CurrentRows"

  dsCustomers.Tables("Customers").DefaultView.Sort = "ID"

  dvView2.Sort = "ID"

  ' Связывание сеток данных с таблицей.

  DataGrid1.DataSource = dsCustomers.Tables("Customers").DefaultView

  DataGrid2.DataSource = dvView2

 End Sub

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

  ByVal e As System.EventArgs) Handles btnApply1.Click

  Dim sort As String

  Dim rowState As DataViewRowState

  ' Указание фильтра.

  dsCustomers.Tables("Customers").DefaultView.RowFilter = _

   txtFilter1.Text

  ' Указание сортировки.

  sort = cboSort1.SelectedItem

  If chkDesc1.Checked Then

   sort = sort & " DESC"

  End If

  dsCustomers.Tables("Customers").DefaultView.Sort = sort

  ' Указание состояния записи.

  dsCustomers.Tables("Customers").DefaultView.RowStateFilter = _

   rowState.Parse(rowState.GetType, cboRowState1.SelectedItem)

 End Sub

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

  ByVal e As System.EventArgs) Handles btnApply2.Click

  Dim sort As String

  Dim rowState As DataViewRowState

  ' Указание фильтра.

  dvView2.RowFilter = txtFilter2.Text

  ' Указание сортировки.

  sort = cboSort2.SelectedItem

  If chkDesc2.Checked Then

   sort = sort & " DESC"

  End If

  dvView2.Sort = sort

  ' Указание состояние записи.

  dvView2.RowStateFilter = rowState.Parse(rowState.GetType, _

   cboRowState2.SelectedItem)

 End Sub

End Class

Подпрограмма frmDataViews_Load инициализирует разные объекты формы. Сначала создается объект DataAdapter, который затем используется для загрузки данных из таблицы базы данных в таблицу Customers набора данных DataSet. Далее создаются два представления данных: одно будет содержать создаваемое по умолчанию представление, а другое — новое представление dvView2. Далее объект-представление dvView2 инициализируется для отображения всех текущих записей с сортировкой по фамилии, т.е. по полю LastName.

После этого инициализируются два набора полей со списками. В поле со списком cboSort загружается список имен полей таблицы Customers, а в поле со списком cboRowState — список значений перечисления DataViewRowState.

НА ЗАМЕТКУ

В Visual Basic больше не поддерживается свойство ItemData. Дело в том, что вместо него для преобразования значений перечисления в строки для загрузки их в поле со списком используется метод GetNames перечисления. Аналогично, метод Parse перечисления используется для преобразования строк в значения перечисления при присвоении избранных значений свойству RowStateFilter.

Затем для элементов управления с критериями отбора записей задаются значения по умолчанию, т.е. исходный порядок сортировки для обоих представлений задается по полю ID. Наконец, каждое представление связывается с одной из сеток данных, что приводит к отображению в них всех текущих данных.

Избранные значения критериев применяются для соответствующего представления после щелчка на кнопке Apply. Две подпрограммы btnApplyl_Click и btnApply2_Click идентичны, за исключением того, что они относятся к разным наборам элементов управления. Фильтр записей (значение свойства RowFilter) задается на основании указанного текста в текстовом поле txtFilter, порядок сортировки (значение свойства Sort) — на основании выбранного поля в поле со списком cboSort (с дополнительным модификатором DESC нисходящего порядка), а фильтр состояния записи (значение свойства RowStateFilter) — на основании значения в поле со списком cboRowState2. Изменение свойств представлений, связанных с сетками данных, приводит к автоматическому отображению данных с новыми параметрами представления.

Скомпонуем проект DataSetCode и запустим полученное приложение. Щелкните на кнопке Data Views для отображения новой формы frmDataViews. Внесите необходимые изменения в критерии сетки и щелкните на кнопке Apply для внесения этих изменений в соответствующую сетку. На рис. 7.4 показан пример отображения данных из одной таблицы в двух разных представлениях.

Попробуйте выбрать разные поля сортировки и состояния записей для организации разных представлений. Попробуйте использовать разные фильтры, например сложные выражения ID > 10 AND ID < 18 или LastName Like с. Более подробные сведения о правилах создания фильтров приводятся в разделе с описанием свойства DataColumn.Expression справки Visual Studio .NET.

Кроме того, сетки автоматически поддерживают операции вставки, изменения и удаления записей, поэтому попробуйте отредактировать записи и выбрать соответствующее состояние для отображения только измененных записей.  

РИС. 7.4. Пример отображения данных из одной таблицы в двух разных представлениях формы frmDataViews

НА ЗАМЕТКУ

Обратите внимание, как разные представления одной таблицы данных отображаются в сетках данных. Если вставить, изменить или удалить запись в одном представлении (и применить изменение за счет перехода к следующей записи), то внесенные изменения будут автоматически отображены в другом представлении (если, конечно, эта запись соответствует заданному фильтру).

 

Бизнес-ситуация 7.1: просмотр данных из разных источников

Когда компания Jones Novelties, Inc. приняла решение создать новую систему обработки данных, она уже имела прежнюю систему на основе базы данных Access, в которой директор компании Брэд Джонс хранил данные о заказах. Для директора очевидны преимущества перехода к новой системе на основе СУБД SQL Server, но прежде всего он хотел бы гарантировать сохранность унаследованных данных. Поэтому было решено вносить все изменения постепенно, особенно для сохранения данных компании запрошлые годы.

Итак, Джонс хотел бы создать новую систему на основе SQL Server, но иногда использовать старые данные из базы данных Access до тех пор, пока не будет закончена работа над новой системой. Поэтому часть данных должна храниться в одной базе данных, а часть — в другой. Две базы данных должны совместно использовать и даже объединять свои данные, хотя они относятся к разным типам баз данных.

К счастью, это требование легко удовлетворяется в модели ADO.NET. Как уже описывалось выше в главе, для объекта DataSet совершенно не имеет значения, откуда, т.е. из каких источников, берутся данные. Поэтому разработчик базы данных может создать приложение, загружая данные о заказах из таблицы tblOrder базы данных Access, а данные о клиентах — из таблицы 1 базы данных SQL Server. В дальнейшем, после создания в базе данных SQL Server таблицы tblOrder, достаточно будет только изменить строку подключения в объекте DataAdapter, и приложение будет функционировать, как и прежде.

Попробуем создать форму, которая демонстрирует описанный способ работы с данными из разных источников.

1. Запустите интегрированную среду разработки Visual Studio .NET.

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

3. Назовите проект BusinessCase71.

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

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

6. В окне Properties укажите значение frmShowOrders для свойства (Name) и значение Show Orders для свойства Text формы Form1.

7. В верхнем левом углу формы создайте текстовое поле и укажите значение txtCustomerID для его свойства (Name), создайте кнопку и укажите значение btnFinds для ее свойства (Name) и значение Find для ее свойства Text, создайте поле со списком и укажите значение lstCustomer с для его свойства (Name). В правой части формы создайте сетку данных и укажите значение grdOrders для ее свойства (Name).

8. Расположите все эти элементы управления так, как показано на рис. 7.5.

9. Перетащите в форму из панели элементов управления компонент DataSet и укажите значение dsCustOrders для его свойства (Name).

10. Создайте новый объект SqlDataAdapter для таблицы tblCustomers базы данных Novelty СУБД SQL Server, перетаскивая его из панели элементов управления. После запуска программы-мастера DataAdapter Configuration Wizard выберите подключение к базе данных Novelty. Затем в диалоговом окне Choose a Query Туре выберите переключатель Use SQL statements.

11. В диалоговом окне Generate the SQL statements укажите команду SELECT * FROM tblCustomer для загрузки данных в объект — набор данных.

12. По окончании работы с программой-мастером DataAdapter Configuration Wizard укажите значение daCustomers для свойства (Name) для созданного объекта — адаптера данных. 

РИС. 7.5. Расположение элементов управления в форме frmShowOrders

13. Для таблицы tblOrder, которая находится в базе данных Novelty.MDB Access создайте объект OleDbDataAdapter, перетаскивая его из панели элементов управления. После запуска программы-мастера Data Adapter Configuration Wizard создайте новое подключение, щелкнув на кнопке New Connection. Затем в диалоговом окне Data Link Properties выберите вкладку Provider и провайдер Microsoft Jet 4.0 OLE DB Provider.

14. Затем выберите вкладку Connection и укажите путь к файлу базы данных Novelty.MDB.

15. Затем в диалоговом окне Choose a Query Type выберите переключатель Use SQL statements.

16. В диалоговом окне Generate the SQL statements укажите команду SELECT * FROM tblOrder для загрузки данных в объект — набор данных.

17. По окончании работы с программой-мастером Data Adapter Configuration Wizard укажите значение daOrders для свойства (Name) для созданного объекта — адаптера данных.

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

Imports System

Imports System.Data

Imports System.Data.SqlClient

Imports System.Data.OleDb

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

Листинг 7.7. Код объединения данных из источников данных разного типа

Private dvOrders As New DataView()

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

 ByVal e As System.EventArgs) Handles MyBase.Load

 Dim rel As DataRelation

 ' Вставка таблиц в набор данных

 dsCustOrders. daCustomers.Fill(dsCustOrders, "Customers")

 daOrders.Fill(dsCustOrders, "Orders")

 ' Создание отношения между таблицами.

 rel = dsCustOrders.Relations.Add("relCustOrders", _

  dsCustOrders.Tables("Customers").Columns("ID"), _

  dsCustOrders.Tables("Orders").Columns("CustomerID"))

 ' Указание первичного ключа для таблицы Customers.

 Dim pk(0) As DataColumn

 pk(0) = dsCustOrders.Tables("Customers").Columns("ID")

 dsCustOrders.Tables("Customers").PrimaryKey = pk

 ' Указание сортировки по умолчанию для метода Find.

 dsCustOrders.Tables("Customers").DefaultView.Sort = "ID"

End Sub

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

 ByVal e As System.EventArgs) Handles btnFind.Click

 Dim RowNum As Integer

 Dim dvRow As DataRowView

 Dim i As Integer

 If IsNumeric(txtCistID.Text) Then

  RowNum = dsCustOrders.Tables("Customers"). _

  DefaultView.Find(txtCustID.Text)

  If RowNum <> -1 Then

   dvRow = dsCustOrders.Tables("Customers").DefaultView(RowNum)

   ' Вставка в поле со списком имен полей из таблицы Customer.

   lstCustomer.Items.Clear()

   For i = 0 To dsCustOrders.Tables("Customers").Columns.Count – 1

    lstCustomer.Items.Add(dvRow.Item(i))

   Next

   grdOrders.CaptionText = _

    "Orders for customer #" & txtCustID.Text

   ' Извлечение связанных дочерних записей для

   ' указанного клиента таблицы Customer.

   dvOrders = dvRow.CreateChild("relCustOrders")

   grdOrders.DataSource = dvOrders

  Else

   MessageBox.Show( _

    "CustomerID not found – Please try again.")

   ' "Клиент CustomerID не найден – Попробуйте еще раз."

   txtCustID.Clear()

  End If

 Else

  Beep()

 End If

End Sub

Все параметры источников данных задаются в подпрограмме frmShowOrders_Load. Затем создаются две таблицы для набора данных DataSet и отношение DataRelation между ними. Наконец, задаются значения свойств РrimaryKey и Sort для таблицы Customers и его представления по умолчанию DefaultView, чтобы для поиска записей можно было использовать метод Find.

Щелчок на кнопке Find приводит к выполнению нескольких операций, которые определены в коде подпрограммы btnFind_Click. После проверки числового типа значения в поле txtCustID начинается поиск этого значения в представлении DefaultView таблицы Customers. Если указанное значение найдено, то в поле со списком DataRowView будут показаны значения всех полей искомой записи с заданным идентификатором из таблицы Customers, а в сетке данных справа будут показаны ее дочерние записи из таблицы Orders.

Обратите внимание, что в данном примере создано отношение между двумя таблицами из баз данных совершенно разного типа!

Скомпонуйте проект BusinessCase7 и попробуйте найти родительскую запись в таблице Customers и ее дочерние записи из таблицы Orders, как показано на рис. 7.6.

РИС. 7.6. Пример представления результатов в форме frmShowOrders

НА ЗАМЕТКУ

Пусть вас не смущает, что сетка данных Orders (см. рис. 7.6) будет содержать поле с именем OrderAmount, а не поле Amount, как определено в таблице SQL Server. Дело в том, что данные о клиенте поступают из базы данных SQLServer, а данные о его заказах — из совершенно другой "унаследованной" базы данных Access типа MDB. Поэтому вполне естественно, что имена объектов в разных базах данных могут иметь различные имена.

Для исправления имени поля можно использовать приведенную ниже команду с предложением AS для изменения имени поля в данных, которые возвращаются для объекта daOrders с помощью команды SELECT.

SELECT CustomerID, ID, As Amount, OrderDate

FROM tblOrder

С течением времени необходимость комбинирования данных из разных источников будет расти, поскольку современные компании стремятся расширять круг своих партнеров и объединяются с другими компаниями, которые могут хранить и использовать свои бизнес-данные в совершенно разных форматах. В последнее время растет популярность формата XML, который позволяет очень просто и быстро переносить данные о заказах и продуктах между разными компаниями. Для объекта DataSet формат XML представляет собой еще один способ вставки данных в таблицы из разных источников данных. Более подробно способы вставки данных в объект DataSet в формате XML описываются в главе 10, "ADO.NET и XML".

 

Строго типизированные наборы данных

До сих пор обсуждались варианты использования нетипизированного объекта DataSet. Однако в модели ADO.NET и среде Visual Studio. NET предусмотрены способы создания типизированных объектов DataSet. Типизированный объект DataSet является производным от нетипизированного класса DataSet, но содержит объекты, методы, свойства и события, специфические для используемой схемы данных. Она определяется в файле схемы с расширением .xsd, а в среде Visual Studio .NET предусмотрены графические инструменты для генерации набора классов на основе этой схемы.

Поскольку типизированный объект DataSet является производным от нетипизированного класса DataSet, он наследует все функции, свойства, методы и события, а значит, может использоваться в тех же ситуациях, где применяется нетипизированный класс DataSet. Однако его элементы являются строго типизированными и предлагают дополнительные функции, что способствует повышению производительности и надежности.

• Типизированные объекты DataSet, DataTable и DataRow являются специализированными для используемой схемы.

• Типизированные объекты DataColumn и DataRelation предлагаются как специализированные именованные свойства, а не универсальные элементы коллекций.

• Для типизированных объектов можно выполнять проверку типов во время компиляции.

• В редакторе кода в среде Visual Studio .NET предусмотрено использование средства IntelliSense.

• Код имеет более краткую и читабельную форму.

Например, команда указания нового значения для поля таблицы будет иметь следующий вид:

dsCustomers.tables("Customers").Rows(row)("FirstName") = NewValue

Здесь row — это индекс в коллекции записей Rows таблицы Customers, FirstName — поле таблицы Customers, a NewValue — новое присваиваемое значение. При таком кодировании нетипизированного набора данных могут возникать разные ошибки. Соответствует ли тип нового значения NewValue типу поля, которому оно присваивается? Существует ли таблица Customers? Существует ли поле FirstName? Правильно ли указано имя поля или таблицы? При этом получить сообщение об ошибке можно будет только во время выполнения приложения.

Однако при использовании типизированного набора данных все свойства имеют специализированные значения для заданной схемы, а потому проверка типов выполняется еще во время создания приложения. Соответствующий код для типизированного набора данных DataSet с таблицей Customers будет иметь вид

dsCustomers.Customers(row).FirstName = NewValue

Обратите внимание, что объект-таблица Customers теперь является специализированным свойством типизированного набора данных DataSet, а поле FirstName — специализированным свойством типизированного объекта Customers. Продемонстрируем кратко, как в редакторе кода среды Visual Studio .NET используется средство IntelliSense.

Вернемся к таблице Departments для демонстрации этого способа работы на примере проекта DataSetCode из главы 5, "ADO.NET: объект DataSet".

1. Откройте проект DataSetCode в среде Visual Studio .NET.

2. В форме под кнопкой Data Views создайте кнопку, перетаскивая ее из панели элементов управления.

3. В окне Properties укажите значение btnTypedDataSet для свойства (Name) и значение Typed DataSet для свойства Text этой кнопки.

Теперь нужно включить в проект используемую схему: либо обратиться к уже готовому файлу с расширением .xsd, либо создать новый с помощью компонентов вкладки Data панели элементов управления.

1. Вставьте в форму новый компонент SqlDataAdapter. В диалоговом окне программы-мастера Data Adapter Configuration Wizard выберите подключение к базе данных Novelty. Затем в диалоговом окне Choose a Query Type выберите переключатель Use SQL statements. В диалоговом окне Generate the SQL statements укажите команду SELECT * FROM tblDepartment для загрузки данных в объект — набор данных. По окончании работы с программой-мастером Data Adapter Configuration Wizard укажите значение daDepartments для свойства (Name) для созданного объекта — адаптера данных.

2. Откройте диалоговое окно Generate DataSet (Создать набор данных), выбрав команду меню Data→Generate DataSet или щелкнув правой кнопкой мыши на форме и выбрав в контекстном меню команду Generate DataSet. В группе переключателей Choose a dataset (Выбрать набор данных) выберите переключатель New (Создать), введите в текстовом поле имя DepartmentDS, установите флажок Add this dataset to the designer (Включить этот набор данных в приложение) и щелкните на кнопке OK.

3. Укажите значение dsDepartments для свойства (Name) для созданного объекта — набора данных.

После выполнения этих действий генератор набора данных включит в проект файл схемы DepartmentDS.xsd и файл DepartmentDS.vb, который реализует специализированные классы набора данных DataSet. Файлы отображаются только после щелчка на кнопке Show all files (Показать все файлы) в верхней части окна Solution Explorer.

4. Щелкните дважды на файле DepartmentDS.xsd в окне Solution Explorer для отображения диалогового окна редактирования схемы XML.

5. Попробуйте внести небольшие изменения в имена элементов схемы. Вместо имени tblDepartment укажите в самом верхнем левом текстовом поле имя Departments, как показано на рис. 7.7.

РИС. 7.7. Схема DepartmentsDS в окне редактирования схемы

6. Щелкните правой кнопкой мыши на окне редактирования схемы и убедитесь в том, что в контекстном меню установлен флажок параметра Generate Dataset. Он устанавливается по умолчанию, но если он все же не установлен по какой-то причине, то установите его снова.

7. Сохраните схему и закройте окно редактирования схемы. В результате этих действий будет автоматически сгенерирован файл DepartmentsDS.vb.

НА ЗАМЕТКУ

Для просмотра содержимого файла DepartmentsDS.vb откройте его в окне редактирования кода. Учтите, что для указанного имени таблицы Departments генератор кода в дополнение к уже имеющемуся типизированному объекту создаст следующие объекты:

DepartmentsDataTable

DepartmentsDataRow

DepartmentsRowChangeEvent  

Теперь следует создать код для использования типизированного объекта DepartmentsDS, который показан в листинге 7.8.

Листинг 7.8. Код отображения содержимого типизированного объекта DepartmentsDS

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

 ByVal e As System.EventArgs) Handles btnTypedDataSet.Click

 daDepartments.Fill(dsDepartments, "Departments")

 DisplayDepartments(dsDepartments)

End Sub

Private Sub DisplayDepartments(ByVal ds As DepartmentsDS)

 Me.lstOutput.Items.Clear()

 Me.lstOutput.Items.Add("DISPLAY TYPED DATASET")

 Me.lstOutput.Items.Add("=====================")

 ' Каждое поле теперь является свойством объекта DepartmentsDS.

 Dim row As DepartmentsDS.DepartmentsRow

 For Each row In ds.Departments.Rows

  Me.lstOutput.Items.Add( _

   ds.Departments.IDColumn.ColumnName _

   & ": " & row.ID.ToString)

  Me.lstOutput.Items.Add( _

   ds.Departments.DepartmentNameColumn.ColumnName _

   & ": " & row.DepartmentName)

 Next

End Sub

В подпрограмме btnTypedDataSet_Click сначала используется метод Fill объекта daDepartments для вставки данных в таблицу Department. Затем вызывается подпрограмма DisplayDepartments для отображения содержимого таблицы с помощью циклического обхода всех записей таблицы с указанием имени поля и значения в нем. Этот подход несколько отличается от описанных ранее.

• Переменная row создается с указанием типа записи DepartmentDS.DepertmentsRow, а не как универсальный объект DataRow.

• Таблица Departments доступна как свойство объекта ds.Departments, а не как элемент коллекции таблиц Tables, т.е. ds.Tables("Departments").

• Поля таблицы доступны как свойства объекта-таблицы, например ds.Column и ds.Departments.DepartmentNameColumn, а не как элементы коллекции полей Columns, т.е. ds.Tables("Departments").Columns("ID") и ds.Tables("Departments").Columns("DepartmentName").

• Значения полей доступны как свойства объекта-записи, например row.ID и row. DepartmentName, а не как элементы коллекции значений Items объекта-записи Rows, т.е. row("ID") и row("DepartmentName").

На рис. 7.8 показано, как типизированные свойства (например, DepartmentName) представлены в контекстном меню средства IntelliSense, которое ускоряет процесс создания кода.

РИС. 7.8. Контекстное меню средства IntelliSense со свойствами типизированного объекта DataSet

 

Резюме

В этой главе рассматривается несколько важных аспектов создания приложений баз данных в модели ADO.NET. Обработка параллельных попыток доступа к данным является важным компонентом многопользовательской системы, особенно при работе с набором данных в неподключенном режиме. Отображения таблиц и полей существенно улучшают читабельность и упрощают процесс сопровождения кода. С помощью объектов-представлений одни и те же данные можно представлять по-разному со своим собственным фильтром и параметрами сортировки. Наконец, строго типизированный объект — набор данных позволяет применять усовершенствованные функции и повышает читабельность кода при использовании в особых ситуациях.

 

Вопросы и ответы

Мне понятно, как определить нарушение параллельного доступа, но как его устранить?

Ответ на этот вопрос зависит от конкретного приложения. Во-первых, при обнаружении нарушения параллельного доступа можно повторно отправить запрос к базе данных и начать работу с начала. Во-вторых, можно позволить второму пользователю переопределить изменения, внесенные первым пользователем. В-третьих, право окончательного выбора можно предоставить пользователю, предлагая ему все три набора данных: исходные значения, текущие значения и измененные им значения. Наконец, можно предложить алгоритм или логические правила для определения оптимального варианта самим приложением. При этом определяющим фактором выбора может быть приоритет или роль пользователя (например, изменения, внесенные руководителем, имеют более высокий приоритет, чем внесенные рядовым сотрудником). В модели ADO.NET и среде Visual Studio .NET предусмотрены специальные инструменты для обнаружения нарушений при параллельном доступе к данным. Разработчику остается только выбрать наиболее подходящие для создаваемого приложения.

Всегда ли следует использовать типизированные наборы данных?

Как обычно, ответ на этот вопрос зависит от конкретного приложения. В данной главе описаны преимущества типизированных наборов данных, но иногда предпочтительнее использовать нетипизированные наборы данных. Это верно в тех случаях, когда схема набора данных не известна или может изменяться. Классическим примером такой ситуации является использование незапланированных запросов, которые создаются пользователем при работе с приложением. Кроме того, схема может находиться в XML-файле, содержимое которого не известно во время создания приложения и генерации типизированного набора данных.

Еще одним недостатком использования типизированных наборов данных является необходимость повторной генерации и компиляции типизированных объектов — наборов данных при изменении схемы данных.

Наконец, стандартный нетипизированный объект DataSet настолько прост в использовании, что он может служить альтернативным вариантом для работы с данными без применения какой-то определенной схемы. Дополнительными преимуществами объекта DataSet является возможность работы с данными в формате XML.

 

ГЛАВА 8

Работа с проектом базы данных среде Visual Studio .NET

 

Проект базы данных — это особый тип проекта Visual Studio .NET, предназначенный для создания и управления SQL-сценариями баз данных.

Чтобы разработка приложений для работы с базами данных была проще и удобнее, в последнюю версию Visual Studio .NET включено множество новых полезных инструментов, а также усовершенствованных прежних инструментов, которые присутствовали в ранних версиях программы.

Инструменты Visual Studio .NET для работы с базой данных позволяют пользователю, не выходя за пределы среды Visual Studio .NET, быстро создавать, изменять и тестировать объекты баз данных: таблицы, представления, запросы, хранимые процедуры и т.д. Главное достоинство данного продукта состоит в существенном повышении эффективности проектирования и создания программных продуктов. Кроме того, значительно упростилась установка и лицензирование программы.

Некоторые из рассмотренных далее инструментов описаны в предыдущих главах, а их использование часто имеет интуитивно понятный характер. Многие инструменты должны быть хорошо известны пользователям, которые имеют опыт работы с базами данных Microsoft Access. Тем же, кто сталкивается с такими инструментами впервые, будет полезно познакомиться со справочными материалами Visual Studio .NET.

В этой главе описываются способы применения инструментов проекта базы данных Visual Studio .NET для работы с базами данных.

 

Создание проекта базы данных

Проект базы данных Visual Studio.NET предназначен для разработки, тестирования и выполнения сценариев и запросов SQL, а также для управления ими. Этот проект не связан напрямую ни с одним из .NET-совместимых языков программирования, например Visual Basic или С#. При разработке многоуровневого приложения данный тип проекта упрощает процесс проектирования и создания уровня базы данных, а также управления им.

В одних приложениях проект базы данных может быть частью кода приложения, а в других — отдельным администрирующим решением, которое используется для установки и сопровождения базы данных создаваемого приложения.

Для включения проекта базы данных в решение Visual Studio .NET выполните перечисленные ниже действия.

1. Откройте диалоговое окно Add New Project (Создать новый проект), выбрав команду меню File→Add Project→New Project (Файл→Создать проект→Новый проект) или щелкнув правой кнопкой мыши на названии решения в окне Solution Explorer и выбрав в контекстном меню команду Add→New Project (Создать→Новый проект).

2. В левой части Project Types (Типы проектов) диалогового окна Add New Project найдите каталог Other Projects (Другие проекты) и раскройте его, щелкнув на пиктограмме с изображением знака "плюс".

3. Выберите каталог Database Projects (Проекты баз данных), а затем выберите шаблон Database Project (Проект баз данных) в правой части окна Templates (Шаблоны).

4. В текстовом поле Name (Имя) укажите имя проекта NoveltyData, в текстовом поле Location (Расположение) укажите путь к файлам проекта, а затем щелкните на кнопке OK.

5. На экране отобразится диалоговое окно SQL Server Login (Регистрация в SQL Server) с предложением выбрать используемый сервер баз данных и ввести учетное имя и пароль. В списке Server (Сервер) выберите сервер (local) и установите флажок параметра Trusted Connection (Доверительное подключение).

6. Если ранее в окне Server Explorer не были определены никакие подключения к базе данных, то на экране отобразится диалоговое окно Data Link Properties (Свойства подключения к базе данных), в котором можно определить новое подключение к базе данных.

7. Если в окне Server Explorer уже определено хотя бы одно подключение к базе данных, то на экране появится диалоговое окно Add Database Reference (Создать ссылку на базу данных). В списке имеющихся ссылок выберите нужную ссылку или щелкните на кнопке Add New Reference (Создать новую ссылку), чтобы открыть диалоговое окно Data Link Properties (Свойства подключения к базе данных), в котором можно определить новое подключение к базе данных.

8. В списке имеющихся ссылок выберите ссылку на базу данных Novelty и щелкните на кнопке OK. (Если этой ссылки все же нет, ее придется создать, щелкнувна кнопке Add New Reference.)

9. На рис. 8.1 показан итоговый вид созданного проекта и его подчиненных папок в окне Solution Explorer.

РИС. 8.1. Итоговый вид проекта NoveltyData в окне Solution Explorer

Обратите внимание на то, что проект NoveltyData содержит следующие папки:

• Change Scripts (Сценарии изменения данных);

• Create Scripts (Сценарии создания данных);

• Queries (Запросы);

• Database References (Ссылки на базы данных).

Рассмотрим подробнее эти папки и их содержимое. Начнем с папки Database References, потому что с нее начинается любая работа с базами данных.

 

Ссылки на базы данных

Ссылка на базу данных является указателем на нее, но она не позволяет осуществлять доступ к объектам базы данных и их просмотр, так как за это отвечает подключение к базе данных.

Ссылка на базу данных — это хранимая на жестком диске часть проекта базы данных. При открытии проекта она автоматически считывается для учета всех определенных в окне Server Explorer подключений к базам данных и поиска соответствующего ссылке подключения. Если указанного подключения нет, то ссылка автоматически создает его.

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

НА ЗАМЕТКУ

Пиктограмма используемой по умолчанию ссылки на базу данных содержит красную, зеленую или белую стрелку ярлыка, а все пиктограммы всех других ссылок на базы данных содержат черную или белую стрелки.

Для указания другой ссылки в качестве используемой по умолчанию следует щелкнуть на нужной ссылке и в контекстном меню установить флажок Set as Project Default (Использовать по умолчанию).

Для создания новых ссылок на базы данных щелкните правой кнопкой мыши на папке Database References (Ссылки на базы данных), а затем выберите в контекстном меню команду New Database Reference (Создать ссылку на базу данных).

СОВЕТ

Можно одновременно создать ссылку на базу данных и указать ее в качестве используемой по умолчанию. Для этого щелкните правой кнопкой мыши на названии проекта базы данных в окне Solution Explorer и выберите в контекстном меню команду Set Default Reference (Указать используемую по умолчанию ссылку). На экране появится диалоговое окно Set Default Reference (Указать используемую по умолчанию ссылку), нового подключения к базе данных ссылка на него включается в проект;и впредь используется по умолчанию.

 

Сценарии

 

Шаблон проекта базы данных автоматически создает две папки для хранения сценариев SQL. Папка Create Scripts (Сценарии создания данных) содержит сценарии SQL, которые отражают предполагаемые изменения в базе данных. Изменения могут быть отложены, так как разработчик не имеет достаточных полномочий для изменения рабочей базы данных (иногда это бывает весьма полезно) или несколько изменений предполагается объединить и внести одновременно.

Любой сценарий SQL можно создать вручную, щелкнув правой кнопкой мыши на имени папки (или имени проекта) в окне Solution Explorer, а затем выбрав в контекстном меню команду Add New Item (Создать новый элемент) или Add SQL Script (Создать сценарий SQL). Выбрав один из стандартных шаблонов сценариев (рис. 8.2), их можно отредактировать вручную в редакторе Visual Studio .NET.

НА ЗАМЕТКУ

Хотя имена каталогов даются в соответствии с принятым соглашением об именах, их все же можно изменить. Однако при этом следует учитывать вероятность того, что это может запутать других разработчиков проекта.

В проект базы данных можно включить другие папки. Например, отдельную папку можно создать для хранения сценариев обновления базы данных до указанной версии или для других видов действий. Аналогично, можно создать разные папки для хранения запросов разного типа. Для создания новой папки в проекте базы данных щелкните правой кнопкой мыши на имени проекта и выберите в контекстном меню команду New Folder (Создать папку).

РИС. 8.2. Стандартные шаблоны сценариев SQL в диалоговом окне Add New Item

Следует отметить, что сценарии создания и изменения данных могут создаваться автоматически.

НА ЗАМЕТКУ

Сценарии создания данных можно генерировать только в SQL Server 2000 или Server 7.0. Более для их использования на компьютере с Visual Studio .NET нужно установить клиентские инструменты SQLServer.

 

Сценарии создания данных

Как уже упоминалось ранее, папка Create Scripts содержит сценарии создания новых объектов базы данных, включая таблицы, представления, хранимые процедуры и ограничения. Обычно они используются для создания сценариев установки рабочей базы данных или возвращения тестовой базы данных к исходному состоянию.

Для генерации сценариев создания данных выполните перечисленные ниже действия.

1. Откройте окно Server Explorer и щелкните правой кнопкой мыши на элементе, для которого предполагается создать сценарий. Этим элементом может быть вся база данных или отдельный объект (таблица, представление, хранимая процедура или функция). В этом примере следует выбрать базу данных Novelty.

2. Выберите в контекстном меню команду Generate Create Script (Генерировать сценарий создания данных). При условии успешного ввода учетной записи и пароля на предыдущем этапе создания ссылки на эту базу данных на экране отобразится диалоговое окно Generate Create Scripts (Генерировать сценарии создания данных).

3. Диалоговое окно Generate Create Scripts будет сконфигурировано только для избранного объекта. Например, после выбора базы данных Novelty оно будет иметь такой вид, как на рис. 8.3, с отображением всех объектов этой базы данных, но еще без выбора отдельных объектов для работы с генерируемым сценарием.

Рис. 8.3. Диалоговое окна Generate Create Scripts для базы данных Novelty

4. Во вкладке General (Общие) можно указать объекты, включаемые в генерируемый сценарий, выбрав один или несколько объектов в списке Objects on Novelty (Объекты базы данных Novelty) и щелкнув на кнопке Add (Включить в сценарий) либо дважды щелкнув на выбранном объекте. Для включения в сценарий целой группы объектов, например всех объектов одного типа, т.е. всех таблиц или всех представлений, нужно установить соответствующий флажок, т.е. Script all Objects (Включить все объекты), All tables (Все таблицы), All views (Все представления) и т.д. В данном примере выберите флажок Script all objects.

5. Выберите вкладку Formatting (Форматирование) и, помимо указанных по умолчанию параметров, установите флажок Include descriptive headers in the script files (Включить в сценарий описательные заголовки).

6. Щелкните на кнопке OK, и на экране появится диалоговое окно Browse for Folder (Выбор папки), где необходимо выбрать папку, в которой следует сохранить файл генерируемого сценария. Обратите внимание, что по умолчанию выбирается папка Create Scripts текущего проекта, хотя ее, конечно, можно выбрать по своему желанию. В данном примере используется предлагаемая по умолчанию папка Create Scripts. Для продолжения работы щелкните на кнопке OK.

РИС. 8.4. Итоговый вид окна Solution Explorer с файлами сценариев для базы данных Novelty

Поскольку в диалоговом окне Generate Create Scripts были выбраны все объекты базы данных, то в проект базы данных будет включено несколько файлов сценария, как показано на рис. 8.4. Учтите, что данный сценарий можно включить в один файл. Для этого нужно во вкладке Options (Параметры) диалогового окна Generate Create Scripts выбрать в группе Files to Generate (Генерировать файлы) переключатель Create one file (Создать один файл).

СОВЕТ

Устанавливая флажок Script database (Сгенерировать сценарий базы данных) во вкладке Options диалогового окна Generate Create Scripts, можно даже сгенерировать сценарий создания самой базы данных. В этом примере проект базы данных NoveltyData содержит набор сценариев для создания всех объектов базы данных Novelty бы применения этих сценариев демонстрируются в следующих разделах.

8. Для просмотра (или изменения) содержимого файла сценария дважды щелкните на нем в окне Solution Explorer. На рис. 8.5 показано содержимое сценария dbo.tblOrder.tab, который создает таблицу tblOrder в базе данных Novelty.

Обратите внимание на то, что эти сценарии создают только схему базы данных, но не вставляют в созданные таблицы никаких данных. Способы копирования данных в таблицы будут показаны далее в разделе о командных файлах.

РИС. 8.5. Содержимое сгенерированного сценария создания таблицы tblOrder

 

Сценарии изменения данных

Для внесения изменений в существующую схему базы данных используются сценарии изменения данных. Хотя они могут создаваться вручную, все же предпочтительнее для этого использовать специальные инструменты. В главах 1, "Основы построения баз данных", и 2, "Запросы и команды на языке SQL", рассматриваются инструменты Visual Studio .NET, предназначенные для работы с базой данных. Они способны автоматически создавать сценарий для любых изменений схемы базы данных.

Допустим, требуется создать новое поле StartDate в таблице tblEmployee для даты зачисления каждого сотрудника. Для этого выполните перечисленные ниже действия.

1. В окне Server Explorer раскройте папку Tables базы данных Novelty и щелкните правой кнопкой мыши на таблице tblEmployee.

2. Выберите в контекстном меню команду Design Table (Создание таблицы) для перехода в режим конструктора таблицы.

3. Создайте новое поле StartDate и укажите для него тип данных datetime, как показано на рис. 8.6.

Чтобы внести данное поле во все уже инсталлированные и доставленные базы данных в географически разных местах, потребуется создать сценарий изменений. Для этого выполните перечисленные ниже действия.

1. Выберите команду меню Diagram→Generate Change Script (Диаграмма→Генерация сценария изменения) или щелкните на кнопке Generate Change Script (Генерация сценария изменения) в панели инструментов. На экране появится диалоговое окно Save Change Script (Сохранение сценария изменения) с областью предварительного просмотра текста сценария (рис. 8.7).

РИС. 8.6. Создание нового поля StartDate в таблице tblEmployee

РИС. 8.7. Диалоговое окна Save Change Script с содержимым сценария вставки поля StartDate в таблицу tblEmployee

2. Щелкните на кнопке Yes, и на экране появится стандартное диалоговое окно Save As (Сохранить как) с предложением сохранить данный сценарий в папке Change Scripts текущего проекта базы данных.

3. Щелкните на кнопке Save для сохранения сценария с принимаемым по умолчанию именем tblEmployee.sql.

4. Закройте режим конструктора таблицы и в ответ на предложение сохранить внесенные изменения щелкните на кнопке No. В следующем разделе описываются способы внесения изменений с помощью запуска только что созданного сценария SQL.

5. Щелкните дважды на сценарии tblEmployee.sql для просмотра содержимого сохраненного файл сценария, которое показано на рис. 8.8.

РИС. 8.8. Просмотр содержимого файла сценария tblEmployee.sql

(Учтите, что вместо учетного имени sa в строке User: sa может быть указано другое используемое вами учетное имя пользователя SQL Server, а вместо имени сервера HR426 в строке Server: HR426 — имя другого используемого вами сервера. — Прим. ред.)

 

Запуск сценария

Сценарий можно запустить непосредственно в окне Solution Explorer. Проще всего перетащить сценарий и опустить его на ссылку на базу данных, в которую нужно внести изменения. Или иначе, щелкните правой кнопкой мыши на сценарии и выберите в контекстном меню команду Run (Запустить) или Run On (Запустить для). Команда Run выполняет сценарий по отношению к используемой по умолчанию ссылке на базу данных, а команда Run On позволяет выбрать другую базу данных в одноименном диалоговом окне (рис. 8.9). Учтите, что, кроме выбора уже существующей ссылки на базу данных, можно создать совершенно новую ссылку. (Перед этим на экране появится диалоговое окно SQL Server Login для выбора сервера и регистрации на нем. — Прим. ред.)

РИС. 8.9. Диалоговое окно Run On

НА ЗАМЕТКУ

Для запуска сценария можно выбрать временную ссылку на базу данных. Щелкните дважды на последнем элементе <temporary reference> списка ссылок для отображения уже знакомого диалогового окна Data Link Properties, предназначенного для определения новой ссылки на базу данных. Однако эта ссылка не обязательно должна быть включена в проект или окно Server Explorer.

Для внесения изменений в базу данных с помощью сценария tblEmployee.sql выполните перечисленные ниже действия.

1. Убедитесь в том, что таблица tblEmployee не содержит поле StartDate. Для этого в окне Server Explorer раскройте папку таблицы tblEmployee для просмотра всех полей данной таблицы, как показано на рис. 8.10.

2. Раскройте папку Change Scripts в окне Solution Explorer и выберите сценарий tblEmployee.sql.

3. В окне Solution Explorer перетащите и опустите данный сценарий на ссылку на базу данных Novelty.

4. После этого на экране появится диалоговое окно Execute Scripts and Queries (Выполнить сценарии или запросы) для подтверждения запуска сценария для указанной базы данных. Щелкните на кнопке Yes для запуска сценария и продолжения работы.

5. Повторите действия, описанные в п. 1, чтобы вновь отобразить поля таблицы tblEmployee (или просто щелкните на кнопке Refresh в панели инструментов окна Server Explorer) для того, чтобы убедиться в наличии нового поля StartDate в таблице tblEmployee.

РИС. 8.10. Отображение полей таблицы tblEmployee

 

Командные файлы

Создав большое количество сценариев создания и изменения разных объектов базы данных, неплохо объединить их в одной логической группе для одновременного запуска. Именно для этого в Visual Studio .NET предусмотрены командные файлы с расширением .cmd. Они могут использоваться в операционных системах Windows 2000 или Windows XP, которые способны распознать такие файлы. Например, командный файл можно применить для загрузки данных во вновь созданную таблицу, экспортируя данные из уже существующей базы данных.

НА ЗАМЕТКУ

Способность простого и автоматического создания сценария загрузки данных, помимо создания схемы и объектов базы данных, является именно тем компонентом среды Visual Studio .NET, которого нет в программе SQL Server Enterprise Manager.

Итак, попробуем создать один командный файл, чтобы автоматически запустить все сценарии для создания совершенно новой версии базы данных Novelty на другом компьютере. Хотя новая версия базы данных будет иметь собственные данные о клиентах, сотрудниках и заказах, данные о товарах в таблице tblInventory будут одинаковыми. Для этого в новой базе данных нужно наполнить таблицу tblInventory данными о товарах из уже существующей таблицы tblInventory.

Чтобы создать командный файл загрузки данных о товарах из существующей базы данных в новую, необходимо сначала экспортировать данные, а затем продолжить процесс создания командного файла.

1. В окне Server Explorer щелкните правой кнопкой мыши на таблице tblInventory и выберите в контекстном меню команду Export Data (Экспорт данных).

2. В диалоговом окне Browse for Folder выберите предлагаемую по умолчанию папку Create Scripts проекта базы данных и щелкните на кнопке OK.

3. После регистрации в диалоговом окне SQL Server Login будет создан файл dbo.tblInventory.dat.

4. Выберите папку в проекте базы данных для сохранения нового командного файла. В данном примере для этого используется предлагаемая по умолчанию папка Create Scripts.

5. В окне Solution Explorer щелкните правой кнопкой мыши на папке Create Scripts и выберите в контекстном меню команду Create Command File (Создать командный файл). На экране появится диалоговое окно Create Command File (рис. 8.11).

Рис. 8.11. Диалоговое окно Create Command File для базы данных Novelty

6. В списке Available Scripts (Доступные сценарии) в диалоговом окне Create Command File перечислены все сценарии SQL в выбранной папке, которые можно включить в командный файл. В список Scripts to be added to the command file (Сценарии, включаемые в командный файл) можно вставить все или только некоторые сценарии. Для включения всех сценариев щелкните на кнопке Add Аll (Включить все).

7. Поскольку в списке сценариев находится по крайней мере один сценарий экспорта данных с расширением. tab, в диалоговом окне Create Command File станет активной кнопка Add Data (Включить данные).

8. Щелкните на кнопке Add Data, и на экране отобразится одноименное диалоговое окно (рис. 8.12). В этом окне перечислены все выбранные сценарии создания таблиц и соответствующие им файлы данных. 

РИС. 8.12. Диалоговое окно Add Data

9. В этом примере автоматически задается соответствие между файлом данных dbo.Inventory.dat и сценарием dbo.Inventory.tab. Для возвращения в диалоговое окно Create Command File щелкните на кнопке OK.

10. После указания сценариев и файлов данных щелкните на кнопке OK для создания командного файла. В результате этого в папке Create Scripts появится файл Create Scripts.cmd, содержимое которого показано в листинге 8.1.

ЛИСТИНГ 8.1. Содержимое командного файла Create Scripts.cmd

@echo off

REM: Command File Created by Microsoft Visual Database Tools

REM: Date Generated: 8/29/2002

REM: Authentication type: Windows NT

REM: Usage: CommandFilename [Server] [Database]

if '%1' == '' goto usage

if '%2' == '' goto usage

if '%1' == '/?' goto usage

if '%1' == '-?' goto usage

if '%1' == '?' goto usage

if '%1' == '/help' goto usage

osql -S %1 -d Master -E -b -i "JACKIE-TECRA.Novelty.DBS"

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d Master -E -b -i "Novelty.DBS"

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d %2 -E -b -i "dbo.tblCustomer.tab"

if %ERRORLEVEL% NEQ 0 goto errors

bcp "%2.dbo.tblCustomer" in "dbo.tblCustomer.dat" -S %1 -T -k -n – q

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 %2 E -b -i "dbo.tblDepartment.tab"

if %ERRORLEVEL% NEQ 0 goto errors

bcp "%2.dbo.tblDepartment" in "dbo.tblDepartment.dat" -S %1 – Т -k – n – q

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 – d %2 – E -b -i "dbo.tblEmployee.tab"

if %ERRORLEVEL% NEQ 0 goto errors

bcp "%2.dbo.tblEmployee" in "dbo.tblEmployee.dat" – S %1 – Т -k – n -q

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d %2 -E -b -i "dbo.tblInventory.tab"

if %ERRORLEVEL% NEQ 0 goto errors

bcp "%2.dbo.tblInventory" in "dbo.tblInventory.dat" -S %1 -Т -k

if %ERRORLEVEL% NEQ 0 goto errors

osql – S %1 – d %2 – E – b -i "dbo.tblOrder.tab"

if %ERRORLEVEL% NEQ 0 goto errors

bcp "%2.dbo.tblOrder" in "dbo.tblOrder.dat" -S %1 -T -k -n -q

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d %2 -E -b -i "dbo.tblOrderItem.tab"

if %ERRORLEVEL% NEQ 0 goto errors

bcp "%2.dbo.tblOrderItem" in "dbo.tblOrderItem.dat" -S %1 -T -k -n -q

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d %2 -E -b -i "dbo.tblRegion.tab"

if %ERRORLEVEL% NEQ 0 goto errors

bcp "%2.dbo.tblRegion" in "dbo.tblRegion.dat" -S %1 -T -k -n -q

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d %2 -E -b -i "dbo.tblCustomer.kci"

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d %2 -E -b -i "dbo.tblDepartment.kci"

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d %2 -E -b -i "dbo.tblEmployee.kci"

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d %2 -E -b -i "dbo.tbllnventory.kci"

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d %2 -E -b -i "dbo.tblOrder.kci"

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d %2 -E -b -i "dbo.tblOrderItem.kci"

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d %2 -E -b -i "dbo.tblRegion.kci"

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d %2 -E -b -i "dbo.tblCustomer.fky"

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d %2 -E -b -i "dbo.tblDepartment.fky"

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d %2 -E -b -i "dbo.tblEmployee.fky"

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d %2 -E -b -i "dbo.tblInventory.fky"

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d %2 -E -b -i "dbo.tblOrder.fky"

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d %2 -E -b -i "dbo.tblOrderItem.fky"

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d %2 -E -b -i "dbo.tblRegion.fky"

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d %2 -E -b -i "dbo.tblCustomer.ext"

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d %2 -E -b -i "dbo.tblDepartment.ext"

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d %2 -E -b -i "dbo.tblEmployee.ext"

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d %2 -E -b -i "dbo.tblInventory.ext"

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d %2 -E -b -i "dbo.tblOrder.ext"

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d %2 -E -b -i "dbo.tblOrderItem.ext"

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d %2 -E -b -i "dbo.tblRegion.ext"

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d %2 -E -b -i "dbo.EmployeeDepartment_view.viw"

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d %2 -E -b -i "dbo.qryEmployee_view.viw"

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d %2 -E -b -i "dbo.DeleteEmployee.prc"

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d %2 -E -b -i "dbo.GetCustomerFromID.prc"

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d %2 -E -b -i "dbo.InsertEmployee.prc"

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d %2 -E -b

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d %2 -E -b -i "dbo.LastNameLookup.prc"

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d %2 -E -b -i "dbo.procEmployeesSorted.prc"

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d %2 -E -b -i "dbo.SelectEmployees.prc"

if %ERRORLEVEL% NEQ 0 goto errors

osql -S %1 -d %2 -E -b -i "dbo.UpdateEmployee.prc"

if %ERRORLEVEL% NEQ 0 goto errors

goto finish

REM: How to use screen

:usage

echo.

echo Usage: MyScript Server Database

echo Server: the name of the target SQL Server

echo Database: the name of the target database

echo.

echo Example: MyScript.cmd MainServer MainDatabase

echo.

echo.

goto done

REM: error handler

:errors

echo.

echo WARNING! Error(s) were detected!

echo____________________

echo Please evaluate the situation and, if needed,

echo restart this command file. You may need to

echo supply command parameters when executing

echo this command file.

echo.

pause

goto done

REM: finished execution

:finish

echo.

echo Script execution is complete!

:done

@echo on

НА ЗАМЕТКУ

В данном командном файле используются утилиты командной строки osql и bcp которые входят в состав SQL Server. Утилита osql предназначена для выполнения команд SQL, системных процедур и сценариев, а утилита bcp — для пакетного копирования данных в файл данных из SQL Server и обратно.

Данный командный файл можно запустить в окне Solution Explorer, щелкнув на нем правой кнопкой мыши и выбрав в контекстном меню команду Run. Его также можно выполнить извне, независимо от Visual Studio .NET, аналогично другим командным файлам.

СОВЕТ

Учтите, что при запуске данного командного файла по отношению к базе данных в ней будут удалены все данные!

 

Запросы

Аналогично сценариям создания и изменения, с помощью Visual Studio .NET можно генерировать запросы. За исключением тривиальных запросов, конструктор запросов с графическим пользовательским интерфейсом позволяет более эффективно и безошибочно создавать самые сложные запросы.

Далее работа в режиме конструктора запросов демонстрируется на примере создания параметрического запроса на обновление, который обновляет оптовые цены всех товаров на складе на указанную в процентах величину.

РИС. 8.13. Режим конструктора запросов с диалоговым окном Add Table

1. Откройте окно Solution Explorer и щелкните правой кнопкой мыши на любой папке, за исключением Database References. В контекстном меню выберите команду Add Query (Создать запрос), и на экране отобразится диалоговое окно Add New Item (Создать новый объект), показанное на рис. 8.2.

РИС. 8.14. Запрос на обновление поля WholesalePrice в таблице tblInventory

2. Выберите в области шаблонов Templates шаблон Database Query (Шаблон базы данных), укажите в текстовом поле Name имя нового запроса UpdateWholesale.dtq и щелкните на кнопке Open. (После этого на экране отобразится диалоговое окно Set Database Reference for Query для указания используемой ссылки на базу данных. — Прим. ред.) Далее в режиме конструктора запросов отобразится диалоговое окно Add Table (Включить таблицу), которое показано на рис. 8.13.

3. В диалоговом окне Add Table выберите таблицу tblInventory и щелкните на кнопке Add, а затем на кнопке Close.

4. Далее нужно изменить тип запроса с помощью команды меню Query→Change Туре→Update (Запрос→Изменить тип→Обновление).

5. В панели Diagram (Схема) конструктора запросов установите флажок в поле WholesalePrice, данные в котором предполагается обновить.

6. В панели Grid (Сетка) в столбце NewValue введите формулу: WholesalePrice * (1 + ? /100).

7. Эта формула принимает один параметр, который обозначает, на сколько процентов повышается оптовая цена товаров. При выполнении запроса символ подстановки в виде вопросительного знака будет заменен фактическим значением этого параметра. После выполнения этих действий окно конструктора запросов будет иметь такой вид, как на рис. 8.14.

 8. Хотя данный запрос можно запустить сразу же после его создания в режиме конструктора запросов, в данном примере он будет запущен из окна Solution Explorer.

9. Закройте окно конструктора запросов и щелкните на кнопке Yes в ответ на предложение сохранить созданный запрос UpdateWholesale.dtq.

10. Щелкните дважды на таблице tblInventory в окне Server Explorer для отображения всех текущих данных в поле WholesalePrice этой таблицы. Именно эти данные об оптовых ценах на товары будут изменены в результате выполнения запроса UpdateWholesale.dtq.

СОВЕТ

Для сверки исходного и последующего после выполнения запроса состояний можно сделать снимок экрана. Например, можно выделить и скопировать все строки, а затем вставить их в текстовый файл с помощью программы Notepad.

11. Как и при запуске сценария, запрос можно запустить, просто перетаскивая и опуская его на нужную ссылку базы данных. Кроме того, можно щелкнуть правой кнопкой мыши на запросе и выбрать в контекстном меню команду Open.

НА ЗАМЕТКУ

Данное контекстное меню также содержит команды Design и Design которые открывают конструктор запросов по отношению к используемой по умолчанию или указанной ссылке на базу данных.

РИС. 8.15. Обновленные данные в таблице tblInventory после увеличения значений в поле WholesalePrice на 10%

12. Перетащите и опустите запрос UpdateWholesale.dtq на ссылку на базу данных Novelty в окне Solution Explorer.

13. После этого в диалоговом окне Execute Scripts or Queries (Выполнить сценарий или запрос) подтвердите желание выполнить запрос по отношению к выбранной ссылке на базу данных, щелкнув на кнопке Yes.

14. В диалоговом окне Define Query Parameters (Определить параметры запроса) введите значение 10 в столбце Parameter Value (Значение параметра) и щелкните на кнопке OK.

15. После этого на экране появится диалоговое окно с сообщением о результате выполнения запроса и количестве охваченных им записей. Для продолжения работы закройте его, щелкнув на кнопке OK.

16. Повторите действия, описанные в п. 9, для отображения обновленных значений поле WholesalePrice таблицы tblInventory, как показано на рис. 8.15.

 

Резюме

В этой главе рассмотрены способы работы с проектами баз данных в среде Visual Studio .NET. Этот тип проекта не содержит кода на языке Visual Basic, потому что предназначен для создания, тестирования и запуска сценариев баз данных, запросов и командных файлов. Эти сценарии и команды позволяют создавать новые схемы базы данных, вносить изменения в существующие схемы, а также запрашивать и обновлять существующие данные. Эти эффективные инструменты следует использовать в максимальной степени во время создания и доставки приложения.

Вообще говоря, задачи создания, отладки и усовершенствования сценариев и запросов обычно выполняют аналитики баз данных, но все чаще эти задачи возлагаются на плечи прикладных программистов. Вот почему им необходимо иметь хотя бы базовые представления о способах выполнения таких задач.

 

Вопросы и ответы

В среде Visual Studio .NET и программе SQL Server Enterprise Manager совпадают многие инструменты. Какие из них предпочтительнее использовать?

Ответ прост: какие хотите. Для выполнения многих операций в среде Visual Studio .NET и программе SQL Server Enterprise Manager предусмотрены совершенно одинаковые инструменты. Однако есть и такие операции, для выполнения которых предусмотрен только один инструмент в одном из этих программных продуктов. Администратор базы данных обычно выполняет все операции с помощью инструментов программы SQL Server Enterprise Manager, а прикладной программист — с помощью инструментов среды Visual Studio .NET. Учтите, однако, что при работе с базой данных другого типа (например, Oracle) вам потребуются совершенно другие инструменты для создания или изменения объектов базы данных. Инструменты среды Visual Studio .NET позволяют просматривать и запрашивать данные в таких базах данных, но не могут изменять их. 

 

ГЛАВА 9

XML И .NET

 

Вероятно, большинство читателей уже знакомы в той или иной мере с расширяемым языком разметки (extensible Markup Language — XML). По сути, пользователи встречаются с ним уже при установке среды Visual Studio .NET или CLR, даже если и не подозревают об этом. В свое время XML считался панацеей от всех бед, способной решить все проблемы обмена данными, независимо от используемой платформы или аппаратного обеспечения. На начальном этапе развития XML эти необоснованные ожидания породили массу избыточных и совершенно бесполезных затрат при создании приложений с применением XML. Разработчики стали повсюду использовать дескрипторы XML без учета их реальной необходимости для конкретных бизнес-ситуаций или технических причин. Мощь XML заключается в эффективном использовании метаданных и структурированных элементов для хранения данных. XML не является языком программирования, поскольку не содержит никаких директив для выполнения каких-либо действий, а потому обладает полной независимостью от используемой платформы.

Разработчики, имеющие большой опыт работы с HTML, смогут легко понять преимущества надежного и эффективного использования XML. Пространство имен представлено элементом с префиксом xmlns:, оно содержит уникальное имя для контейнера, который предлагает функции и/или данные аналогично имени класса в языке Visual Basic. В среде Visual Basic .NET этот подход упрощается за счет использования расширенного набора классов для синтаксического анализа и манипулирования данными в формате XML. Рассмотрим обычный файл конфигурации web.config. Он имеет формат XML, а не "унаследованный" формат файла конфигурации.ini, хотя доступ к его данным можно осуществить с помощью аналогичных простых методов. Основное отличие заключается в том, что файл web.config обладает большими возможностями для расширения. Доказательством этого отличия является то, что управление файлом web.config осуществляется так же, как и любым другим документом в формате XML, хотя результаты подобных манипуляций могут быть совершенно иными.

Основным преимуществом формата XML (и его аналогов, соответствующих протоколу Simple Object Access Protocol – SOAP) является его нейтральность. Благодаря этому всегда можно создать приложение с расширением логики путем расширения данных, а не создания уникального кода для доступа к централизованно хранящимся данным.

В настоящей главе основное внимание сосредоточено на использовании XML в целях идентификации данных для приложений и пользователей. В ней описываются способы применения XML на платформе.NET в практических ситуациях. Более глубокое описание способов взаимодействия с базами данных и наборами данных DataSet с помощью классов модели ADO.NET приведено в главе 10, "ADO.NET и XML".

В настоящее время описанию XML посвящено много книг и ресурсов. Поэтому вместо подробного рассмотрения этой темы основное внимание в этой главе уделяется вопросам интеграции XML с платформой .NET. Читатели, которые хорошо знакомы с основами XML, могут пропустить обзорные разделы вплоть до раздела с описанием классов XML для платформы .NET.

 

Обзор XML

 

Язык XML предназначен только для работы с данными. Точнее говоря, он предназначен для создания набора сведений, или метаданных, которые описывают данные. Рассмотрим приведенный ниже простой фрагмент кода на языке HTML.

Этот фрагмент содержит определение элемента form с атрибутами name, action и method. Атрибуты описывают отдельные элементы формы, сообщают Web-броузеру о выполняемых с ней действиях и являются простейшим примером метаданных. Обратите внимание на замыкающий дескриптор , который обозначает конец контейнера элементов формы. В данном примере form – это универсальный контейнер с универсальными элементами. Экземпляр контейнера form образуется при размещении данных в его структуре.

В приведенном ниже коде показан способ использования элементов и атрибутов XML для описания конкретного фрагмента данных. В нем создается профиль пользователя, который сохраняется в виде узла. Узел (или элемент) Person содержит атрибуты, которые описывают данного пользователя.

Обратите внимание, что вся информация, независимо от конкретного пользователя, хранится в элементе Person. Любое приложение, которое может анализировать данные в формате XML (а это подвластно практически любому современному коммерческому приложению для работы с данными), способно извлечь из этого кода сведения о пользователе: имя, фамилию, адрес и номер телефона. Кроме того, поскольку с этим пользователем никакие другие данные не связаны, все сведения заканчиваются замыкающим дескриптором . В формате XML к синтаксису предъявляются очень строгие требования, например если не указать замыкающий дескриптор или пропустить какой-то элемент, то чтение всего документа может закончиться неудачей.

НА ЗАМЕТКУ

Семантика XML интересна тем, что на элемент можно ссылаться как на узел и наоборот. В некоторых публикациях элемент также называют дескриптором. Во избежание путаницы здесь и далее используются только термины "элемент" и"узел". 

Элементы не только могут иметь атрибуты, но и подчиненные элементы; аналогично, подчиненные элементы могут иметь свои собственные атрибуты, как показано в листинге 9.1.

Листинг 9.1. Пример элемента Person с подчиненными элементами

 lastName = "Doe"

 address1 = "123 Main Street"

 address2 = ""

 city = "Sometown"

 state = "ОН"

 zip = "22222"

 phone = "111-242=5512"

 

 

 

Как видите, элемент Person здесь нужно закрыть явно, потому что изменился диапазон контейнера, т.е. теперь он содержит сведения о заказах orders. Приведенный в листинге 9.1 код является нейтральным, т.е. не содержит никакой информации о приложении, только данные и метаданные.

НА ЗАМЕТКУ

Языку XML посвящено множество материалов, опубликованных в печатных изданиях и в Internet. Прекрасное введение в XML можно найти по адресу: http://www/w3.org/XML/1999/XML-in-10-points.html . Вот несколько других адресов Web-узлов, которые содержат наиболее полные сведения по этой теме:

• Web-узел консорциума World Wide Web Consortium http://www/w3.org) содержит официальные и хорошо документированные спецификации XML;

• Web-узел компании Microsoft (http://msdn.microsoft.com) содержит постоянно обновляемые ресурсы, которые охватывают все вопросы использования XML и родственных технологий с программными продуктами Microsoft;

• Web-узел компании TopXML/VBXML.com (http://www.vbxml.com) предлагает разные ресурсы и примеры кодов для работы с технологией XML.

 

Семейство технологий XML

Язык XML не одинок и сосуществует с несколькими другими родственными технологиями.

• XML Path Language (XPATH) предлагает способ извлечения информации из XML-документа. Хотя синтаксис XPATH радикально отличается от синтаксиса XML, он работает аналогично SQL-запросам.

• Extensible StyleSheet Language Transformations (XSLT) предлагает способ преобразования (т.е. вставки, удаления или изменения) данных XML-документа в данные, которые могут использоваться в другом XML-документе. XSLT может использовать технологию XPATH для извлечения преобразуемых данных.

• Extensible StyleSheet Language (XSL) — это XSLT плюс объекты, которые позволяют разработчику описывать способ отображения информации в броузере или другом XSL-совместимом приложении.

• Document Object Model (DOM) содержит стандартный набор функций, которые позволяют программными средствами извлекать данные из XML- или HTML-документа.

• Simple Object Access Protocol (SOAP) – это спецификация вызовов Web-служб или других Web-ориентированных приложений и служб, а также форматирования отклика. Более подробно SOAP рассматривается в главе 12, "Web-службы и технологии промежуточного уровня".

РИС. 9.1. Иерархия технологий XML, XSL, XSLT u XPATH

На рис. 9.1 показана взаимосвязь между технологиями XML, XSL, XSLT и XPATH в приложении на основе XML. (Более подробно такие приложения рассматриваются далее, в разделе о классах XML на платформе .NET.) Обратите внимание, что XML-документ является источником данных, т.е. содержит отображаемые в приложении данные. XPATH-запрос элементов People/Person используется для сбора сведений обо всех элементах Person из XML-документа. XSL-стиль окружает данные элементами с указанием шрифта с помощью XSL-страницы стиля. После анализа и обработки полученный результат возвращается в формате HTML.

ВНИМАНИЕ!

Учтите, что XML имеет очень строгие правила, причем все имена нужно приводить с учетом регистра символов.

Для демонстрации этой взаимосвязи вставьте код из листингов 9.2 и 9.3 в файлы simple.xml и simple.xsl, которые располагаются в одном каталоге. Откройте файл simple.xml в Web-броузере Internet Explorer версии 6.0 или выше. Результат выполнения этих действий будет иметь вид, представленный на рис. 9.1.

ЛИСТИНГ 9.2. Файл simple.xml

 

  John Doe

 

 

  Jane Doe

 

Обратите внимание, что страница стиля связана с XML-документом. С помощью .NET-классов для XML или MSXML-анализатора Visual Basic можно динамически изменять результаты с представлением их в нескольких разных форматах (например, WML).

ЛИСТИНГ 9.3. Файл simple.xsl

 

 

  

  

 

Строка select="People/Person" — это XPATH-запрос, который представляет собой эквивалент SQL-команды SELECT People FROM Person. Для циклического обхода всех элементов применяется команда xsl:for-each из спецификации XSL. В отличие от XML, в котором нет программных директив, в XSL предусмотрен целый набор директив, который может быть расширен благодаря сценариям для предоставления дополнительной функциональности.

 

XML и доступ к данным 

Обладая этими базовыми знаниями об XML и зная способы их использования, можно применить их в реальных приложениях для работы с данными. XML-анализатор способен считать данные в формате XML, и они будут иметь одинаковый смысл в любом приложении. Эта гибкость сокращает необходимый для работы с данными код, улучшает сопровождение и поддержку программ. 

Когда создатели платформы .NET планировали следующую версию интегрированной среды разработки, такая гибкость была одним из основных требований. Теперь практически все элементы платформы .NET используют XML для обмена информацией. Среда CLR использует XML-файлы для указания параметров приложения. Объекты DataSet возвращаются как XML-документы, которые могут записываться в виде строки или документа. XML Web-службы удовлетворяют открытому стандарту SOAP, который в конечном итоге означает, что код объекта для платформы Windows может быть расширен для использования на любой другой платформе, которая поддерживает HTTP- или SOAP-запросы.

XML не предлагает никаких новых революционных способов изменения способов доступа к данным, а лишь иначе использует известные способы сбора и сохранения данных. Более подробная информация о применении компонентов XML с моделью ADO.NET предлагается в главе 10, "ADO.NET и XML".

 

Классы XML на платформе .NET

 

На платформе .NET язык XML применяется для повышения производительности, совместимости с открытыми стандартами и интеграции с ADO.NET. Для этого предусмотрены специализированные классы и пространства имен. Для перечисления всех имеющихся пространств имен, классов, методов, свойств, перечислений, интерфейсов и делегатов потребовалось бы привести огромную таблицу, что в целом было бы крайне неэффективным способом расходования пространства и времени. Вместо этого здесь и далее описывается несколько основных классов платформы .NET Framework, предназначенных для работы с XML. На основе этих классов далее приводится несколько примеров эффективного использования XML с иллюстрацией причин, по которым разработчики платформы .NET Framework из компании Microsoft создали их именно такими.

В этом разделе приводятся примеры выполнения задач, связанных с созданием приложений для XML, XSL, XSLT и XPATH. (В замечании из предыдущего раздела приводятся ссылки на некоторые ресурсы с более подробным описанием этих технологий.) Как уже отмечалось, основная цель XML заключается в структурировании и описании данных. Для этого на платформе .NET Framework предусмотрены классы пространства имен System.xml. В приведенных далее примерах используются некоторые другие новые компоненты Visual Basic .NET, которые подробно комментируются.

 

Применение модели Document Object Model

С появлением модели Document Object Model (DOM) значительно упростилось создание динамически генерируемых Web-узлов, благодаря приданию дополнительных функциональных возможностей статическим элементами в документах HTML/XML. Простая строка кода document.location сценария JavaScript выполняет обход всех элементов Web-страницы, начиная с самого верха объекта document и заканчивая поиском свойства location. Этот способ программируемого доступа к объектам Web-страницы был в определенной степени революционным. Затем появился XML со строгими правилами и динамической объектной моделью, на основе которой автор документа определял корневой или родительский элемент.

В примерах оставшейся части главы с помощью утилиты SQLXML создается XML-документ с именем simple2.xml. Ручное кодирование больших HTML-страниц — это довольно скучное и утомительное занятие, при котором нужно тщательно следить за форматом всех данных. Однако XML обладает несомненным достоинством: нет необходимости беспокоиться о том, что в документ попадет какая-то дополнительная ненужная информация, как это обычно бывает при создании Web-страниц с помощью некоторых HTML-редакторов.

В листинге 9.4 приведен текст простого XML-документа simple2.xml. Расположение символов конца строки на самом деле не имеет никакого значения, потому что аналогично другим языкам программирования XML использует специализированные символы для обозначения строк. Например, в С++, Java и JavaScript для разделения строк используется точка с запятой, а в XML единой строкой считаются все символы между открывающим < и закрывающим дескрипторами.

ЛИСТИНГ 9.4. Файл simple2.xsl

 

 

 

 

 

 

 

 

 

 

Информация в листинге 9.4 взята из базы данных Novelty, описанной в главах 1-3, с помощью приведенного ниже запроса.

SELECT ТОР 10 * FROM tblCustomer FOR XML AUTO

Затем в него вручную добавлен элемент . Далее, в разделе об утилите SQLXML, показано, как для любого XML-документа автоматически создается корневой элемент.

В следующем примере рассматривается класс XMLDocument, с помощью которого осуществляется доступ к XML-данным и документам на платформе .NET Framework. В простейшем случае XML-данные из документа или строки в оперативной памяти загружаются с помощью метода Load класса XMLDocument.

 

Применение технологии XPATH

Что происходит после загрузки XML-документа? В пространстве имен System.xml предусмотрены классы xmlNode и xmlNodeList. С помощью этих классов и технологии XPATH происходит считывание XML-документа и извлечение интересующих нас данных. В листинге 9.5 показано простое приложение Visual Basic .NET, которое загружает XML-документ из файла simple2.xsl и выводит все имена (атрибут FirstName) в текстовом поле.

ЛИСТИНГ 9.5. Пример использования классов XmlDocument И XmlNode

Imports System.Xml

Imports System.Xml.XPath

Imports System.IO

Public Class Form1

 Inherits System.Windows.Forms.Form

' Здесь опущен код, сгенерированный Windows Form Designer.

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

  ByVal e As System.EventArgs) Handles MyBase.Load

  Dim xDoc As New XmlDocument()

  xDoc.Load("simple2.xml")

  ' Обратите внимание, что для получения значения

  ' атрибута используется синтаксис XPATH.

  Dim xNodeList As XmlNodeList = _

   xDoc.SelectNodes("descendant::tblCustomer/@FirstName")

  Dim xNode As XmlNode

  Dim i As Integer = 0

  For Each xNode In xNodeList

   lstResults.Items.Insert(i, xNode.InnerText)

   i = i + 1 Next

  End Sub

End Class

Для выполнения этого кода создайте новый проект, форму, а в форме — поле со списком lstResults. Поместите код подпрограммы Form1_Load из листинга 9.5 в код формы. После компоновки и запуска приложения в поле со списком будут показаны результаты, показанные на рис. 9.2 (при условии, что в каталоге выполняемого файла находится файл simple2.xml).  

РИС. 9.2. Результаты выполнения кода из листинга 9.5

Как видите, загрузка XML-документа и циклический обход его данных не представляют собой большой проблемы. А как можно изменить данные в XML-документе? Ответ на это вопрос основан на комбинации использованных ранее классов.

НА ЗАМЕТКУ

Далее код подпрограммы Form1_Load из листинга 9.5 переносится в код подпрограммы showTоp10 (листинг 9.6).

В листинге 9.6 приведен измененный код данного примера, в котором можно изменять и сохранять значение каждого узла в XML-документе. В этом достаточно простом примере используются чрезвычайно эффективные и надежные средства изменения XML-документа. Помимо упомянутых выше изменений, в данное приложение также включены кнопки btnShowTop10 и btnChangeAndSave для вызова отдельных подпрограмм отображения и изменения данных. После создания новых кнопок, компоновки проекта и запуска приложения щелкните на кнопке ShowTop10. После выполнения этих действий в поле со списком будут представлены результаты, показанные на рис. 9.2. (Учтите: это возможно лишь при условии, что в каталоге выполняемого файла находится файл simple2.xml.) Для редактирования одного из значений щелкните дважды на том элементе списка, который нужно изменить. Затем в диалоговом окне ChangeAndSave введите новое имя и щелкните на кнопке OK. После этого в поле со списком будет отображено обновленное состояние XML-документа с измененными значениями списка.

ЛИСТИНГ 9.6. Код приложения XMLDomSample

Imports System.Xml

Imports System.Xml.XPath

Imports System.IO

Public Class Form1

 Inherits System.Windows.Forms.Form

 …

 ' Здесь опущен код, сгенерированный Windows Form Designer.

 …

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

  ByVal e As System.EventArgs) Handles MyBase.Load

 End Sub

Private Sub ShowTop10()

  Dim xDoc As New XmlDocument()

  xDoc.Load("simple2.xml")

  ' Обратите внимание, что для получения значения атрибута

  ' используется синтаксис XPATH.

  Dim xNodeList As XmlNodeList = _

   xDoc.SelectNodes("descendant::tblCustomer/@FirstName")

  Dim xNode As XmlNode

  Dim i As Integer = 0

  For Each xNode In xNodeList

   lstResults.Items.Insert(i, xNode.InnerText)

   i = i + 1

  Next

 End Sub

 Public Sub ChangeNameandSave(ByVal NameToChange As String, ByVal ChangeTo _

  As String)

  Dim xDoc As New XmlDocument()

  xDoc.Load("simple2.xml")

  Dim xNodeList As XmlNodeList = _

   xDoc.SelectNodes("descendant::tblCustomer/@FirstName")

  Dim xNode As XmlNode

  For Each xNode In xNodeList

   If xNode.InnerText = NameToChange Then

    xNode.Value = ChangeTo

   End If

  Next

  xDoc.Save("simple2.xml")

  MsgBox("Name change saved!", 0)

  lstResults.Items.Clear()

  ShowTop10()

 End Sub

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

  ByVal e As System.EventArgs) Handles btnShowTop10.Click

  ShowTop10()

 End Sub

 Private Sub lstResults_DoubleClick(ByVal sender As Object, _

  ByVal e As System.EventArgs) Handles lstResults.Doubleclick

  Dim oldName As String = _

   lstResults.GetItemText(lstResults.Items.Item(lstResults.SelectedIndex))

  Dim newName As String = _

   InputBox("Please enter a new name", "ChangeAndSave")

  ChangeNameandSave(oldName, newName)

 End Sub

End Class

НА ЗАМЕТКУ

уже сообщалось ранее, коды всех примеров можно найти на Web-странице Издательского дома "Вильяме" адресу: http://www.williamspublishing.com .

 

Утилита SQLXML

 

Утилита SQLXML версии 3.0 представляет собой еще один способ сбора и генерации XML-документов. Она не может заменить средства ADO.NET, а является лишь расширением функций SQL Server с помощью интерфейса броузера для создания отчетов, отслеживания выполняемых действий и т.п.

Для использования утилиты SQLXML необходимо инсталлировать Web-сервер Internet Information Server (IIS) и СУБД SQL Server 2000, в состав которой и входит эта утилита. В данном примере используется компьютер с операционной системой Windows XP Professional, IIS 5.1 и утилита SQLXML версии 3.0.

Утилита SQLXML расширяет функции СУБД SQL Server 2000 возможностями создания запросов к базе данных на основе HTTP-запросов. Хотя она обладает многими преимуществами, некоторые опасения у разработчиков вызывают вопросы обеспечения безопасности. Большинство этих опасений можно устранить за счет использования системы аутентификации Windows для виртуальных каталогов, в которых выполняются запросы, и для базы данных.

НА ЗАМЕТКУ

Утилиту SQLXML версии 3.0 можно бесплатно скопировать с Web-узла компании Microsoft ПО адресу: http://msdn.microsoft.com/downloads/default.asp?url=/downloads/sample.asp?url=/msdn-files/027/001/824/msdncompositedoc.xml .

 

Инсталляция и конфигурирование утилиты SQLXML

После копирования файла с утилитой SQLXML с Web-узла компании Microsoft щелкните дважды кнопкой мыши на нем. На экране появится программа-инсталлятор с несколькими стандартными вопросами, например: согласны ли вы с предлагаемой лицензией и хотите ли вы выполнить обычную или специализированную инсталляцию? Единственное отличие между типами инсталляции заключается в том, что в специализированной инсталляции можно указать другой каталог размещения файлов утилиты.

Для конфигурирования утилиты SQLXML выполните следующее. Выберите команду Start→Microsoft SQL Server→Configure SQL XML Support in IIS (Пycк→Microsoft SQL Server→Конфигурировать поддержку SQL XML в IIS), на экране появится диалоговое окно IIS Virtual Directory Management for SQL Server (Виртуальный каталог управления IIS для SQL Server) программы Microsoft Management Console (рис. 9.3). 

РИС. 9.З. Диалоговое окно IIS Virtual Directory Management for SQL Server программы Microsoft Management Console

Обратите внимание на то, что панель в правой части окна содержит только один столбец Computer. Щелкните дважды левой кнопкой мыши на имени компьютера в этом столбце для раскрытия списка всех Web-узлов данного компьютера, как показано на рис. 9.4. Обратите внимание: имя текущего столбца в правой части окна изменилось и он стал называться Web Site Name (Имя Web-узла).

РИС. 9.4. Список Web-узлов

Щелкните дважды на надписи Default Web Site (Используемый по умолчанию Web-узел), которая показана на рис. 9.5, для отображения списка конфигурированных виртуальных каталогов в правой части окна.

РИС. 9.5. Используемый по умолчанию Web-узел

Далее создайте новый каталог c:\inetpub\wwwroot\novelty. Для этого выберите команду Start→Run, введите команду cmd, щелкните на кнопке OK, введите в режиме командной строки команду mkdir с:\inetpub\wwwroot\novelty и нажмите клавишу . Аналогично внутри этого каталога создайте подкаталог Templates.

Для конфигурирования нового виртуального каталога щелкните правой кнопкой мыши на узле Default Web Site в левой части окна и выберите в контекстном меню команду New→Virtual Directory (Создать→Виртуальный каталог), как показано на рис. 9.6.

Рис. 9.6. Выбор команды New→VirtualDirectory

После выбора виртуального каталога на экране появится новое диалоговое окно New Virtual Directory Properties (Свойства нового виртуального каталога) с шестью вкладками. В первой вкладке, General, предлагается ввести имя виртуального каталога, а также путь к локальному каталогу, где располагаются файлы. Введите в текстовом поле Virtual Directory Name (Имя виртуального каталога) имя Novelty, а в текстовом поле Local Path (Локальный путь) укажите путь к локальному каталогу с:\inetpub\wwwroot\novelty, как показано на рис. 9.7.

РИС. 9.7. Указание имени виртуального каталога и пути к нему

Далее щелкните на вкладке Security (Безопасность) в верхней части диалогового окна и выберите переключатель Use Windows Integrated Authentication (Использовать интегрированную систему аутентификации Windows). На этом этапе предполагается, что при установке SQL Server был выбран смешанный режим аутентификации Mixed-Mode Authentication или режим аутентификации Windows Authentication. Выбор каждого из этих режимов определяется предпочтительным уровнем безопасности. Если безопасность не имеет существенного значения, например СУБД не связана с внешней сетью, то в таком случае подойдет первый режим. Он позволяет кэшировать параметры подключения аналогично строке подключения. Третий режим, HTTP-Based Basic Authentication (Аутентификация на основе HTTP), базируется на учетной записи SQL Server. На рис. 9.8 показан выбор режима аутентификации Windows Authentication.

Выберите вкладку Data Source (Источник данных) и укажите используемый экземпляр СУБД SQL Server и базу данных. В текстовом поле SQL Server оставьте предлагаемое по умолчанию имя (local). 

РИС. 9.8. Параметры системы обеспечения безопасности

НА ЗАМЕТКУ

Имя (local) является "дружественным" именем сервера, который запущен на локальном компьютере. Если SQL Server сконфигурирован для репликации данных в качестве подписчика или издателя данных, то вместо дружественного имени нужно указать фактическое имя компьютера.

Далее в поле со списком Database (База данных) выберите базу данных Novelty, как показано на рис. 9.9. Учтите, что в нем перечислены те базы данных, которые соответствуют параметрам подключения и режиму безопасности.

Выберите вкладку Settings (Параметры) и установите флажки параметров Allow URL queries (Разрешить запросы в URL-указателях), Allow template queries (Разрешить запросы из шаблонов) и Allow XPath (Разрешить Xpath-запросы), как показано на рис. 9.10.

Наконец, выберите вкладку Virtual Names (Виртуальные имена). Щелкните на кнопке New в области окна Defined virtual names (Заданные виртуальные имена). В текстовом поле Virtual Name (Виртуальное имя) диалогового окна Virtual Name Configuration (Конфигурация виртуального имени) введите имя templates. В поле со списком Туре (Тип) выберите тип Template (Шаблон), а в текстовом поле введите c:\inetpub\wwwroot\novelty\templates, как показано на рис. 9.11. Для сохранения указанных параметров щелкните на кнопке Save.

РИС. 9.9. Параметры источника данных

РИС. 9.10. Вкладка Settings 

РИС. 9.11. Диалоговое окно Virtual Name Configuration

После этого диалоговое окно New Virtual Directory Properties будет иметь вид, показанный на рис. 9.12. Щелкните на кнопке OK для его закрытия.

Таким образом, успешно сконфигурирован виртуальный каталог с помощью IIS. Теперь можно корректно выполнять SQL-запросы к базе данных SQL Server. Если дважды щелкнуть на узле Default Web Site в левой части диалогового окна IIS Virtual Directory Management for SQL Server программы Microsoft Management Console, то его правая часть будет иметь такой вид, как на рис. 9.13. Закройте диалоговое окно IIS Virtual Directory Management for SQL Server. 

Рис. 9.12. Диалоговое окно New Virtual Directory Properties после конфигурирования виртуального каталога

Рис. 9.13. Диалоговое окно IIS Virtual Directory Management for SQL Server программы Microsoft Management Console после конфигурирования параметров Web-узла Novelty

 

Результаты конфигурирования

Рассмотрим теперь, что же получилось в результате конфигурирования параметров Web-узла Novelty. Откройте Web-броузер Internet Explorer версии 6.0 или выше. Полученный результат будет выглядеть, как показано в листинге 9.4. Файл simple2.xml был создан именно так. Введите приведенный ниже URL-указатель для просмотра структуры файла.

http://localhost/Novelty?sql=select top 10 * from tblCustomer FOR XML AUTO&root=customer

Обратите внимание, что параметр root в конце данного URL-указателя содержит корневой элемент XML-документа. Без него довольно трудно отображать результаты HTTP-запросов в окне Web-броузера.

 

Применение XML, XSLT и SQLXML для создания отчета

Попробуем теперь применить описанные ранее сведения в практической ситуации, например для создания списка адресов клиентов. Как будет показано далее, изменение HTML-содержимого с помощью XSL-файла не вызывает больших трудностей. Поэтому такой способ часто применяется для форматирования страниц, которые предполагается распечатать, или вместе с JavaScript/ASP.NET для повышения функциональности и надежности.

SQL Server предоставляет данные в формате XML, а для сохранения запроса используется шаблон в файле noveltytemplate.xml. Единственным назначением этого файла является сбор данных и присвоение страницы стиля.

 

  SELECT FirstName, LastName, Address, City, State FROM tblCustomer FOR XML AUTO

 

В первой строке задается базовый XML-документ и способ связывания со страницей стиля, который аналогичен применению элемента xml:stylesheet в листинге 9.2. Следующий элемент sql:query является контейнером команды SQL или выполняемого запроса. Предложение FOR XML AUTO сообщает SQL Server о возвращении результатов в формате XML. В шаблоне предполагается, что корневой элемент называется root, поэтому его не нужно указывать в шаблоне запроса.

НА ЗАМЕТКУ

Для динамического присвоения страницы стиля с помощью SQLXML нужно добавить в URL-указатель параметр запроса xsl= и указать используемый файл в формате http://имя_компьютера/виртуальный_каталог_шаблонов/имя_шаблона.xml?xsl=имя файла_стиля.xsl.

 В листинге 9.7 показана страница стиля XSL, которая используется для создания итогового XML-документа. Для указания атрибута в ней применяется технология XPATH. С помощью синтаксиса CSS и HTML создается формат представления извлеченной информации в окне Web-броузера.

ЛИСТИНГ 9.7. Файл noveltyxsl.xsl

 

 

 

 

 

 

  

  

  

   

   

   

  

 

 

  

   

   

  

   

   

    

    

     

      

      

     

     

     

    

    

Customers
First name Last name Address City State

    

  

 

Разместите оба файла (noveltytemplate.xml и noveltyxsl.xsl) в подчиненном каталоге templates виртуального Web-каталога Novelty, который описывается в предыдущем разделе. После этого откройте Web-броузер Internet Explorer версии 6.0 или выше и введите в нем следующий URL-указатель:

http://localhost/Novelty/templates/noveltytemplate.xml?contenttype=text/html

 Параметр contenttype используется для указания формата представления конечного результата, т.е. в виде HTML-страницы. После выполнения описанных действий данные в окне Web-броузера будут иметь такой вид, как на рис. 9.14.

РИС. 9.14. Результат представления данных с помощью XML-шаблона и технологии XSL

 

Резюме

В этой главе представлены базовые сведения о языке XML и его назначении. Здесь демонстрируются способы применения XML на платформе.NET Framework и взаимодействия XML с Visual Basic.NET. В конце главы показан способ конфигурирования Web-сервера IIS и СУБД SQL Server 2000 для представления информации в виде XML-документов, на основе которых можно легко создавать HTML-страницы. Большая часть приведенной здесь информации играет роль введения в главу 10, "ADO.NET и XML".

 

Вопросы и ответы

Что означает "создание схемы" в контексте XML?

В контексте баз данных "создание схемы" означает создание документа с определениями объектов и сущностей. В контексте XML это понятие может быть расширено и охватывать другие сведения, например определение поля без неопределенных значений (NOT NULL) в таблице базы данных.

Что произойдет, если для названия элемента в XML-документе использовать уже зарезервированное имя HTML-элемента, например title?

Для устранения такой двусмысленности и предназначены пространства имен. Можно создать XML-документ с применением XSLT и использовать в нем уже зарезервированное имя HTML-элемента, например title, для одного из полей таблицы. Именно для этого придется использовать собственное пространство имен.

С помощью строки кода можно теперь использовать префикс b: для любого XML-элемента, даже если его имя совпадает с каким-то уже зарезервированным именем HTML-элемента.

В таком случае строки и будут относиться к совершенно разным сущностям. Единственным строгим условием является предварительное объявление используемого пространства имен, например в самом начале документа. </p> </div> </div> <!-- end .note-content--> </div> <!-- end .note-inner--> </div> <!-- end .note--> <div class="note-bottom-left"> <div class="note-bottom-right"> <div class="note-bottom-center"></div> </div> </div> </article> </div> </div> <!-- end .note-content--> </div> <!-- end .note-inner--> </div> <!-- end .note--> <div class="note-bottom-left"> <div class="note-bottom-right"> <div class="note-bottom-center"></div> </div> </div> </article> </div> <div id="sec_11"> <article class="note-block entry post"> <div class="note"> <div class="note-inner"> <div class="note-content"> <div class="post-content clearfix"> <p> </p> <p class="chap">ГЛАВА 10</p> <p class="chap">ADO.NET и XML</p> <article class="note-block entry post"> <div class="note"> <div class="note-inner"> <div class="note-content"> <div class="post-content clearfix"> <p> </p> <p class="paragraph"> Оставляя в стороне маркетинговую шумиху, следует отметить, что XML действительно способствует выполнению множества задач, связанных с программированием бизнес-решений. Это особенно верно в тех случаях, когда огромное значение приобретает интеграция разных систем и платформ в рамках одной или нескольких компаний. Поэтому при создании интегрированной среды разработки Visual Studio .NET одной из основных целей была расширенная поддержка XML. </p> <p class="paragraph"> Язык XML является форматом устойчивого хранения объекта DataSet, т.е. при сохранении на жестком диске объекта DataSet используется универсальный формат XML, а не двоичный или какой-то другой специализированный формат. Аналогично, при обмене объектами DataSet между разными процессами или компьютерами данные передаются в потоке формата XML. </p> <p class="paragraph"> В прежних главах показано, что объект DataSet не зависит от источника данных, которые он содержит. Для него данные — это всего лишь данные, независимо от их происхождения. То же самое верно, когда источник данных имеет формат XML. Объект DataSet обладает средствами чтения и записи данных в формате XML и/или информации о схеме данных. В модели ADO.NET эти средства обладают гораздо более высокими функциональными возможностями по сравнению с моделью ADO. Более того, благодаря объекту XmlDataDocument приложение может просматривать данные объекта DataSet и манипулировать ими с помощью реляционных инструментов и/или XML-инструментов, в зависимости от ситуации. </p> <p class="paragraph"> Полное описание XML и связанных с ним технологий и инструментов выходит за рамки данной книги. В главе 9, "XML и .NET", представлены основные сведения о расширенной поддержке XML на платформе.NET Framework, а в этой главе описываются основы интеграции ADO.NET и платформы .NET Framework. Более подробную информацию об этом можно найти в справочных материалах Visual Studio .NET и платформы .NET Framework, а также на Web-узле MSDN по адресу: http://msdn.microsoft.com. </p> </div> </div> <!-- end .note-content--> </div> <!-- end .note-inner--> </div> <!-- end .note--> <div class="note-bottom-left"> <div class="note-bottom-right"> <div class="note-bottom-center"></div> </div> </div> </article> <article class="note-block entry post"> <div class="note"> <div class="note-inner"> <div class="note-content"> <div class="post-content clearfix"> <p> </p> <p class="chap">Основные принципы чтения и записи XML-данных</p> <article class="note-block entry post"> <div class="note"> <div class="note-inner"> <div class="note-content"> <div class="post-content clearfix"> <p> </p> <p class="paragraph"> В главах 5, "ADO.NET: объект DataSet", и 6, "ADO.NET: объект DataAdapter" демонстрируются программируемые и прямые способы загрузки данных в объект DataSet из базы данных. Еще один метод загрузки данных основан на чтении XML-данных. Как и следовало ожидать, в объект DataSet данные можно записывать в XML-формате. Более того, объект DataSet обладает средствами чтения и записи XML-схем либо вместе с XML-данными, либо раздельно. </p> </div> </div> <!-- end .note-content--> </div> <!-- end .note-inner--> </div> <!-- end .note--> <div class="note-bottom-left"> <div class="note-bottom-right"> <div class="note-bottom-center"></div> </div> </div> </article> <article class="note-block entry post"> <div class="note"> <div class="note-inner"> <div class="note-content"> <div class="post-content clearfix"> <p> </p> <p class="chap">Чтение XML-данных</p> <p class="paragraph"> В ADO.NET предусмотрены богатые и разнообразные инструменты чтения и записи XML-данных и XML-схем. Далее рассматриваются основные способы использования предназначенных для этого методов и свойств. </p> <p class="paragraph"> Как и в предыдущих главах, для демонстрации взаимодействия модели ADO.NET и XML здесь приводится практический пример их использования на основе простой формы. </p> <p class="paragraph"> 1. Запустите интегрированную среду разработки Visual Studio .NET и создайте новый проект Visual Basic Windows Application. Для этого в диалоговом окне New Project (Новый проект) выберите тип проекта Visual Basic Project в области Project Types (Типы проектов), а затем шаблон Windows Application (Приложение Windows) в области Templates (Шаблоны). </p> <p class="paragraph"> 2. Назовите проект ADO-XML. </p> <p class="paragraph"> 3. Укажите путь к файлам проекта. </p> <p class="paragraph"> 4. Увеличьте размер формы Form1. </p> <p class="paragraph"> 5. В окне свойств Properties укажите значение frmXML для свойства (Name) и значение ADO.NET and XML для свойства Text формы Form1. </p> <p class="paragraph"> 6. В верхнем левом углу формы создайте кнопку, перетаскивая ее из панели элементов управления. </p> <p class="paragraph"> 7. В окне свойств Properties укажите значение btnReadXML для свойства (Name) и значение Read XML для свойства Text этой кнопки. </p> <p class="paragraph"> 8. В правой части формы создайте сетку DataGrid, перетаскивая ее из панели элементов управления. </p> <p class="paragraph"> 9. В окне свойств Properties укажите значение grdData для свойства (Name) сетки. </p> <p class="paragraph"> 10. Увеличьте размер сетки grdData, чтобы она занимала до 80% всей площади формы. </p> <p class="paragraph"> В верхней части файла введите следующий код: </p> <p class="paragraph"> Imports System </p> <p class="paragraph"> Imports System.Data </p> <p class="paragraph"> Imports System.Data.SqlClient </p> <p class="paragraph"> Затем в определении класса формы frmXML введите код из листинга 10.1. </p> <p>Листинг 10.1. Код чтения содержимого XML-файла в объект DataSet </p> <p class="paragraph"> Private Sub btnReadXML_Click(ByVal sender As System.Object, _ </p> <p class="paragraph">  ByVal e As System.EventArgs) Handles btnReadXML.Click </p> <p class="paragraph">  Dim dsPubs As New DataSet() </p> <p class="paragraph">  ' Чтение XML-данных из файла. </p> <p class="paragraph">  dsPubs.ReadXml("..\Pubs.xml") </p> <p class="paragraph">  ' Связывание объекта DataSet с сеткой данных DataGrid. </p> <p class="paragraph">  grdData.DataMember = "publishers" </p> <p class="paragraph">  grdData.DataSource = dsPubs </p> <p class="paragraph"> End Sub </p> <p class="paragraph"> Эта подпрограмма считывает XML-данные из файла pubs.xml в объект DataSet. Теперь объект DataSet и его данные могут использоваться любым из способов, описанных в предыдущих главах. Кроме того, эта подпрограмма связывает объект DataSet с сеткой данных DataGrid. В листинге 10.2 показано содержимое файла pubs.xml, а на рис. 10.1 — данные в сетке DataGrid. </p> <div> <img src="data:image/jpg;base64,/9j/4AAQSkZJRgABAQEAYABgAAD//gAcU29mdHdhcmU6IE1pY3Jvc29mdCBPZmZpY2X/2wBDAAoHBwgHBgoICAgLCgoLDhgQDg0NDh0VFhEYIx8lJCIfIiEmKzcvJik0KSEiMEExNDk7Pj4+JS5ESUM8SDc9Pjv/wAALCAEVAYQBAREA/8QAGwAAAgMBAQEAAAAAAAAAAAAAAQIAAwYEBQf/xABIEAABAwIEAwQFCQUGBgIDAAABAAIRAyEEBRIxQVFhBhMicRQygZGhFRYjQlKSscHRJFNigrIlMzRDcuFERVRzovBVkzVj8f/dAAQAKP/aAAgBAQAAPwDXZzmLcE/vTRNY1a1Teo4QAY4FIzEVamXenjB0xSAJvVfPulcLM8xD6dN7MmBFRpLCajoIbud0rs8xeh1Q5M1rWTqlzpEb8UPlfGvk/I1IAMFSXEjwnjc7Kurn9XD0qb62U02tq3YWVTDh7Cq/nQWxOV2B3L3rpOc4kVdLcnDnaQ+Nbp0kwDvzTPzbHGp3YyLxRqjU7aYlcNTtSG1Cx+V0Q5pgguNj70D2rbI/syhA6lAdq7wMuw8e1O3tYwGHZbRH+lxamd2uptJBy1hvxqOS/O5nHLaR/ncie1rJH9mUbcNRUf2tEH+zKF+ZKUdrLWyzD9d0R2tH/wAVhvV6qM7WgGXZbQj+EkfgnPa6nFssp/8A2O/VE9rW92f7Mo/fd+qR3axpaAMto+1xQ+dYAdGWYcWjcqfOuRbLMMPOf1QHaqQB8nYbfkVD2r55bh/MSCie1TD/AMup/eKg7WAf8upH+YontW3/AONoz5lL86xoI+TqBMzeUPnXP/LMN8UHdqL2y7Dj2FAdqCYPydhx5Aqx3azeMvpzz1lJ86mzbLqPWXlL86xf+zqHtJQ+dTSLZbQ95U+dYA//ABuH+Kg7Vb/2dh9uRX//0Op3auTbLcN7inPato/5ez/7HKDtWw3+T6d+Gt36ojtWwNvltImZBLivf7vEeD9nwfiAO7rLmOMezSXYbDeLUAGte6zTB2UoYs1sQ9jcPhA1lLvS4tdsTyRfjmspte2jg6oa5vqNdInZehlldzRimidLcQ4NGo2ECy8zPsJXxIoNZRfUDalXVpG0uXCKGaMwvcCjiO7DdIbpMe5M+vnL6PcnKB3YYWNAEQC3SQlqOzusz6XLC6WlhE20mJHnbdRjs/7irROBcaT26A3VGgW2M9AuQ4XNhUwZqZa57cIIa03BvN/eu703O3OafkizRsRMwWmT18PxSg50MwGMZlzxUbTFNpJ2E394skpvz6hXD24J/dtGltIulrbAc+i83EZJmmIxL6wwD2azqiZ3SNyDNTb0N3vCI7O5r/0jvvD9UHdn81aZ9DefKCochzRzzGCq+5D5v5rP+DqfBN8381/6N/wU+QM1J/wjz7Qj83s22GDf5ah+qf5u5xB/Ynbfab+qT5u5sBJwb78iD+aHyFmm3odSyb5BzUs/wT4nogez+awD6G/4IjIM1IP7G+3UfqgMgzYT+xu94/VFnZ/NSP8ABu94/VB2QZo25wjzB4EfqkOSZodsHU+CnyJme3ojymORZpA/Y338kfm/moZPoj4nmF//0U+Qc0JAGFd7x+qPyDmZn9ldI6j9UT2fzWCfRXewj9UhyPNCTGDqWSjI8zMxg6gPsQ+Q80j/AAb7b7KDIsz/AOkf8EfkHNI/wjveE7ez+Z6SThHbcSP1UPZ7NYH7I4fzD9UhyPM9vQ6inyHmgA/YqvuRGR5o5tsFV9wWhdjs0NVj2ZfXDGAA05EGAkbiMzpkPo5fWaW6wbgghztSTDnMaNerU+Tqp7yl3frAEXmVG0MYaXcUctrUmPe1zi6pIkcV7OXueHYuxP7Q78Au9zwHPBse+qf1FJUc0kXsgHFtg4kb3Td43aRJSEhrZmZOyBdsW7KNdeXGDyCBc4mATEqF87e1B567KA6t4U2F/ZCMSCReUHv0uADt0wd9sbbIl5kRdFpuZKVziWSLkKzXPhJnwpAbwTdK7iQT0CLXBtItJFyv/9Lbl0sF7DZRrjpcbiyDX6QSdUQnY+Gl0FAnVeEhfwgwFGkCLboudaw2ARLiKLp4lIYgCN7yjLQbEQeKmrkeiV86zeR0QdJIOwQMu2t1TXAvwQJttKAOlm0jgn1Egn80Q65M7WlDUdN48wrGO7tvM+aqc4HjHJHU0WJuQjqGkk7gKB3q2iFwYfEdzVxTSQPpyfgF6tYHXVE7V6n9RVNZ5pCzHOJcBpbFz70pq1hEYKpH+pn6qp1StucHUt/GwfmoH4gnV6G/2vb+qLqlcCDhKluTmn80BVruiMJVn/Uz9VDVxBNsHVmfts/VRz6xFsHUF7+Nn6qa6/DB1L86jP1QGJezE06VXDPpmrIbLgdh0XRBv+CS4kgxJX//09kZidM3QAMlxaYFwuA9pssDgHOf7GIO7TZWTOup9xD5zZZwfUP8iYdpssF9VSdN/Cg3tNlrrF9QRzaoe0eV6YFR9zPqFT5x5YAfpX+xih7TZYI+kfAG+hRnabKgw+Kp7GIntPlZIh1Sw+wgO0+WEyHVL7wxRvaXLJguqAdWou7R5WJIqv8AuJD2kysT9I8n/Qie0mV3+kfEfYR+cuVGmRqqC++hK7tPlpEA1D5tSntLlhNy/wC4j85ctAADngdWqP7Q5Zfxv+4oe0mWRd79ttCVvaTLQfWf08KJ7TZbxdU+4h85stvDn/cUHaXLTIBqQP4UX9qMt4Cp7GoHtJlnCo+Z+yi3tJlgFnv34sTt7S5ZBmq+4+wkPaTLW3Dnn+VA9pMtNy5/3V6wipSY8H12gj2hMGExc7Qsnm1WrSzSu2mTGoHfoFta0F1bc/T1P6iqarxFLge8amfJA6qlpHG5uv/U1NbHuoYttENBphrdToNpJ4pG5xhHaXlz26yR4mqHMNJ1dyWa3OY0E8QYvyHVJQzUV6tNrGeK2ufqnUAvSeRtA5yq2nUYK5cU4jMsFMkanfguySRcbKC9QDgi6Q4tBF+CgdDDLotZfOqnrv5yUsDioYTAgG/EIcNrIwBF1CQG+1AwW7KMgAiFBANkbSLJSVEIROyNg0oAC3JS1wFNwiYk2QsltNlOCgRaLOPRKRPFCLeSLURAHNf/1fIjqiDdfR6J/Y8OIk9yz8EzS7W2Dadlkc+JGc17Aer+AW3rBs1uff1P6lzV3tpNZUq1GsptqNlzvq3CQ5hgO7E46jqniVWcwy9rTONpiOAKrqZhlToJxNEutfnGyTVkdQA68NANpMSnbiMoYx1NtbDwQQfFMgpH1spjSa2H02sDCsOOy9jQ1uKpACwhygzHANv6ZSHm5U1cVh8Tj8EKGJZUcKjpDTtZekGEtMkxKjWkbmVHMlxdxPsTBn0bh4bjhwXm4bI8ufhaVR2Ea5zmgkyb2VhyPLNUDBtPtKIyHKzf0NhtzKqZg8hIdOCA00y8agRIHFClgcmxWFL24FrCwBzmmQRIlLQynKcUHd3g7AA6iSJnkugZDlYpk+htN/tFMcjynu2xgmg9SUhyjJ6dKq+pgmwzi2SfxVD8HkgDdGB1uL+7LAHSHcbdJV5yzJG4ZmIGDa9ryNMB0n/2CqHYfs+8upjCjUIkta4+38lKGW5FiXvp0aDXubBN3BXOyDLGsLvRGQOGo/qq8fl+Q5cxz6+GEim54DWvdYRJMdSPeq8Fhuz+YU2ej4Ya3M16HNcC0Q03++3zV5yXKw4g4RnxU+RMsmW4OmR5myJyXLR/wbAD1KhyLK9RHojZgn1iv//W9t+EyOnqL8KA1gu7xWMxCejgsjrYhmHGGAqPBIB1cJ/RdPyDlsEDBsPtKhyTK2/8EyOclNTyPLA2HYKnMX8RVdbLMppUwTgGEl2kBoJJ+KoGAyAvcDhwNLC/63qjcpG4bIHODW4QmWap8XEgC3WV14fJsnr0w+nhGFpG+ohR+Q5W0Wwjfef1VNfJstbhajxhWBwaYMlelTafR6DWGwpNA8oVjKZDmyP91ju0ADc5rajEhv8ASFtapcdQ4uq1CfvFBwmGuYHzu0hA08PEDDMH8gVY7kPtQp7fYCDu7AA7tk9Giyr7qlv3FM9S0IspUf3FL7gU7qgXD9np776Qmc2iXQcPTF/shBzaIPho07fwhRrWyIYGkbQE7XuFuqjHwReCmL7G/lKD6gGHqEO8QaY9yNFpFOkBoBFNvh1XiESKgBfLOlz+iswzH1ammno1EGZcQB8FWMpwQAD6uCfIkE1ruAv+R9yelk7XVBTw1WjDhelTqyHDbiFdRyHE0GuFKlSZq4d4f0Vz8qx5pw0Ud7S8/op8kY0htqNhfxn9EjsnrVKVSjWNENcRYVCCePJIzs7r8fo+GIjwlrz7/NW08jxVMBksqU2nwse+zfKB5r//1/oTez72OkYbD35ONrzyRpZFWoT3VCk2bGHlGplmPFN/0dMjkXm/wVOI7Ovx7ZxGHouBYWx3jhLTBINug9yXCdmK2DqPfRp0m62Np3qEw1swLjqf/Quo5NjT+6++f0QbkmMaCPor/wAR/RA5NjuHc/eP6IHK8awlzu5Ag3NQgD4Lnd2fc4uHo+HJd/8AsN59nmrKXZ6tTeHsoYdpAIB7w2+CY5NmJtFGP+4f0T/JGPaLCif5z+inyPjmy76IcY7wn8lzuy2rUYWVRhjBLiH1TO++3VUnIW1Xu00cI4zpfFY2vttbyVp7NVnNkUaTX6AwOa8+ECI4dFdRyPGUWNpMZRaxlmgOP6Kw5RjSRLaX3j+i5sdlOMZg8Q9wpBraZsHT+S5WVdNOkBBbobMDoFYyoHPDS0X2WOz++cVpHLh0C25Etdw+lf8A1FBzTqnVeVXpdeXEngEpBLj0SFpmZJPNQNgxMx0RDTa0KBh1E6ulkHNJIBmEW04BvPJANINzdPonjF0BSJdJICfTLT4gLquoD3LxEANdwVHoxq43C4rvXBtOgG6QCNR6rrgusA4cdiv/0N/gGF+ILLs1McJ0nchdVHL6o8dRtIuax2lukwHGBy5T7ykyvLK+CxorVKrC0zqBkwb7W6i/mvc76n9r4Kd6z7XwU71h2PwXFmGFGNDA2oWGnUD9QHEAgfEheY3K8wloZj6jGd21kNJAFgDAjzK581yTNcdSw4oY8tqtbWp1nHUNTKkAgRxAuDwICBy/tLTw3d08c1sN0sOs2Mug+rsAWiOJCszDKcwx2Teh1K3fubXa4FxEloYAZJaROouO3Je7Qq9xgaTK51VKdNoeQCQSBB3WeqZZjxn2Nx+HeGMxBZHihzmxTBFmyPVfckxNokoeg5+dJdjtVRoEEPcAHd24HhtqI/3XfgsLm1PGU6uIxbnUw8zTknwfSQNrm9O/Qr2jXYDHin/SUDiKYcGy6T/CV52eMZmWUYvA0awZUr0X02uIMAkLP0+zuOo5n6UzMaJZSNI0mFriT3ZcGjp4DBN7k22K2DK1MNHi+CZ1emN9XsaVO/Z/F90oHEUwL6/uH9F5GMwzsTXc+i6zgWP1MdYFwMi3RctXLMQ6abK9OhR162w0udqG3K1+Mr36NUd0zWfGWiYB3VnesiZPuKHf0zxPuK5syex+XYlsme7dwPJZYAaKYBjwAGPIK5rYrAudFoid1js/DhnFbfh+AW8fcPmY72p/UVU4AA+U3SBzwBZKXDUbcEpMubAUaL2FkZPJQbiZX//R27z4gDPuSEnzHQKQLWTHnEAqTpcnJ1bcElUxh6on6hTB30dJs7MafgoXxBmPxXRgHOOKBZMwR8FKVXMfSGAjFOokNkaXA7DV8ea78Fh8UyvhddSqYY59UucSCTs2/KfgvWUUXmZu7FNog4Y1J1idAMxpPIHjC5W4/OGHS3CahrDJc0k3+t5CPilGY5zVxbKZwfd0hUaHPDHEkTc8ohWtr5i05jT7usS0l1B7hbkALKutmWb4ZxDMEaxNR8wxxAECIIHPmurAYjG4jF4gYmmabA0Bo0ECZM3O9oKpq1s0binYRlJ3dl8d8OAN/wAAR5wuarmmc1cO9rcE5ji54aW03EgR4fbwKhzPOqL65dhGuZRMSWuAfsJHLefYlw+b5rWD61Kl31MkBhbSMSJkfgF7OX1sXVpk4um1jrEBoI3AtdNmJqDB1TSnXoOnSJK8xtTE963vHYvuGk6CKZ1Ew3e23rb8l7jTbdGQVLKLx8ZUxFPEvFIVC1zCBoEgP1CPK0rkOMzMB1OhTrVqjX6i4tsWjcXiOHNaGm/XSa6CNQBg7hMiuTND/ZmK/wC078FlWv006d5ljbewJ2umoJERZf/Stz2fletY8PwC3dQBpqf96p/UVSbiPal1XFwVWbE+/ZEAad7lDpx6JokgdeKhA1AD3ouAJQMARZBoAJ3/AETwC3pxlAaXGCduaLuMmx6JKrT3DyD9Uj4JqbgKNMBjYLG3I6KOEgGGEA8l15e0d+waWyXbgRwKvrZjVo4WnVdhqfjL2OaCTBBI91kcFmL6+Lo0qmGa1tUkBwncavdtsvX7lnL4lE0mHh8UDQpndvxXDmOPoZc1mpo8TgDLoho3Koo51hnw11B7nl7mDTEFwO1zyI6JH57g2ua8UXuouaSHAXJESAParcNmuFxNSnRFFwfVDi2PVsTYnqBK5/lnC6KJNFwe6C+ZgDTqMc7Ee9elQOHxeHNRjC0SQQ6xBC8TCdpsDVNRuKoPo6SGsJJOsy7aQODHHiOqvpdqsnfXeyXtApCq1zmEamkkT0EiJPNEdpcoPfCpqim4iA2ZADTMebojoV6uDdg8XR7zDsHdhzmggQCQSDHtCv7ikJhgXJmDsNl+ArYuqD3VCm6o+CSYAkrhw+Z4Z+Y0sur0DSr1GkgGoHDaRs47jV909J9huHpBmnTIUOFondm3UoeiUP3Y96//0/r/AKLRFwwLzcRUp4atUYKLHDQXgn/UBHxXNUzSjhmn0igGO7wDRJBDed99uC9tmHoloIbYi10fRqX2fiUfR6X2fiuXMaFMZbifCP7tx+CzYpgMp2BljeHQKNbFUfELKZ8ZziuYja3sC21Uk1KgI8IrVDH8xVLyAIAslBuIbFuSAkiZhABoIMpoZJvBhHUC23mox0GLkeSjoPGZsAlDiJG4CAcSdo8kZuCIJ5FT63iAhE+tuLIPd9C87jSdvJPRY00KRdUJ+jG0ckwpsa4fSP8AIgLpwEDE04LpniAV2OxmTnQa9WgxzmOLRWAaQ2TJvtsfcUMPjMlNegMPisJ3r/DSiJG4joZBEdCvULah/wAwD+VTS+PXHuULX/vPguTF1adA95WaX6j3bQ1skyJj4LkZgMpNR2LeabSW6C2oQA3abc9lf6Hl1WoWdzRJNMOJ0CC3YfghROXPruqUXUA+kP7wNbEESYPtRqsy6hQdVc/DinRbJMAhoIj4gJ8E/DVcFqwNWmaQJA0CADNx0uvPq0uz+Dqmg9+DoVnlrnNIEzcjymTHmV//1Pp7cty550RhyGjSRoHKfwcfenGWZc2SBQa6CdbQ0ETAn4BdWEwdPBYWlhcMdNKiwMYImwEK/S+PX+CoxJ7ui59ZwNMA6hp4LmwuAwj2F2Hp0mt13ikPWaYHuXaKdUNg1pPPSEdFSD9Md+QSmlUJnv3fdCncvkxWd7guHENw/fEYh+p1MGo2WAwAQPzC52OwAL6vgYDU0Fz6MBxJi077fBetTpOZTa1tQQAAIbaE4Y/958FNNSP7y/8ApXNmLX/J2IPef5TuHRZovAp0RMksbw6BMwu7wGIm0bLI5+QzOa7Z2I/ALaYgaX1Jv9NU4/xFVFxggjySiNIMf7qNMNsJlCQbRYnYohpG/wAURAIRY10y6N1HiHczuI4JALTBklGYO15UI2M/FTc+HgmgjkLoOnungHgeG6NAVHYWidDP7tu7uisIqOiWsA29ZdOAa/0ymS1pgnZ3RV5j2epYnHtxlLGtw9bu9IqFrXPEOe4aSTYS8za4AVmDyipTxGGqnHMrNpeI0wz+8dM6ydRJPUztaF72t/7p3vC//9X7EXP/AHZ94U1P/dn3hcmJZTrkekUxDKgdpcRBMEcVx1Miw9dlWaTpqTJkETq1THw8gF0nK4axtOtVpMbRFIhsXaJ48N1xt7MYSlh6tMVKo70eN0jaZiOUosyLDDAYnDsqvNPEMDCQQIA5EQvQw2Go4GgaVCiWNBLj4tRJNySSZJ815eMyZ2Oq12jFCnQxRbUrUDTa5ziAAIJNhZs29qoHZNgxOOczGPb6ZUNUtLGuNK0Q3kOfNU4fsdVoZgKgxbXUWOdUbrbqc5x02dO7Rp2krR4Kg7B4Sjhmhz20abWBznAkgCLq7vKkx3J+8FRig+vTdRdSc1rgQXagqsJTqYUP066jHOLgwlvhJM7+1dYq1SP7hw/mCneVf3B+8ERUqET3J+8EDUqgf3J+8F59fC+lVC92qmRqDtLm+JtrGesLnfk9GtVqGo6o5rnEljXtaATa8cbn3r16PeU6LGFjiWtAkkSVZrf+7PvCGt/7o+8Lmxz6jsBXHdGDTdxHJZukT3NESLU28OiuaZqxM2WL7QF3yzXJG8fgFuazfpKpP7+px/iXOWS6ZieqhbZosY6pDMk7RslvwN/zRBMtbuR+KbxEgGAiW6nQPgke8gRBEoEwAZRmSXfBGTMbhf/W23G3xRvMlkomSw8AWmeiGHNN2EoCZ8A/BWFzSZkyNhCvwDgcfT1W33twKvflTamHZQfTpFtNlQCN5JMCeUEpMvy+vhcwp1nmnoAIIJBLBeBMSTfde6KrPtt96hrUm+tUaPMqd7TkDvG32uvOzHDMx2loqta1j9TjY20kcfNee/C5oXNFPGNp0m0Q2Gv+sAI+PwTDDZoSxvpx06hLxVvpm4iN+qLcPmD2YltbFB7KmHdTaC+Rq4G433kpcTl+Jo4Wph8FVY5tdviJeG6T0AHGy78qpYinRrOxDw5z3SzxaiBFpKrr4PEOxrq1NtNpOktq6ryARpjlK81mWZy3EVKzsQwvdSFPV3njHineIXrZU3GUGVfT64qOcQQdU8L8F6HfU/tBTvqY+uAkqVKTh67SLg3WYyPJ80wWIwlXGZiytTpsAqYcYhzm69IBqyRckg+HYTO61Yq0+D2+9Q1af2x70O+pfbah39L9433rzcXTfVrF9Du3ag9jtTogGLixnZcFXLsW99WnSq0qVNz9feF0uJEkbRa4N+S0FGrNCmarmh5aNQBm6fvWfbHvQ76l9tvvVONq0xgq/jH927j0WbpuBw9AcTSb+AThh1iVju0JAzmsJ4N49Ato869bjF6tQ/8AkVW65Aj3KBpaDJC//9fdACfFx5JA0agSIHNB0aptHCEwbq2MItJ1gOvwSu9XaYOyRwBsAm2AgSVCTMwi0cym3gEgIVZbh6jhwaSfcnpNcyjRaHERTAieiZz3NJguPtV2Dc/0hjZIMEiZPAqr0nMnABtd41TBLXGBFz6t7xyhdmX4mtWxlCm6pVkAl4qNMPF4i3kV7cDkECATsjA5Lz80qVaVGaTnjxX0C5twsVXiswxOHrGmyjqaGNMlrpk7mwiy5DnGY1G+DB6CHD6rriRJ22IlSpnOYUXgPwTAxrSXuJI4TaysdjcXUx2DDQabKrGucyOZM8OQCuZmz6mPq4P0aNAfDg4k+EC5bFgZte8KrA4vHjBV34ikalWjRaWtiA8wTb4KUc3zCo6m1+WEB7mjU0yBJ3+B+ClXFZjhJLm99ocWCGHxCJm3E7clbleNxmIxNQYqgaTCAWCDvAkL1bFceaVauHy7E1sOzVWp0XuptiZcBYR5rx8Jjs5r5m7DPoMo0hV7pzy0+HSwOLmnZwMwNo6kQtGIFlPCjA6IWK8rGYmvRxDm02vh7XBpa0mXyB+C4X5hj2OeykKleqHyYZ4Q0GSBYRwHHeVoabm1KTHjZwBC/9D7LAUgclz5gdOXYh0bUnfgs0ypooUhp2pN4dE+sOdFzA3KxmfOY7OK9oiB8AtqWDuxzNR8/eKUi5E2jhZKJNjsfggQ7gfCE0CJLoPJVuJjbayLZNwgBJ9UzzUcDpGqJ4wgL7bD3oMYRuCVYOUzHDkiGixhEudpi4ulqgnC1hBd4D+CsbpFOn9GJDGm88vNTwOJim21+K6MFHpTT3bSYMQeiYZ1iLA4F06tJjVuQCBt1H5KzCZvUr4ulRfhixrnmmXS71hPMW243uva0Dmfeh3bebvep3beZ96oq1G0alNsEipUDN9vCT+SpOaYMOawGo5zgSGtaTYGCfgqG57l9QwzvnHVpADDcyB+YVdTOMFWw1Y4dhqmnpJa8HSZIHWd0xzikyhTdUpvFZ9UUzTEz7PZdWYDGUcxGINI+FjoDg4nyK89najAsxNWhXa9raRqNdUa8Pg03aTqAMtmCRIvC66PaHKquJbh2VXS8wwlrvF4i0x0kRK9UUmEWn3lDuGCBBP8xTCgxogA/eK//9H6xjdGHouxEOcWtNtRuuQZxgdL/G4OYzVEESJAkdJMJ8qxIzGm6o+kWHgA8m0kfku04SnvDt59cqeh04PrX/jKc4WkZkOv/EV5eKxXo2LbRaz6OHve46iQARyUdm2VtqOYalXU0DUBqMCJ/BM7Nsuotph7qrW1CA0kO8XUdF6gps0wC6PMody0gC/3iubMaDPk3Exq/unfWPJZlrpoMaODGwPYEzDU1EAWDb2hZPPA5+cVy3aR+AW2qNAc9o+rWe3/AMiqnTqgE+R2TEHSASbi8KsSySJKDptwhJquTJ/JWN02IJjkgSdUfV4KFxAi20pXGbjZNqIA59ERc/7KAy6DzTvOp0gWUdfD1I+wfwXG/GNo0MP31ZjHVGANGk3/APfzXVFVo/vGxv6q7crY5+LYXOabG2leo3K8K0j6Cn4Zi3NGnl2HovY+nRptdT9UxcLpPecC33IfS/ab7kYqQLtnjZc9bCtxYNOu1jwHAxBsY/3VYynCNfrGHpapmdK//9L6yzLaDHS2lTBmZ08UWZfRpSGUqbdWmYby2SYnKqGJqGrUpU3VLeIg/qg7L6dCg7uQKIDhUPdy2SNp6dFXUymji8IKFenTfRLnVCyD6zp1Gx46ne9KMgwU0/2el4Dax21F3O9ySvRDag2c2PJMBU+033JS2tNqjY5FqpxFCriKZpPczS4QYb/uqH5RQqaNdOk7QIEtO0zz5p8PgXYVzjRcxodaA2w+K6mitHicw+Tf90unE3+kZ93/AHTFtUiz2j2LnOGNYvJ0GQWElu4O4VIyik173ClRmoIcS03ERzTMyjDADVQpGHagIMA+9dwD4uR7lPHzb7lzZl3nybifEP7p3Dos3T0ei09USabeHQKNs4Ry2WPz9x+WK1t9P4Bbqu1prViZkYip+S5XDxGJuoXAWdb2IB8SAEHP5/FJN5sZMXTNF5LgCoJLgTJHRRxgGx9qWSW2v0RmCOXBNPED2hFjmipG0qy2qZm+yFV0UqlxBafwXlPq5biqGFNaXOpsHDov/9PXNzbBaT4za0aV04LtBl+Gqio9ztIEWaV6fzuyu/iqW/gQZ2vyh/8AmVBylhT/ADrynTq758c9BU+deU6Qe+ff+AoHtblIt3z/ALhSM7WZUXv+leRaIYUx7X5UDGup9woDtflJBIfU8tBUHa/KTu+o3qWI/O7KP3z/ALhVdbtdlJpuAqukiPUKZna7KWU2g1XyB9gonthlIE9489AxA9sMpH16n3Cp88cqmJq/cUHbHKSY1VB/Ii7tdlWtsVX8fqFT54ZRt3r56MKnzwyj96/7hQ+eOU/vKkf6Coe2OUj69Q/yIHtnlMTNX7iSn2wypuqTVEmfUVvzxyf9+8fyFT54ZQRIrv8AuFQdr8pg/Sv+4UHdr8oH+dU+4VRje1eVYjBVqTKtTU+mWjwHeF5rC4U6UmfAIB8grmPY18zBi0BZDPjGcVoM7fgtxiWjvK8b+kP/ACXOOILYSG1iAlIjgIHBLJ2KgMAgqNdMAG/Rf//U2IMOgO2KV5LjE8UdhwsmHGRHkjbdpgdVABrubppdr28kHyaNSRILTvwsstS8NCnHLmnDgDfjz4KENDYKsG55Hmq6YaHbCOEKQNMAA3RcGCg12nxaiCgQCBO3kgIDHajp24IAATOxFk2mw07hKRJg2jigQAd9+JKBAIgwUS0HlvsEdMtmwjohAMWCUNEyeCZzW6BpMlKYiOiAEHggTe8W5IPcOAKgcOF+ahMCeqOocABfklMEEg7KSCBYK6iRtpkpahhxBiyUgCIHuC09PUadIbfRjj0C/9XZsa01NO8iYKyOfN05vWEE7beQW2xbZr4gzf0h/HyXMS6ILvjslNt79UddxdI6YOrcmyDjDY6/BFkag4xumFnktN1KhIGrVugC0i5HVQvO0b7QnkutIgDaUS4mARsUSQTcmEDULqNQiw0lZegWuosF50iICmqdVyZ+CZx031FWABxJJ4JGEAiDeUpNxtOyaQGaYjxbocARtNyChdwN5nqje8cpMpvqgTBlKQb2PtQ2IHNKR57ouI0gg3UBGm54pSbgC0Ih5BMXHFQvMTpslLoNkJ07pDe91BtBuv/Wsbxk+QRIBEHgo0GTFxKGmZMpg2+yupN8LnCdIuYS1iC6wdEWlJAkONlp6bx3dE+IzTEW6BWtPjhpe10cQslnjj8r1iOm/kFssWdVWuBxrv8AyVG5gbIEy0EXHFV95pdsjrPDmldq85UaTIkSJ4JwfF5c0HHYAADopJmAB5jigx1rj4qyWkajIQaTqnb2pnbkzKq1TSe3+ErN0LUmSbaRARv3nrfkjLtMuMouLpN7QkbUgQ3moHOAmR5lEl2ieZlSTYNi6LD4XKGob2tF00+G5twU7wlsnYJS6YPHhKUvJvC//9foJIJI2Qc7wHhdKTPi4otJAkgqF0jdKQd4shMPklCTeeSJ9X9FAenSCi31YjbZFxi5380ASATEpgSW3lWU3OAMExFxzQqGRYASk1EeHey1DC1tKiA95Pdt4dEzXnXOp1vNZPOi35Vraom23kFtapYX1H7Hvqhv5qhzgWgi55QlNyGgXjnshA5bc0pbpO2/JGAZPHnKjQBDdyi27xxIPuQcIJ4zsgRcbhAHhzTuvAO3VBp3tIPBMW/WgdbJahApOcODTssxSfFKmXTtyTF0lokm0JZhm59qYSL8kGOBO1zwX//QvJBgcU7o0BwsZUlpg9N1BZpsjqkmBbiiDa4sg4gQI+CHEHklIEeXFR5sQoY03F5Si5AiyHO6Y7RACTjEqAeOOSU7kkWRuT0JhGLHl+Cgu0wEZB9ijruEBNJ5K2lqLXEaTF1VVJBBMoOOqAtVTDhRpA3AY0E+wKwMAJBG/FY7PGTm9aYtAuegW2qO0h4Lb97UP/kVQdWk2Ec0u2wRIFhuUHkt2v0SkaQ4OsN1NMvsLcEQIIsAZlK+Yt70JdpF1BBJPLiF/9HWSNiZt7kQRsJ6lDWCNPXihVGmi8bAtKzNMnumjkFN3DgjJIHTgnDtzGx2lKTpdqMfioI80TdoEixRdsLbclGusZCEmSOaJJDd1BsHbkoS4u0zYJLkEwd0X2CBgDa08krSQRdNrF9SM6h1QJ6bJYkm90BYxJ2U1naIRBklQeqR1tBRIQNtrSmEhsGwKtpAw4RIhCqRr08gqx1K1LYLKJggaAd+gTN9eLETMRELI58IziuAbW/ALcVWE1Hkb99VEfzFUVN3Bf/S2N5sOCDTciJKBNgIkqCLjT5GN0wE3AgKNbPEA8ZSkQLQR0SNb4gDseiLAWkgifJGPDMCFAfFP5IlrTcNJPkhUcXUXiJOkysvSl1FkWteyYMMngOZQ4Anfkn4Eg7nkhDiSbKWA1A+yETZt1OUADzUaG6XBSPATKJGpoPIJA7YRxUMBxvcbJXXiDF+SjtoPEqaR3dyZmEI0mDxS3PIBORMDlyQIuQTZKBLrGCOBQ4kngi4XOx5KNBIJNlGkaYgfqiQS4AhGYiBsv/TtueC6cNMEQfbsqawAdztKG5Luq1LRNOkS2T3Y/AKxrWd4SG6TCyWfBoznEDqPwC2eII11bX7+pf+Yqgukgi/mgT1CA9YRAI4ylcWtcZv5KTsGIhxbBdx3Si9QaRIPFRxAgN25JdWwKdsbauHBCQHbmEQYvqEoueQ/wBaOiQyRUAm7TeVmabvABeA3YKTqbJPsUg2un1CCClBMARF1A4TA2TP9UAG0qP0gNPGFAA5rjYSpzjdEzyjySjnCUOE7cULbAovEne0oyAznfgl0yIJ25oGzbQv/9S8X0mRulPrHihMTxKEBxtCNnGSZhQG+6EiLHZMSZFxsgCAREEcU1o3Cup2pmNt54pKrpfIjayUkAgC8rUtf9HTE/UbtwsEzHt1TJNrysjnbgc3rn1ri/sC2uIEVKvPvqh/8iucwXAjZK9k3HtQgAwduaBY7THXmoABSOkiQOaLWuHEXShpBJLh5IloIJHJLoMg/moAZ2v5py20WMqOaJgC4SO1cSJJsm0DQ4l19J4rL0yQxs7QoQQ4HgpFibp9JDjHFAAtI4wi0ACbqOB0gmBOyZzT4bzaFGtsRyX/1ekjcnZNEjUTFkg2iUob4h+CjhF9lCDphQgd3MpbyQCYUIAbKgbdvKyGnxEKFsHdDSdWoKad5RgDZQCBv/spo46roBpF5up9W9l00IJuLRNlVU9fabJdPHZaho1U6ZvJpt/BWU6bXkmQSWxfZZHPCW5tVDYi34BbnEmKtXjFep/Uud58doIPBR4aCAXQeiRxJeJBI6JXPI2sjB0zMQPejSAJBMwi0tJdpVZkO2lEtt4hdQwXT7EQTq5jgo1w17Gx5qGCQTe9kdWppmIg8F//1raYJpNLuCJI3mDwhFt2gHndWeHUfJKCS7eyMQII4pnt8MnqgT6pN0REExN9pUI8JHBAO8PRAbWICUu8Q6pHcPPiod90SBotNjZQeFCBaTZPY36hLaeSFpE7cFCRqkbcFCIFzJ3StcZ4Jw4Re10HQ02O6U3KjYiAVfQc/Q4izQLqqqQHztGyWSYutZSA7ui4l0Cm2fcrmgh3h2lY/PQPlatfl+C2+Inva3I16n9SoeJcI24pTTOm+/BBsyZAlLAcJ48YU0kXMhf/19eHEmADdQAF0GbKOgEGbjghq1bgqR4TwTREDceSVzWiwJEpgIJR0eAzvHBZOkJpNmIRjSeCI2mU4FyeHBQRJ4QmiYEzdSo0in7SlI0i6IgsJG8oAwDMiEQQOd1WQYtPtQkEgRsg6CyADMp3NDW3IMFDSO7NoulO8o+RTxIExMoObtzQgaTwKXeBCnQoGRJA3RE6CfxQcQQDv+aW++0cCpJcw2AXThmEggC+nboqq8Cpa9koJEiN+S//0NlTaPR6HimabZ9ydp0kXssdnwcc3qkjcD8Ft6/idUczd1Wo4feVM+Js7xvGyUkgkTc80gkmZuhtPFBr7aZ26KT4t/gjLdcgdClIDogwSgYBuCeqbf6shEgk6jItZGm0F0nnYIu3MXnooKmlj3O9VrTPuWTYQKTSDYhEmHWBlHkSrBa0pQT7ZTOeGwZPkjUMtHKTIlK+8C6UWB4IF27uCMkGCT70Jlvt3SNMmBwUnkbp3+qTvdQk6bOCUeE7TZMDJJsIRJcI8+CDiSRBMpXGRulFnb8F/9F9XiiVAf8A+qahp4pS4WJPFAmSCdkbkCLc1fRLg0gPIBCpe6SQR7SjqhtiQtbTa4UqQJuGNm+1lYzXrEXgLJ50H1s1rOa0W0jfkAtc58SY/wAyoB94pCZN4QLhMDgFWDD77xdKDsOZQLpvpt1EKNIdEe5OGmTcW4KOIL+Y2SgHTMwmDvFBAg9EQ42OqSRCkyZc64R1ACG3lLWAGGqu/gO3ksrT/uWHe2yfVLi4WKhfI/VE8SEocSCRYpi4OA5qOENHXZK5x4QbINPgg3JRuGxxRHiEoT4bKAW2k81//9K1zZMBF1iRFp3QPqe1CCYOoADgpJ1SQmJ2jYwlkShMHokLp5xyQDgJspJgx7kXDw2KjjYC0qbm9uaMmIK6aIZ3UB8OPVVVgWVIAJiyQySLCZWuksawgn1W8OgTMeTWn6u2yzOYz8pYiGk+Pc+QWre0FzoEDvam/wDqKrdEkWSGSQIU0yZLZ9u6RwAMi3tQcwACDYJxpkRuQiGAvkm42SvZxCJAIsYHmlaIAjfqnDZgTuOCHdguO6fS2RxSVHThqlt2FZWmfo2Ack0sA2MoOEhPAueK/9O4CDJCJYJFt0XGGjohAmI4IAFoI6qETJlM1rYIggqAAN2KU8eBnZCHCDbdO5pLvaldGjrKEAOmLDdE7W2KDomI4oQACI9spQATElKReASoGttN0WiQeqgZ4BbiiWTFt+iOgECQb80TSgcZKuosOixgjaySo3UYcTIQ7uSI+K1seBgPFjfwRaPHb2mdllM0n5TxEH635Ba/EDxVALRWqCJ/iKpcAC2djuhN507bXQLyeQPRITDp3TaZB2PtQawSLSfwTMnWTNgi9xER+KB9Uc1//9TXifbsm9XfkgCZsg4lu4HsSVHFtGpH1mlZilHcMP8ADujMiAAeKXVG0pw+UAZqRMIkExp57lF2otDTFlLl0RBjZAeEEkAlHZrpEjkEzp5HbdKHG1zZCZMnmo4mOij3mBtIJ2SujRqkbpC8jfgoHlx3TbxJvzSF2q1rfFGQTtupZxMRKBBEdEwBIs2QjfSZ3B2TOsQOJSgG8i44IgEi242HBXUtQFpE3lLUYZcSfakMxvtZadrnmnTLXEHQ38FZSc7vNptJWWzoxm+I0xEg3PQLZ4hp11IP+dU/qK//1drJ1aSBZK4X4iVWGwbE23CYA6Q4XkqAEOP4KNNja4UaLgkSL+xK+XGIUuLQh4i4+H3JwCXDUCbKBpcZ24o6NQCU0yaT9TYAaeKyrKbu7ZDHTFwm0Ok6WOjlCgoPhvgdB6JhRqNJ003HzCVrHwCaZbJ5IgODgNJ3tZO6m7QCGuJPRTS/c0zJ4Qgyk9rZDDHkiW1DJDHe4olr9MNpuJO9lXpcN2R7EPHAAaY8kPERBafclqNc42a6J5boFjw21JxE2spoeCB3br8YUNKpFmOI2mExpVAB4HcLwlLSCTpIA6bqNa8GQwx5Kd24ukMd1soWPk+AmOEIhj9VmO9yIa8N9R1uiNRrtYIa7blsv//WtOoCNJJ8kRr0wAZ8lfSc4iNJsPYqqms20E+xK4PcAdDgB0WppN+jpEH/AC27jorqToqwLjZZHPz/AGzXgfZ/pC29YfTVI3Fep/Uucw6Bx5hLI0+PfoUk6akgRI2hEDw8CB8ER6xMHqiC1o0wd90Gluq0+xAm8xuUHbzyTRztBhMTseICRpaRPAogw6xBaeCdr5vJvzTtxFRsAmQOiYV3gySbIGvUI1B58kwr1HEgVCOqQVnPJ8ZMTuFBUe3SQbn+EJ316gDQKnObJDXd4QHRbiFO+qaCS8wTyQFar3ZJcRPFEV3gWcY8khqPcQ7VI8lG1anF1jvZL3jxcVCI6J3VH6JDjM2KhxD2sbBO5CUVqsmX2X//19v3tWDDyVO9faXGeqQVH/aF+iXvX854bBMK9SIL9ggKtQO9cx5Iur1C4hrz1SmrVIs4mSnFatMajYbQp39SZ1DygId9UP1t9rBPTrPZuSSRwCjqtUEg8Oija7ydzyiLIagSXPMuUGoukDgsb2htneI47fgFua9MmpV0gz39SD/Mucs8cA6ieCbuvq6YcBtCQU44GRso8EtLtJ5EJSHBpIabItaahLiemygY7vBAPVBzHEXbspytZymm+15lE0jqlxtCjGBrhE+SYsgCRvyUbTLfDxmbhHuvEYnz2RDfE4NMHqoxtwNvYnc0gEEWJ5KpomRp32EQiWvmI2KLmO7vxBJUaNTQN9K//9DaGmSyDsgWHSQGceabT4duCjB4NgJS91osLybFQ03B0O2Uc06bxYqPFgRzSaCSfej4jIjdECHDqUpYQINwbKd3EiZGwQNN4BLpHJAsMXm/VFlMiZECUwlg5ykDXF+9gUXUyHQQeYCjaThcyAOqtbTdJMOmLoPYdIcRczsgA+IggQo2mSRvJ2V1MESHC6xnaC2dYjjcfgFoc17SV8BmeLwjaFN7WVXGSTeTK4D2srkg+iUR7TdQ9q8QBIw1IGI4qDtXiNvRaJ85SntRiuFCj5QY/FMO1NfSAcLSnzKA7U1zA9Fpb9UR2pxDHkejUj70p7VYiwGGpfFKe1OIIvhqPxU+dGKcI7ijt1UHajFbdxR9x/VW0+1FeYOFpSTuJCj+1NawOFpH2lf/0fXHa3EAn9lpG3ElA9rMQ63otL3lE9q8Rv6LRn2pPnXiBf0Wj8VZ87MUWz6NQ+P6qM7U4hrpdhqTp6kQnf2rrWAwlIX5lB3azEOaP2albmSkd2prvcD6NSBAHEofOrEaP8NRnndAdqMSZJw9HyuoO1OJdP7PR26oN7UYib4akYtaU/zorR/hafvKU9p65d/hqXvKLu0+JmBh6Qv1Su7U4ktAOHo773S/OfEkz6PRHv8A1RHafEzPcUvijT7TYg1Gl2Hpn2lF/aet/wBNS35lL85a5v6PSv1KPzorgGcNSPtKQdp8RMjD0h71D2oxBd/hqPxUPafEaCThqJgxx/VAdq8VIBw9Eg+aY9qqzjBwlOeeopvnPVA0+iUr9Sn+ddZrtQwlL3lLU7V1nExhKQB6lKO1df8A6Wlb+IpvnVXH/C0p5yUzO1Vd2r9lpCBO5Xj5jiDj8a/EOaGF0WHkv//Z" /> </div> <p class="paragraph"> РИС. 10.1. Содержимое файла pubs.xml в сетке DataGrid </p> <p>Листинг 10.2. Содержимое файла pubs. </p> <p class="paragraph"> <?xml version="1.0" standalone="yes"?> </p> <p class="paragraph"> <NewDataSet> </p> <p class="paragraph">  <publishers> </p> <p class="paragraph">   <pub_id>0736</pub_id> </p> <p class="paragraph">   <pub_name>New Moon Books</pub_name> </p> <p class="paragraph">   <city>Boston</city> </p> <p class="paragraph">   <state>MA</state> </p> <p class="paragraph">   <country>USA</country> </p> <p class="paragraph">  </publishers> </p> <p class="paragraph">  <publishers> </p> <p class="paragraph">   <pub_id>0877</pub_id> </p> <p class="paragraph">   <pub_name>Binnet & Hardley</pub_name> </p> <p class="paragraph">   <city>Washington</city> </p> <p class="paragraph">   <state>DC</state> </p> <p class="paragraph">   <country>USA</country> </p> <p class="paragraph">  </publishers> </p> <p class="paragraph">  <publishers> </p> <p class="paragraph">   <pub_id>1389</pub_id> </p> <p class="paragraph">   <pub_name>Algodata Infosystems</pub_name> </p> <p class="paragraph">   <city>Berkeley</city> </p> <p class="paragraph">   <state>CA</state> </p> <p class="paragraph">   <country>USA</country> </p> <p class="paragraph">  </publishers> </p> <p class="paragraph">  <publishers> </p> <p class="paragraph">   <pub_id>1622</pub_id> </p> <p class="paragraph">   <pub_name>Five Lakes Publishing</pub_name> </p> <p class="paragraph">   <city>Chicago</city> </p> <p class="paragraph">   <state>IL</state> </p> <p class="paragraph">   <country>USA</country> </p> <p class="paragraph">  </publishers> </p> <p class="paragraph">  <publishers> </p> <p class="paragraph">   <pub_id>1756</pub_id> </p> <p class="paragraph">   <pub_name>Ramona Publishers</pub_name> </p> <p class="paragraph">   <city>Dallas</city> </p> <p class="paragraph">   <state>TX</state> </p> <p class="paragraph">   <country>USA</country> </p> <p class="paragraph">  </publishers> </p> <p class="paragraph">  <publishers> </p> <p class="paragraph">   <pub_id>9952</pub_id> </p> <p class="paragraph">   <pub_name>Scootney Books</pub_name> </p> <p class="paragraph">   <city>New York</city> </p> <p class="paragraph">   <state>NY</state> </p> <p class="paragraph">   <country>USA</country> </p> <p class="paragraph">  </publishers> </p> <p class="paragraph">  <publishers> </p> <p class="paragraph">   <pub_id>9999</pub_id> </p> <p class="paragraph">   <pub_name>Lucerne Publishing</pub_name> </p> <p class="paragraph">   <countгу>France</country> </p> <p class="paragraph">  </publishers> </p> <p class="paragraph"> </NewDataSet> </p> <p> <blockquote>НА ЗАМЕТКУ </blockquote> </p> <p> <blockquote>После вызова метода ReadXML для загрузки данных в объект DataSet для свойства RowState всех новых строк задается значение Added. Этот подход отличается от принятого по умолчанию поведения, когда для загрузки данных в объект DataSet из базы данных используется объект DataAdapter и для свойства RowState всех новых строк задается значение Unchanged. Такой подход позволяет загружать данные из XML-источника и вставлять их в таблицу базы данных. Если вы не хотите этого делать, то можно с помощью метода AcceptChanges переустановить значение Unchanged для свойства RowState всех новых строк. Для изменения принятого по умолчанию поведения при загрузке данных в объект DataSet из базы данных можно указать значение False для свойства АсcеptChangesOnFill что приведет к автоматической установке значения Added для свойства RowState всех новых строк. </blockquote> </p> <p class="paragraph"> В данном примере демонстрируется простейший способ чтения XML-данных в объект DataSet, т.е. чтение из файла. Помимо этого способа, существует много других вариантов чтения XML-данных с помощью перегруженных версий метода ReadXML, например с помощью объектов Stream, TextReader или XmlReader. Соответствующие им перегруженные версии метода ReadXML содержат второй параметр со значением XmlReadMode. Этот параметр используется для указания способа интерпретации содержимого XML-источника и обработки схемы данных. В табл. 10.1 приведено краткое описание членов перечисления XmlReadMode. </p> <p class="paragraph"> Таблица 10.1. Перечисление XmlReadMode  </p> <div style="width:100%;text-align:center;"> <table> <tr> <td colspan="1" rowspan="1">Имя члена перечисления </td> <td colspan="1" rowspan="1">Описание </td> </tr> <tr> <td colspan="1" rowspan="1">ReadSchema </td> <td colspan="1" rowspan="1">Считывает любую встроенную схему и загружает ее вместе с данными в объект DataSet. Таблицы, определенные в схеме, вставляются в объект Data-Set, но если схема определяет таблицу, которая уже есть в этом наборе данных, то генерируется исключительная ситуация </td> </tr> <tr> <td colspan="1" rowspan="1">IgnoreSchema </td> <td colspan="1" rowspan="1">Игнорирует любую встроенную схему и загружает данные в объект DataSet с помощью существующего определения схемы. Любые данные, которые не соответствуют схеме объекта DataSet, игнорируются и не загружаются. Аналогично, если схема не определена, то данные не загружаются </td> </tr> <tr> <td colspan="1" rowspan="1">InferSchema </td> <td colspan="1" rowspan="1">Игнорирует любую встроенную схему и выводит схему на основе структуры данных, а затем загружает данные в объект DataSet. Дополнительные таблицы и поля, определенные в результате такого анализа структуры данных, добавляются в уже существующую схему в объекте DataSet. В случае конфликта определений генерируется исключительная ситуация </td> </tr> <tr> <td colspan="1" rowspan="1">Fragment </td> <td colspan="1" rowspan="1">Считывает все существующие XML-фрагменты и загружает данные в объект DataSet. Любые данные, которые не соответствуют схеме в объекте DataSet, игнорируются и не загружаются </td> </tr> <tr> <td colspan="1" rowspan="1">DiffGram </td> <td colspan="1" rowspan="1">Считывает данные в формате DiffGram и загружает данные в объект DataSet. Новые записи сливаются с уже существующими записями с такими же значениями уникального идентификатора, в противном случае в объекте DataSet создаются новые записи. В случае несоответствия схем генерируется исключительная ситуация. (Формат DiffGram более подробно описывается далее в главе. — Прим. ред. ) </td> </tr> <tr> <td colspan="1" rowspan="1">Auto </td> <td colspan="1" rowspan="1">Этот режим используется по умолчанию. При этом выполняется одна из следующих операций: если XML-данные имеют формат DiffGram, то выбирается член DiffGram перечисления XmlReadMode; если схема определена в объекте DataSet или встроена в XML-документ, то выбирается член ReadSchema перечисления XmlReadMode; в остальных случаях выбирается член InferSchema перечисления XmlReadMode   </td> </tr> </table> </div> <p class="paragraph"> Для чтения только схемы данных (и игнорирования данных) предусмотрена перегруженная версия метода ReadXmlSchema, которая может применяться для считывания схемы объектов DataTable объекта DataSet так, как показано ниже. MyDataSet.ReadXmlSchema("MySchemaFile.xml") </p> <p class="paragraph"> Те же четыре источника данных (файл, объекты Stream, TextReader и XmlReader) могут использоваться вместе с методом ReadXmlSchema. Объект DataSet имеет аналогичный набор методов для записи XML-данных. </p> </div> </div> <!-- end .note-content--> </div> <!-- end .note-inner--> </div> <!-- end .note--> <div class="note-bottom-left"> <div class="note-bottom-right"> <div class="note-bottom-center"></div> </div> </div> </article> <article class="note-block entry post"> <div class="note"> <div class="note-inner"> <div class="note-content"> <div class="post-content clearfix"> <p> </p> <p class="chap">Запись XML-данных</p> <p class="paragraph"> После загрузки в объект DataSet (независимо от способа и места загрузки) данные и/или схемы данных можно записать в XML-формате (с XML-схемой или без нее). Для демонстрации способов записи данных в XML-формате выполните перечисленные ниже действия. </p> <p class="paragraph"> 1. Создайте в форме новую кнопку сразу под кнопкой Read XML, перетаскивая ее из панели инструментов.  </p> <p class="paragraph"> 2. В окне свойств Properties укажите значение btnWriteXML для свойства (Name) и значение Write XML для свойства Text этой кнопки. </p> <p class="paragraph"> 3. Затем в определении класса формы frmXML введите код из листинга 10.3. </p> <p>Листинг 10.3. Код сохранения содержимого объекта DataSet в виде XML-файла </p> <p class="paragraph"> Private Sub btnWriteXML_Click(ByVal sender As System.Object, _ </p> <p class="paragraph">  ByVal e As System.EventArgs) Handles btnWriteXML.Click </p> <p class="paragraph">  Dim dsSales As New DataSet() </p> <p class="paragraph">  Dim en As New SqlConnection _ </p> <p class="paragraph">   ("data source=localhost;initial catalog=pubs;user id=sa") </p> <p class="paragraph">  Dim daAuthors As New SqlDataAdapter("select * from sales", en) </p> <p class="paragraph">  Dim daPublishers As New SqlDataAdapter("select * from stores", en) </p> <p class="paragraph">  ' Загрузка реляционных данных из базы данных. </p> <p class="paragraph">  daAuthors.Fill(dsSales, "Sales") </p> <p class="paragraph">  daPublishers.Fill(dsSales, "Stores") </p> <p class="paragraph">  ' Запись XML-данных в файл </p> <p class="paragraph">  dsSales.WriteXml("…\StoreSales.xml") </p> <p class="paragraph">  ' Запись схемы в XSD-файл. </p> <p class="paragraph">  dsSales.WriteXmlSchema("…\StoreSales.xsd") </p> <p class="paragraph"> End Sub </p> <p class="paragraph"> В этой подпрограмме создаются два объекта — адаптера данных (daAuthors и daPublishers), которые затем используются для вставки данных в объект dsPubs из двух таблиц базы данных pubs СУБД SQL Server. В листинге 10.4 приведено содержимое файла StoreSales.xml, который создается в результате выполнения этой подпрограммы. Обратите внимание на то, что данный XML-документ содержит записи о продажах, а затем записи о магазинах. Этот подход имеет смысл, так как между ними не задано никакого отношения. Если бы таблицы Sales и Stores были связаны, то эти записи можно было вложить друг в друга. Пример такого вложения приводится далее, в бизнес-ситуации 10.1. </p> <p>ЛИСТИНГ 10.4. Содержимое файла StoreSales.xml </p> <p class="paragraph"> <?xml version="1.0" standalone="yes"?> </p> <p class="paragraph"> <NewDataSet> </p> <p class="paragraph">  <Sales> </p> <p class="paragraph">   <stor_id>6380</stor_id> </p> <p class="paragraph">   <ord_num>6871</ord_num> </p> <p class="paragraph">   <ord_date>l994-09-14T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">   <qty>5</qty> </p> <p class="paragraph">   <payterms>Net 60</payterms> </p> <p class="paragraph">   <title_id>BU1032</title_id> </p> <p class="paragraph">  </Sales> </p> <p class="paragraph">  <Sales> </p> <p class="paragraph">   <stor_id>6380</stor_id> </p> <p class="paragraph">   <ord_num>722a</ord_num> </p> <p class="paragraph">   <ord_date>l994-09-13T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">   <qty>3</qty> </p> <p class="paragraph">   <payterms>Net 60</payterms> </p> <p class="paragraph">   <title_id>PS2091</title_id> </p> <p class="paragraph">  </Sales> </p> <p class="paragraph">  <Sales> </p> <p class="paragraph">   <stor_id>7066</stor_id> </p> <p class="paragraph">   <ord_num>A2976</ord_num> </p> <p class="paragraph">   <ord_date>1993-05-24T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">   <qty>50</qty> </p> <p class="paragraph">   <payterms>Net 30</payterms> </p> <p class="paragraph">   <title_id>PC8888</title_id> </p> <p class="paragraph">  </Sales> </p> <p class="paragraph">  <Sales> </p> <p class="paragraph">   <stor_id>7066</stor_id> </p> <p class="paragraph">   <ord_num>QA7442.3</ord_num> </p> <p class="paragraph">   <ord_date>1994-09-13T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">   <qty>75</qty> </p> <p class="paragraph">   <payterms>ON invoice</payterms> </p> <p class="paragraph">   <title_id>PS209K/title_id> </p> <p class="paragraph">  </Sales> </p> <p class="paragraph">  <Sales> </p> <p class="paragraph">   <stor_id>7067</stor_id> </p> <p class="paragraph">   <ord_num>D4482</ord_num> </p> <p class="paragraph">   <ord_date>1994-09-14T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">   <qty>10</qty> </p> <p class="paragraph">   <payterms>Net 60</payterms> </p> <p class="paragraph">   <title_id>PS2091</title_id> </p> <p class="paragraph">  </Sales> </p> <p class="paragraph">  <Sales> </p> <p class="paragraph">   <stor_id>7067</stor_id> </p> <p class="paragraph">   <ord_nurn>P2121</ord_num> </p> <p class="paragraph">   <ord_date>1992-06-15T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">   <qty>40</qty> </p> <p class="paragraph">   <payterms>Net 30</payterms> </p> <p class="paragraph">   <title_id>TC3218</title_id> </Sales> <Sales> </p> <p class="paragraph">   <stor_id>7067</stor_id> </p> <p class="paragraph">   <оrd_num>P2121</ord_num> </p> <p class="paragraph">   <ord_date>1992-06-15T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">   <qty>20</qty> </p> <p class="paragraph">   <payterms>Net 30</payterms> </p> <p class="paragraph">   <title_id>TC4203</title_id> </p> <p class="paragraph">  </Sales> </p> <p class="paragraph">  <Sales> </p> <p class="paragraph">   <stor_id>7067</stor_id> </p> <p class="paragraph">   <ord_num>P2121</ord_num> </p> <p class="paragraph">   <ord_date>1992-06-15T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">   <qty>20</qty> </p> <p class="paragraph">   <payterms>Net 30</payterms> </p> <p class="paragraph">   <title_id>TC7777</title_id> </p> <p class="paragraph">  </Sales> </p> <p class="paragraph">  <Sales> </p> <p class="paragraph">   <stor_id>7131</stor_id> </p> <p class="paragraph">   <ord_num>N914008</ord_num> </p> <p class="paragraph">   <ord_date>1994-09-14T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">   <qty>20</qty> </p> <p class="paragraph">   <payterms>Net 30</payterms> </p> <p class="paragraph">   <title_id>PS2091</title_id> </Sales> <Sales> </p> <p class="paragraph">   <stor_id>7131</stor_id> </p> <p class="paragraph">   <оrd_num>N914014</оrd_num> </p> <p class="paragraph">   <ord_date>1994-09-14T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">   <qty>25</qty> </p> <p class="paragraph">   <payterms>Net 30</payterms> </p> <p class="paragraph">   <title_id>MC3021</title_id> </p> <p class="paragraph">  </Sales> </p> <p class="paragraph">  <Sales> </p> <p class="paragraph">   <stor_id>7131</stor_id> </p> <p class="paragraph">   <ord_num>P3087a</ord_num> </p> <p class="paragraph">   <ord_date>1993-05-29T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">   <qty>20</qty> </p> <p class="paragraph">   <payterms>Net 60</payterms> </p> <p class="paragraph">   <title_id>PS1372</title_id> </p> <p class="paragraph">  </Sales> </p> <p class="paragraph">  <Sales> </p> <p class="paragraph">   <stor_id>7131</stor_id> </p> <p class="paragraph">   <ord_num>P3087a</ord_num> </p> <p class="paragraph">   <ord_date>1993-05-29T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">   <qty>25</qty> </p> <p class="paragraph">   <payterms>Net 60</payterms> </p> <p class="paragraph">   <title_id>PS2106</title_id> </Sales> <Sales> </p> <p class="paragraph">   <stor_id>7131</stor_id> </p> <p class="paragraph">   <ord_num>P3087a</ord_num> </p> <p class="paragraph">   <ord_date>1993-05-29T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">   <qty>15</qty> </p> <p class="paragraph">   <payterms>Net 60</payterms> </p> <p class="paragraph">   <title_id>PS3333</title_id> </p> <p class="paragraph">  </Sales> </p> <p class="paragraph">  <Sales> </p> <p class="paragraph">   <stor_id>7131</stor_id> </p> <p class="paragraph">   <ord_num>P3087a</ord_num> </p> <p class="paragraph">   <ord_date>1993-05-29T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">   <qty>25</qty> </p> <p class="paragraph">   <payterms>Net 60</payterms> </p> <p class="paragraph">   <title_id>PS7777</title_id> </p> <p class="paragraph">  </Sales> </p> <p class="paragraph">  <Sales> </p> <p class="paragraph">   <stor_id>7896</stor_id> </p> <p class="paragraph">   <ord_num>QQ2299</ord_num> </p> <p class="paragraph">   <ord_date>1993-10-28T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">   <qty>15</qty> </p> <p class="paragraph">   <payterms>Net 60</payterms> </p> <p class="paragraph">   <title_id>BU7832</title_id> </p> <p class="paragraph">  </Sales> </p> <p class="paragraph">  <Sales> </p> <p class="paragraph">   <stor_id>7896</stor_id> </p> <p class="paragraph">   <ord_num>TQ456</ord_num> </p> <p class="paragraph">   <ord_date>1993-12-12T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">   <qty>10</qty> </p> <p class="paragraph">   <payterms>Net 60</payterms> </p> <p class="paragraph">   <title_id>MC2222</title_id> </p> <p class="paragraph">  </Sales> </p> <p class="paragraph">  <Sales> </p> <p class="paragraph">   <stor_id>7896</stor_id> </p> <p class="paragraph">   <ord_num>X999</ord_num> </p> <p class="paragraph">   <ord_date>1993-02-21T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">   <qty>35</qty> </p> <p class="paragraph">   <payterms>ON invoice</payterms> </p> <p class="paragraph">   <title_id>BU2075</title_id> </p> <p class="paragraph">  </Sales> </p> <p class="paragraph">  <Sales> </p> <p class="paragraph">   <stor_id>8042</stor_id> </p> <p class="paragraph">   <ord_num>423LL922</ord_num> </p> <p class="paragraph">   <ord_date>1994-09-14T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">   <qty>15</qty> </p> <p class="paragraph">   <payterms>ON invoice</payterms> </p> <p class="paragraph">   <title_id>MC3021</title_id> </Sales> <Sales> </p> <p class="paragraph">   <stor_id>8042</stor_id> </p> <p class="paragraph">   <ord_num>423LL930</ord_num> </p> <p class="paragraph">   <ord_date>1994-09-14T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">   <qty>10</qty> </p> <p class="paragraph">   <payterms>ON invoice</payterms> </p> <p class="paragraph">   <title_id>BU1032</title_id> </p> <p class="paragraph">  </Sales> </p> <p class="paragraph">  <Sales> </p> <p class="paragraph">   <stor_id>8042</stor_id> </p> <p class="paragraph">   <ord_num>P723</ord_num> </p> <p class="paragraph">   <ord_date>1993-03-11T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">   <qty>25</qty> </p> <p class="paragraph">   <payterms>Net 30</payterms> </p> <p class="paragraph">   <title_id>BU1111</title_id> </p> <p class="paragraph">  </Sales> </p> <p class="paragraph">  <Sales> </p> <p class="paragraph">   <stor_id>8042</stor_id> </p> <p class="paragraph">   <ord_num>QA879.1</ord_num> </p> <p class="paragraph">   <ord_date>1993-05-22T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">   <qty>30</qty> </p> <p class="paragraph">   <payterms>Net 30</payterms> </p> <p class="paragraph">   <title_id>PC1035</title_id> </p> <p class="paragraph">  </Sales> </p> <p class="paragraph">  <Stores> </p> <p class="paragraph">   <stor_id>6380</stor_id> </p> <p class="paragraph">   <stor_name>Eric the Read Books</stor_name> </p> <p class="paragraph">   <stor_address>788 Catamaugus Ave.</stor_address> </p> <p class="paragraph">   <city>Seattle</city> </p> <p class="paragraph">   <state>WA</state> </p> <p class="paragraph">   <zip>98056</zip> </p> <p class="paragraph">  </Stores> </p> <p class="paragraph">  <Stores> </p> <p class="paragraph">   <stor_id>7066</stor_id> </p> <p class="paragraph">   <stor_name>Barnum's</stor_name> </p> <p class="paragraph">   <stor_address>567 Pasadena Ave.</stor_address> </p> <p class="paragraph">   <state>CA</state> </p> <p class="paragraph">   <zip>92789</zip> </p> <p class="paragraph">  </Stores> </p> <p class="paragraph">  <Stores> </p> <p class="paragraph">   <stor_id>7067</stor_id> </p> <p class="paragraph">   <stor_name>News & Brews</stor_name> </p> <p class="paragraph">   <stor_address>577 First St.</stor_address> </p> <p class="paragraph">   <city>Los Gatos</city> </p> <p class="paragraph">   <state>CA</state> </p> <p class="paragraph">   <zip>96745</zip> </p> <p class="paragraph">  </Stores> </p> <p class="paragraph">  <Stores> </p> <p class="paragraph">   <stor_id>7131</stor_id> </p> <p class="paragraph">   <stor_name>Doc-U-Mat: Quality Laundry and Books</stor_name> </p> <p class="paragraph">   <stor_address>24-A Avogadro Way</stor_address> </p> <p class="paragraph">   <city>Remulade</city> </p> <p class="paragraph">   <state>WA</state> </p> <p class="paragraph">   <zip>98014</zip> </p> <p class="paragraph">  </Stores> </p> <p class="paragraph">  <Stores> </p> <p class="paragraph">   <stor_id>7896</stor_id> </p> <p class="paragraph">   <stor_name>Fricative Bookshop</stor_name> </p> <p class="paragraph">   <stor_address>89 Madison St.</stor_address> </p> <p class="paragraph">   <city>Fremont</city> </p> <p class="paragraph">   <state>CA</state> </p> <p class="paragraph">   <zip>90019</zip> </p> <p class="paragraph">  </Stores> </p> <p class="paragraph">  <Stores> </p> <p class="paragraph">   <stor_id>8042</stor_id> </p> <p class="paragraph">   <stor_name>Bookbeat</stor_name> </p> <p class="paragraph">   <stor_address>679 Carson St.</stor_address> </p> <p class="paragraph">   <city>Portland</city> </p> <p class="paragraph">   <state>OR</state> </p> <p class="paragraph">   <zip>89076</zip> </p> <p class="paragraph">  </Stores> </p> <p class="paragraph"> </NewDataSet> </p> <p class="paragraph"> В приведенном примере демонстрируется простейший способ записи данных из объекта DataSet в XML-файл. Помимо этого способа существуют другие варианты записи данных и схемы с помощью перегруженных версий метода WriteXML. Соответствующие им перегруженные версии метода ReadXML содержат второй параметр со значением XmlWriteMode. В табл. 10.2 приведено краткое описание членов перечисления XmlWriteMode. </p> <p class="paragraph"> Таблица 10.2. Перечисление XmlWriteMode  </p> <div style="width:100%;text-align:center;"> <table> <tr> <td colspan="1" rowspan="1">Имя члена перечисления </td> <td colspan="1" rowspan="1">Описание </td> </tr> <tr> <td colspan="1" rowspan="1">DiffGram </td> <td colspan="1" rowspan="1">Записывает данные из объекта DataSet в виде объекта DiffGram с текущими исходными значениями всех записей </td> </tr> <tr> <td colspan="1" rowspan="1">WriteSchema </td> <td colspan="1" rowspan="1">Записывает данные из объекта DataSet в XML-формате вместе с их схемой. Если объект DataSet содержит только схему, то записывается только схема. Если в объекте DataSet не определена схема, то ничего не записывается </td> </tr> <tr> <td colspan="1" rowspan="1">IgnoreSchema </td> <td colspan="1" rowspan="1">Этот режим используется по умолчанию для записи содержимого объекта DataSet в XML-формате без схемы   </td> </tr> </table> </div> <p> <blockquote>НА ЗАМЕТКУ </blockquote> </p> <p> <blockquote>Объект DataSet имеет методGetXml, который возвращает XML-строку с данными из объекта DataSet. Точно такой же результат можно получить, используя метод со вторым параметром XmlWriteMode, который имеет значение IgnoreSchema. Извлечение данных в виде одной строки иногда позволяет более гибко программировать доступ к данным, но требует больших усилий, особенно если вам нужно всего лишь записать данные в файл.  </blockquote> </p> <p class="paragraph"> Для записи схемы данных из объекта DataSet в отдельном XSD-файле (вместо встраивания ее в данные) предусмотрен метод WriteXmlSchema, который используется так, как показано ниже. </p> <p class="paragraph"> dsSales.WriteXmlSchema </p> <p class="paragraph"> В листинге 10.5 приведено содержимое файла StoreSales.xsd, полученного в результате выполнения этого метода. </p> <p>Листинг 10.5. Содержимое файла StoreSales.xsd, который является схемой из объекта dsSales </p> <p class="paragraph"> <?xml version="1.0" standalone="yes"?> </p> <p class="paragraph"> <xs:schema id="NewDataSet" xmlns="" xmlns:xs="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata"> </p> <p class="paragraph">  <xs:element name="NewDataSet" msdata:lsDataSet="true"> </p> <p class="paragraph">   <xs:complexType> </p> <p class="paragraph">    <xs:choice maxOccurs="unbounded"> </p> <p class="paragraph">     <xs:element name="Sales"> </p> <p class="paragraph">      <xs:complexType> </p> <p class="paragraph">       <xs:sequence> </p> <p class="paragraph">        <xs:element name="stor_id" type="xs:string" minOccurs="0" /> </p> <p class="paragraph">        <xs:element name="ord_num" type="xs:string" minOccurs="0" /> </p> <p class="paragraph">        <xs:element name="ord_date" type="xs:dateTime" minOccurs="0" /> </p> <p class="paragraph">        <xs:element name="qty" type="xs:short" minOccurs="0" /> </p> <p class="paragraph">        <xs:element name="payterms" type="xs:string" minOccurs="0" /> </p> <p class="paragraph">        <xs:element name="title_id" type="xs:string" minOccurs="0" /> </p> <p class="paragraph">       </xs:sequence> </p> <p class="paragraph">      </xs:complexType> </p> <p class="paragraph">     </xs:element> </p> <p class="paragraph">     <xs:element name="Stores"> </p> <p class="paragraph">      <xs:complexType> </p> <p class="paragraph">       <xs:sequence> </p> <p class="paragraph">        <xs:element name="stor_id" type="xs:string" minOccurs="0" /> </p> <p class="paragraph">        <xs:element name="stor_name" type="xs:string" minOccurs="0" /> </p> <p class="paragraph">        <xs:element name="stor_address" type="xs:string" minOccurs="0" /> </p> <p class="paragraph">        <xs:element name="city" type="xs:string" minOccurs="0" /> </p> <p class="paragraph">        <xs:element name="state" type="xs:string" minOccurs="0" /> </p> <p class="paragraph">        <xs:element name="zip" type="xs:string" minOccurs="0" /> </p> <p class="paragraph">       </xs:sequence> </p> <p class="paragraph">      </xs:complexType> </p> <p class="paragraph">     </xs:element> </p> <p class="paragraph">    </xs:choice> </p> <p class="paragraph">   </xs:complexType> </p> <p class="paragraph">  </xs:element> </p> <p class="paragraph"> </xs:schema> </p> </div> </div> <!-- end .note-content--> </div> <!-- end .note-inner--> </div> <!-- end .note--> <div class="note-bottom-left"> <div class="note-bottom-right"> <div class="note-bottom-center"></div> </div> </div> </article> <article class="note-block entry post"> <div class="note"> <div class="note-inner"> <div class="note-content"> <div class="post-content clearfix"> <p> </p> <p class="chap">Формат DiffCram</p> <p class="paragraph"> Рассмотрим теперь формат DiffGram, который используется членами перечислений XmlReadMode и XmlWriteMode. Это XML-формат, содержащий не только текущие значения элементов-данных, но и их исходные значения, которые были изменены или удалены (вслед за последним вызовом метода AcceptChanges). Итак, DiffGram представляет собой формат сериализации, который используется для передачи данных другому процессу или компьютеру. Поскольку эти данные фактически имеют XML-формат, они могут легко передаваться другим платформам, например UNIX или Linux. </p> <p class="paragraph"> Каждый файл формата DiffGram имеет три раздела. Первый раздел содержит текущие значения всех записей объекта DataSet, независимо от того, изменялись они или нет. Любой измененный элемент (запись) обозначается как diffgr:hasChanges="modified", а любой добавленный элемент (запись) — как diffgr:hasChanges="inserted". Второй раздел содержит исходные значения всех измененных и удаленных записей. Его элементы связаны с соответствующими элементами первого раздела, которые обозначаются как diffgr:id="xxx", где ххх — идентификатор записи. Третий раздел содержит информацию об ошибках работы с записями. Его элементы связаны аналогичным образом с соответствующими элементами первого раздела, которые обозначаются как diffgr:id="xxx". </p> <p class="paragraph"> Для генерации XML-файла в формате DiffGram нужно внести приведенные ниже изменения (они обозначены полужирным начертанием) в подпрограмму btnWriteXML_Click.H3 листинга 10.3. </p> <p class="paragraph"> Private Sub btnWriteXML_Click(ByVal sender As System.Object, _ </p> <p class="paragraph">  ByVal e As System.EventArgs) Handles btnWriteXML.Click </p> <p class="paragraph">  Dim dsSales As New DataSet() </p> <p class="paragraph">  Dim en As New SqlConnection _ </p> <p class="paragraph">   ("data source=localhost;initial catalog=pubs;user id=sa") </p> <p class="paragraph">  Dim daAuthors As New SqlDataAdapter("select * from sales ", en) </p> <p class="paragraph">  Dim daPublishers As New SqlDataAdapter("select * from stores ", en) </p> <p class="paragraph">  ' Загрузка реляционных данных из базы данных. </p> <p class="paragraph">  daAuthors.Fill(dsSales, "Sales") </p> <p class="paragraph">  daPublishers.Fill(dsSales, "Stores") </p> <p class="paragraph">  ' Запись XML-данных в файл. </p> <p class="paragraph">  dsSales.WriteXml("..\StoreSales.xml") </p> <p class="paragraph">  ' Запись схемы в XSD-файл. </p> <p class="paragraph">  dsSales.WriteXmlSchema("..\StoreSales.xsd") </p> <p class="paragraph">  ' Пример изменения, удаления и вставки новой записи. </p> <p class="paragraph">  dsSales.Tables("Stores").Rows(0)("stor_id") = 999 ' Изменение </p> <p class="paragraph">  dsSales.Tables("Stores").Rows(1).Delete() ' Удаление </p> <p class="paragraph">  Dim rr As DataRow = dsSales.Tables("Stores").NewRow() </p> <p class="paragraph">  rr("stor_name") = "New Store" </p> <p class="paragraph">  dsSales.Tables("Stores").Rows.Add(rr) ' Вставка </p> <p class="paragraph">  ' Сохранение только измененных записей в формате DiffGram. </p> <p class="paragraph">  Dim ChangedDataSet = dsSales.GetChanges() </p> <p class="paragraph">  ChangedDataSet.WriteXml("…\Changes.xml", XmlWriteMode.DiffGram) </p> <p class="paragraph">  ' Сохранение всех записей в формате DiffGram. </p> <p class="paragraph">  dsSales.WriteXml("…\DiffGram.xml", XmlWriteMode.DiffGram) </p> <p class="paragraph"> End Sub </p> <p class="paragraph"> В листинге 10.6 приведено содержимое файла DiffGram.xml, полученного в результате щелчка на кнопке Write XML формы проекта ADO-XML. Внесенные в таблицу Stores изменения выделены полужирным начертанием. Удаленная запись отсутствует в разделе текущих данных, но присутствует в разделе исходного состояния вместе с исходным значением измененной записи. Кроме того, раздел с текущими данными содержит новую запись с отметкой "inserted" (вставлена). </p> <p>Листинг 10.6. XML-файл DiffGram.xml в формате DiffGram с одной вставленной записью, одной удаленной записью и одной измененной записью </p> <p class="paragraph"> <?xml version="1.0" standalone="yes"?> </p> <p class="paragraph"> <diffgr:diffgram xmlns:msdata="urn:schemes-microsoft-com:xml-msdata" xmlns:diffgr="urn:schemas-microsoft-com:xml-diffgram-v1"> </p> <p class="paragraph">  <NewDataSet> </p> <p class="paragraph">   <Sales diffgr:id="Sales1" msdata:rowOrder="0"> </p> <p class="paragraph">    <stor_id>6380</stor_id> </p> <p class="paragraph">    <ord_num>6871</ord_num> </p> <p class="paragraph">    <ord_date>1994-09-14T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">    <qty>5</qty> </p> <p class="paragraph">    <payterms>Net 60</payterms> </p> <p class="paragraph">    <title_id>BU1032</title_id> </p> <p class="paragraph">   </Sales> </p> <p class="paragraph">   <Sales diffgr:id="Sales2" msdata:rowOrder="1"> </p> <p class="paragraph">    <stor_id>6380</stor_id> </p> <p class="paragraph">    <ord_num>722a</ord_num> </p> <p class="paragraph">    <ord_date>1994-09-13T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">    <qty>3</qty> </p> <p class="paragraph">    <payterms>Net 60</payterms> </p> <p class="paragraph">    <title_id>PS2091</title_id> </p> <p class="paragraph">   </Sales> </p> <p class="paragraph">   <Sales diffgr:id="Sales3" msdata:rowOrder="2"> </p> <p class="paragraph">    <stor_id>7066</stor_id> </p> <p class="paragraph">    <ord_num>A2976</ord_num> </p> <p class="paragraph">    <ord_date>1993-05-24T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">    <qty>50</qty> </p> <p class="paragraph">    <payterms>Net 30</payterms> </p> <p class="paragraph">    <title_id>PC8888</title_id> </p> <p class="paragraph">   </Sales> </p> <p class="paragraph">   <Sales diffgr:id="Sales4" msdata:rowOrder="3"> </p> <p class="paragraph">    <stor_id>7066</stor_id> </p> <p class="paragraph">    <ord_num>QA7442.3</ord_num> </p> <p class="paragraph">    <ord_date>1994-09-13T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">    <qty>75</qty> </p> <p class="paragraph">    <payterms>ON invoice</payterms> </p> <p class="paragraph">    <title_id>PS2091</title_id> </p> <p class="paragraph">   </Sales> </p> <p class="paragraph">   <Sales diffgr:id="Sales5" msdata:rowOrder="4"> </p> <p class="paragraph">    <stor_id>7067</stor_id> </p> <p class="paragraph">    <ord_num>D4482</ord_num> </p> <p class="paragraph">    <ord_date>1994-09-14T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">    <qty>10</qty> </p> <p class="paragraph">    <payterms>Net 60</payterms> </p> <p class="paragraph">    <title_id>PS2091</title_id> </p> <p class="paragraph">   </Sales> </p> <p class="paragraph">   <Sales diffgr:id="Sales6" msdata:rowOrder="5"> </p> <p class="paragraph">    <stor_id>7067</stor_id> </p> <p class="paragraph">    <ord_num>P2121</ord_num> </p> <p class="paragraph">    <ord_date>1992-06-15T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">    <qty>40</qty> </p> <p class="paragraph">    <payterms>Net 30</payterms> </p> <p class="paragraph">    <title_id>TC3218</title_id> </p> <p class="paragraph">   </Sales> </p> <p class="paragraph">   <Sales diffgr:id="Sales7" msdata:rowOrder="6"> </p> <p class="paragraph">    <stor_id>7067</stor_id> </p> <p class="paragraph">    <ord_num>P2121</ord_num> </p> <p class="paragraph">    <ord_date>1992-06-15T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">    <qty>20</qty> </p> <p class="paragraph">    <payterms>Net 30</payterms> </p> <p class="paragraph">    <title_id>TC4203</title_id> </p> <p class="paragraph">   </Sales> </p> <p class="paragraph">   <Sales diffgr:id="Sales8" msdata:rowOrder="7"> </p> <p class="paragraph">    <stor_id>7067</stor_id> </p> <p class="paragraph">    <ord_num>P2121</ord_num> </p> <p class="paragraph">    <ord_date>1992-06-15T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">    <qty>20</qty> </p> <p class="paragraph">    <payterms>Net 30</payterms> </p> <p class="paragraph">    <title_id>TC7777</title_id> </p> <p class="paragraph">   </Sales> </p> <p class="paragraph">   <Sales diffgr:id="Sales9" msdata:rowOrder="8"> </p> <p class="paragraph">    <stor_id>713K/stor_id> </p> <p class="paragraph">    <ord_num>N914008</ord_num> </p> <p class="paragraph">    <ord_date>1994-09-14T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">    <qty>20</qty> </p> <p class="paragraph">    <payterms>Net 30</payterms> </p> <p class="paragraph">    <title_id>PS2091</title_id> </p> <p class="paragraph">   </Sales> </p> <p class="paragraph">   <Sales diffgr:id="Sales10" msdata:rowOrder="9"> </p> <p class="paragraph">    <stor_id>7131</stor_id> </p> <p class="paragraph">    <ord_num>N914014</ord_num> </p> <p class="paragraph">    <ord_date>1994-09-14T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">    <qty>25</qty> </p> <p class="paragraph">    <payterms>Net 30</payterms> </p> <p class="paragraph">    <title_id>MC3021</title_id> </p> <p class="paragraph">   </Sales> </p> <p class="paragraph">   <Sales diffgr:id="Sales11" msdata:rowOrder="10"> </p> <p class="paragraph">    <stor_id>7131</stor_id> </p> <p class="paragraph">    <ord_num>P3087a</ord_num> </p> <p class="paragraph">    <ord_date>1993-05-29T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">    <qty>20</qty> </p> <p class="paragraph">    <payterms>Net 60</payterms> </p> <p class="paragraph">    <title_id>PS1372</title_id> </p> <p class="paragraph">   </Sales> </p> <p class="paragraph">   <Sales diffgr:id="Sales12" msdata:rowOrder="11"> </p> <p class="paragraph">    <stor_id>7131</stor_id> </p> <p class="paragraph">    <ord_num>P3087a</ord_num> </p> <p class="paragraph">    <ord_date>1993-05-29T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">    <qty>25</qty> </p> <p class="paragraph">    <payterms>Net 60</payterms> </p> <p class="paragraph">    <title_id>PS2106</title_id> </p> <p class="paragraph">   </Sales> </p> <p class="paragraph">   <Sales diffgr:id="Sales13" msdata:rowOrder="12"> </p> <p class="paragraph">    <stor_id>7131</stor_id> </p> <p class="paragraph">    <ord_num>P3087a</ord_num> </p> <p class="paragraph">    <ord_date>1993-05-29T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">    <qty>15</qty> </p> <p class="paragraph">    <payterms>Net 60</payterms> </p> <p class="paragraph">    <title_id>PS3333</title_id> </p> <p class="paragraph">   </Sales> </p> <p class="paragraph">   <Sales diffgr:id="Sales14" msdata:rowOrder="13"> </p> <p class="paragraph">    <stor_id>7131</stor_id> </p> <p class="paragraph">    <ord_num>P3087a</ord_num> </p> <p class="paragraph">    <ord_date>1993-05-29T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">    <qty>25</qty> </p> <p class="paragraph">    <payterms>Net 60</payterms> </p> <p class="paragraph">    <title_id>PS7777</title_id> </p> <p class="paragraph">   </Sales> </p> <p class="paragraph">   <Sales diffgr:id="Sales15" msdata:rowOrder="14"> </p> <p class="paragraph">    <stor_id>7896</stor_id> </p> <p class="paragraph">    <ord_num>QQ2299</ord_num> </p> <p class="paragraph">    <ord_date>1993-10-28T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">    <qty>15</qty> </p> <p class="paragraph">    <payterms>Net 60</payterms> </p> <p class="paragraph">    <title_id>BU7832</title_id> </p> <p class="paragraph">   </Sales> </p> <p class="paragraph">   <Sales diffgr:id="Sales16" msdata:rowOrder="15"> </p> <p class="paragraph">    <stor_id>7896</stor_id> </p> <p class="paragraph">    <ord_num>TQ456</ord_num> </p> <p class="paragraph">    <ord_date>1993-12-12T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">    <qty>10</qty> </p> <p class="paragraph">    <payterms>Net 60</payterms> </p> <p class="paragraph">    <title_id>MC2222</title_id> </p> <p class="paragraph">   </Sales> </p> <p class="paragraph">   <Sales diffgr:id="Sales17" msdata:rowOrder="16"> </p> <p class="paragraph">    <stor_id>7896</stor_id> </p> <p class="paragraph">    <ord_num>X999</ord_num> </p> <p class="paragraph">    <ord_date>1993-02-21T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">    <qty>35</qty> </p> <p class="paragraph">    <payterms>ON invoice</payterms> </p> <p class="paragraph">    <title_id>BU2075</title_id> </p> <p class="paragraph">   </Sales> </p> <p class="paragraph">   <Sales diffgr:id="Sales18" msdata:rowOrder="17"> </p> <p class="paragraph">    <stor_id>8042</stor_id> </p> <p class="paragraph">    <ord_num>423LL922</ord_num> </p> <p class="paragraph">    <ord_date>1994-09-14T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">    <qty>15</qty> </p> <p class="paragraph">    <payterms>ON invoice</payterms> </p> <p class="paragraph">    <title_id>MC3021</title_id> </p> <p class="paragraph">   </Sales> </p> <p class="paragraph">   <Sales diffgr:id="Sales19" msdata:rowOrder="18"> </p> <p class="paragraph">    <stor_id>8042</stor_id> </p> <p class="paragraph">    <оrd_num>423LL930</ord_num> </p> <p class="paragraph">    <ord_date>1994-09-14T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">    <qty>10</qty> </p> <p class="paragraph">    <payterms>ON invoice</payterms> </p> <p class="paragraph">    <title_id>BU1032</title_id> </p> <p class="paragraph">   </Sales> </p> <p class="paragraph">   <Sales diffgr:id="Sales20" msdata:rowOrder="19"> </p> <p class="paragraph">    <stor_id>8042</stor_id> </p> <p class="paragraph">    <ord_num>P723</ord_num> </p> <p class="paragraph">    <ord_date>1993-03-11T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">    <qty>25</qty> </p> <p class="paragraph">    <payterms>Net 30</payterms> </p> <p class="paragraph">    <title_id>BU1111</title_id> </p> <p class="paragraph">   </Sales> </p> <p class="paragraph">   <Sales diffgr:id="Sales21" msdata:rowOrder="20"> </p> <p class="paragraph">    <stor_id>8042</stor_id> </p> <p class="paragraph">    <ord_num>QA879.1</ord_num> </p> <p class="paragraph">    <ord_date>1993-05-22T00:00:00.0000000+02:00</ord_date> </p> <p class="paragraph">    <qty>30</qty> </p> <p class="paragraph">    <payterms>Net 30</payterms> </p> <p class="paragraph">    <title_id>PC1035</title_id> </p> <p class="paragraph">   </Sales> </p> <p class="paragraph">   <Stores diffgr:id="Stores1" msdata:rowOrder="0" diffgr:hasChanges="modified"> </p> <p class="paragraph">    <stor_id>999</stor_id> </p> <p class="paragraph">    <stor_name>Eric the Read Books</stor_name> </p> <p class="paragraph">    <stor_address>788 Catamaugus Ave.</stor_address> </p> <p class="paragraph">    <city>Seattle</city> </p> <p class="paragraph">    <state>WA</state> </p> <p class="paragraph">    <zip>98056</zip> </p> <p class="paragraph">   </Stores> </p> <p class="paragraph">   <Stores diffgr:id="Stores3" msdata:rowOrder="2"> </p> <p class="paragraph">    <stor_id>7067</stor_id> </p> <p class="paragraph">    <stor_name>News & Brews</stor_name> </p> <p class="paragraph">    <stor_address>577 First St.</stor_address> </p> <p class="paragraph">    <city>Los Gatos</city> </p> <p class="paragraph">    <state>CA</state> </p> <p class="paragraph">    <zip>96745</zip> </p> <p class="paragraph">   </Stores> </p> <p class="paragraph">   <Stores diffgr:id="Stores4" msdata:rowOrder="3"> </p> <p class="paragraph">    <stor_id>7131</stor_id> </p> <p class="paragraph">    <stor_name>Doc-U-Mat: Quality Laundry and Books</stor_name> </p> <p class="paragraph">    <stor_address>24-A Avogadro Way</stor_address> </p> <p class="paragraph">    <city>Remulade</city> </p> <p class="paragraph">    <state>WA</state> </p> <p class="paragraph">    <zip>98014</zip> </p> <p class="paragraph">   </Stores> </p> <p class="paragraph">   <Stores diffgr:id="Stores5" msdata:rowOrder="4"> </p> <p class="paragraph">    <stor_id>7896</stor_id> </p> <p class="paragraph">    <stor_name>Fricative Bookshop</stor_name> </p> <p class="paragraph">    <stor_address>89 Madison St.</stor_address> </p> <p class="paragraph">    <city>Fremont</city> </p> <p class="paragraph">    <state>CA</state> </p> <p class="paragraph">    <zip>90019</zip> </p> <p class="paragraph">   </Stores> </p> <p class="paragraph">   <Stores diffgr:id="Stores6" msdata:rowOrder="5"> </p> <p class="paragraph">    <stor_id>8042</stor_id> </p> <p class="paragraph">    <stor_name>Bookbeat</stor_name> </p> <p class="paragraph">    <stor_address>679 Carson St.</stor_address> </p> <p class="paragraph">    <city>Portland</city> </p> <p class="paragraph">    <state>OR</state> </p> <p class="paragraph">    <zip>89076</zip> </p> <p class="paragraph">   </Stores> </p> <p class="paragraph">   <Stores diffgr:id="Stores7" msdata:rowOrder="6" diffgr:hasChanges="inserted"> </p> <p class="paragraph">    <stor_name>New Store</stor_name> </p> <p class="paragraph">   </Stores> </p> <p class="paragraph">  </NewDataSet> </p> <p class="paragraph">  <diffgr:before> </p> <p class="paragraph">   <Stores diffgr:id="Stores1" msdata:rowOrder="0"> </p> <p class="paragraph">    <stor_id>6380</stor_id> </p> <p class="paragraph">    <stor_name>Eric the Read Books</stor_name> </p> <p class="paragraph">    <stor_address>788 Catamaugus Ave.</stor_address> </p> <p class="paragraph">    <city>Seattle</city> </p> <p class="paragraph">    <state>WA</state> </p> <p class="paragraph">    <zip>98056</zip> </p> <p class="paragraph">   </Stores> </p> <p class="paragraph">   <Stores diffgr:id="Stores2" msdata:rowOrder="1"> </p> <p class="paragraph">    <stor_id>7066</stor_id> </p> <p class="paragraph">    <stor_name>Barnum's</stor_name> </p> <p class="paragraph">    <stor_address>567 Pasadena Ave.</stor_address> </p> <p class="paragraph">    <city>Tustin</city> </p> <p class="paragraph">    <state>CA</state> </p> <p class="paragraph">    <zip>92789</zip> </p> <p class="paragraph">   </Stores> </p> <p class="paragraph">  </diffgr:before> </p> <p class="paragraph"> </diffgr:diffgram> </p> <p> <blockquote>НА ЗАМЕТКУ </blockquote> </p> <p> <blockquote>Для сохранения только измененных записей в формате DiffGram следует использовать метод GetChanges: </blockquote> </p> <p> <blockquote>Dim ChangedDataSet = dsSales.GetChanges() </blockquote> </p> <p> <blockquote>ChangedDataSet.WriteXml("..\Changes.xml", XmlWriteMode.DiffGram) </blockquote> </p> <p class="paragraph"> В листинге 10.7 приведено содержимое файла DiffGram.xml, полученного в pезультате выполнения этого метода.  </p> <p>Листинг 10.7. XML-файл changes.xml в формате DiffGram только с измененными записями </p> <p class="paragraph"> <?xml version="1.0" standalone="yes"?> </p> <p class="paragraph"> <diffgr:diffgram xmlns:msdata="urn:schemas-microsoft-com:xml-msdata" xmlns:diffgr="urn:schemas-microsoft-com:xml-diffgram-v1"> </p> <p class="paragraph">  <NewDataSet> </p> <p class="paragraph">   <Stores diffgr:id="Stores1" msdata:rowOrder="0" diffgr:hasChanges="modified"> </p> <p class="paragraph">    <stor_id>999</stor_fd> </p> <p class="paragraph">    <stor_name>Eric the Read Books</stor_name> </p> <p class="paragraph">    <stor_address>788 Catamaugus Ave.</stor_address> </p> <p class="paragraph">    <city>Seattle</city> </p> <p class="paragraph">    <state>WA</state> </p> <p class="paragraph">    <zip>98056</zip> </p> <p class="paragraph">   </Stores> </p> <p class="paragraph">   <Stores diffgr:id="Stores3" msdata:rowOrder="2" diffgr:hasChanges="inserted"> </p> <p class="paragraph">    <stor_name>New Store</stor_name> </p> <p class="paragraph">   </Stores> </p> <p class="paragraph">  </NewDataSet> </p> <p class="paragraph">  <diffgr:before> </p> <p class="paragraph">   <Stores diffgr:id="Stores1" msdata:rowOrder="0"> </p> <p class="paragraph">    <stor_id>6380</stor_id> </p> <p class="paragraph">    <stor_name>Eric the Read Books</stor_name> </p> <p class="paragraph">    <stor_address>788 Catamaugus Ave.</stor_address> </p> <p class="paragraph">    <city>Seattle</city> </p> <p class="paragraph">    <state>WA</state> </p> <p class="paragraph">    <zip>98056</zip> </p> <p class="paragraph">   </Stores> </p> <p class="paragraph">   <Stores diffgr:id="Stores2" msdata:rowOrder="1"> </p> <p class="paragraph">    <stor_id>7066</stor_id> </p> <p class="paragraph">    <stor_name>Barnum's</stor__name> </p> <p class="paragraph">    <stor_address>567 Pasadena Ave.</stor_address> </p> <p class="paragraph">    <city>Tustin</city> </p> <p class="paragraph">    <state>CA</state> </p> <p class="paragraph">    <zip>92789</zip> </p> <p class="paragraph">   </Stores> </p> <p class="paragraph">  </diffgr:before> </p> <p class="paragraph"> </diffgr:diffgram> </p> </div> </div> <!-- end .note-content--> </div> <!-- end .note-inner--> </div> <!-- end .note--> <div class="note-bottom-left"> <div class="note-bottom-right"> <div class="note-bottom-center"></div> </div> </div> </article> <article class="note-block entry post"> <div class="note"> <div class="note-inner"> <div class="note-content"> <div class="post-content clearfix"> <p> </p> <p class="chap">Бизнес-ситуация 10.1: подготовка XML-файлов для бизнес-партнеров</p> <p class="paragraph"> Компания Jones Novelty обменивается информацией с помощью электронных средств передачи данных со многими своими поставщиками и партнерами. Развитие этой тенденции, вероятно, приведет к тому, что компании придется спустя какое-то время применить качественно новое решение, например систему Microsoft BizTalk Server. В настоящее время Брэд Джонс стремится удовлетворить текущие потребности и сохранить конкурентоспособность, применяя XML для передачи транзакций. Для этого будут использованы уже описанные возможности XML и ряд других, которые описываются далее. Следует отметить, что многие требования можно удовлетворить даже без использования "мощных и тяжеловесных" платформ, инструментов и технологий, например XSLT. </p> <p class="paragraph"> Сначала следует организовать отправку XML-файла с перечнем товаров на складах. Для этого должны быть посланы сведения из всех полей таблицы tblInventory, за исключением поля WholesalePrice. Хотя это можно организовать с помощью простого запроса, который включает все поля, кроме WholesalePrice, в данном примере используется способ на основе XML-свойств. Для создаваемого XML-файл существует еще одно требование: в него необходимо включить XSD-схему с описанием всех полей как элементов, за исключением поля ID, которое передается с помощью атрибута. </p> <p class="paragraph"> Для создания этого приложения выполните перечисленные ниже действия. </p> <p class="paragraph"> 1. Запустите интегрированную среду разработки Visual Studio .NET и создайте новый проект Visual Basic Windows Application. Для этого в диалоговом окне New Project (Новый проект) выберите тип проекта Visual Basic Project в области Project Types (Типы проектов), а затем шаблон Windows Application (Приложение Windows) в области Templates (Шаблоны). </p> <p class="paragraph"> 2. Назовите проект BusinessCaseIO. </p> <p class="paragraph"> 3. Укажите путь к файлам проекта. </p> <p class="paragraph"> 4. Увеличьте размер формы Form1. </p> <p class="paragraph"> 5. В окне свойств Properties укажите значение frmPrepareXML для свойства (Name) и значение Prepare XML для свойства Text формы Form1. </p> <p class="paragraph"> 6. В верхнем левом углу формы создайте кнопку, перетаскивая ее из панели элементов управления. </p> <p class="paragraph"> 7. В окне свойств Properties укажите значение btnInventory для свойства (Name) и значение Create Inventory XML для свойства Text этой кнопки. </p> <p class="paragraph"> В верхней части файла введите следующий код: </p> <p class="paragraph"> Imports System </p> <p class="paragraph"> Imports System.Data </p> <p class="paragraph"> Imports System.Data.SqlClient </p> <p class="paragraph"> Затем в определении класса формы frmPrepareXML введите приведенный ниже код. </p> <p class="paragraph"> Dim en As New SqlConnection _ </p> <p class="paragraph">  ("data source=localhost;initial catalog=Novelty;user id=sa") </p> <p class="paragraph"> Private Sub btnInventory_Click(ByVal sender As System.Object, _ </p> <p class="paragraph">  ByVal e As System.EventArgs) Handles btnlnventory.Click </p> <p class="paragraph">  Dim dsInventory As New DataSet() </p> <p class="paragraph">  Dim daInventory As New SqlDataAdapter _ </p> <p class="paragraph">   ("select * from tblInventory ", en) </p> <p class="paragraph">  daInventory.Fill(dsInventory, "tblInventory") </p> <p class="paragraph">  ' Сохранение поля ID как XML-атрибута, а не элемента </p> <p class="paragraph">  dsInventory.Tables("tblInventory").Columns("ID").ColumnMapping = _ </p> <p class="paragraph">   MappingType.Attribute </p> <p class="paragraph">  ' Сокрытие поля WholesalePrice в сохраненном XML-файле </p> <p class="paragraph">  dslnventory.Tables("tbllnventory").Columns _ </p> <p class="paragraph">   ("WholesalePrice").ColumnMapping = MappingType.Hidden </p> <p class="paragraph">  ' Сохранение данных в XML-файле, включая встроенную схему. </p> <p class="paragraph">  dsInventory.WriteXml("..\Inventory.xml", XmlWriteMode.WriteSchema) </p> <p class="paragraph"> End Sub </p> <p class="paragraph"> После вставки данных в объект DataSet для формирования XML-файла используются следующие два выражение. Первое выражение указывает на то, что поле ID следует сохранить как XML-атрибут: </p> <p class="paragraph"> dsInventory.Tables("tblInventory").Columns("ID").ColumnMapping = _ </p> <p class="paragraph">  MappingType.Attribute </p> <p class="paragraph"> Второе выражение указывает на сокрытие поля WholesalePrice в сохраненном XML-файле: </p> <p class="paragraph"> dslnventory.Tables("tbllnventory").Columns _ </p> <p class="paragraph">  ("WholesalePrice").ColumnMapping = MappingType.Hidden </p> <p class="paragraph"> Наконец, во время сохранения данных используется второй параметр метода WriteXML, который указывает на необходимость включения XSD-схемы вместе с данными. Полученный в результате XML-файл показан в листинге 10.8. </p> <p>Листинг 10.8. Пример сохранения таблицы tblInventory в виде XML-файла </p> <p class="paragraph"> <?xml version="1.0" standalone="yes"?> </p> <p class="paragraph"> <NewDataSet> </p> <p class="paragraph">  <xs:schema id="NewDataSet" xmlns="" xmlns:xs="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata"> </p> <p class="paragraph">   <xs:element name="NewDataSet" msdata:IsDataSet="true"> </p> <p class="paragraph">    <xs:complexType> </p> <p class="paragraph">     <xs:choice maxOccurs="unbounded"> </p> <p class="paragraph">      <xs:element name="tblInventory"> </p> <p class="paragraph">       <xs:complexType> </p> <p class="paragraph">        <xs:sequence> </p> <p class="paragraph">         <xs:element name="ProductName" type="xs:string" minOccurs="0" msdata:Ordinal="1" /> </p> <p class="paragraph">         <xs:element name="RetailPrice" type="xs:decimal" minOccurs="0" msdata:Ordinal="3" /> </p> <p class="paragraph">         <xs:element name="Description" type="xs:string" minOccurs="0" msdata:Ordinal="4" /> </p> <p class="paragraph">        </xs:sequence> </p> <p class="paragraph">        <xs:attribute name="ID" type="xs:int" /> </p> <p class="paragraph">        <xs:attribute name="WholesalePrice" type="xs:decimal" use="prohibited" /> </p> <p class="paragraph">       </xs:complexType> </p> <p class="paragraph">      </xs:element> </p> <p class="paragraph">     </xs:choice> </p> <p class="paragraph">    </xs:complexType> </p> <p class="paragraph">   </xs:element> </p> <p class="paragraph">  </xs:schema> </p> <p class="paragraph">  <tblInventory ID="1"> </p> <p class="paragraph">   <ProductName>Rubber Chicken</ProductName> </p> <p class="paragraph">   <RetailPrice>2.99</RetailPrice> </p> <p class="paragraph">   <Description>The quintessential rubber chicken.</Description> </p> <p class="paragraph">   </tblInventory> </p> <p class="paragraph">   <tblInventory ID="2"> </p> <p class="paragraph">    <ProductName>Joy Buzzer</ProductName> </p> <p class="paragraph">    <RetailPrice>9.99</RetailPrice> </p> <p class="paragraph">    <Description>They will get a real shock out of this.</Description> </p> <p class="paragraph">   </tblInventory> </p> <p class="paragraph">   <tblInventory ID="3"> </p> <p class="paragraph">    <ProductName>Seltzer Bottle</ProductName> </p> <p class="paragraph">    <RetailPrice>15.24</RetailPrice> </p> <p class="paragraph">    <Description>Seltzer sold separately.</Description> </p> <p class="paragraph">   </tblInventory> </p> <p class="paragraph">   <tblInventory ID="4"> </p> <p class="paragraph">    <ProductName>Ant Farm</ProductName> </p> <p class="paragraph">    <RetailPrice>14.99</RetailPrice> </p> <p class="paragraph">    <Description>Watch ants where they live and breed.</Description> </p> <p class="paragraph">   </tblInventory> </p> <p class="paragraph">   <tblInventory ID="5"> </p> <p class="paragraph">    <ProductName>Wind-Up Robot</ProductName> </p> <p class="paragraph">    <RetailPrice>29.99</RetailPrice> </p> <p class="paragraph">    <Description>Giant robot: attack toybox!</Description> </p> <p class="paragraph">   </tblInventory> </p> <p class="paragraph">   <tblInventory ID="6"> </p> <p class="paragraph">    <ProductName>Rubber Eyeballs</ProductName> </p> <p class="paragraph">    <RetailPrice>0.99</RetailPrice> </p> <p class="paragraph">    <Description>Peek-a-boo!</Description> </p> <p class="paragraph">   </tblInventory> </p> <p class="paragraph">   <tblInventory ID="7"> </p> <p class="paragraph">    <ProductName>Doggy Mess</ProductName> </p> <p class="paragraph">    <RetailPrice>1.99</RetailPrice> </p> <p class="paragraph">    <Description>Yechhh!</Description> </p> <p class="paragraph">  </tblInventory> </p> <p class="paragraph">  <tblInventory ID="8"> </p> <p class="paragraph">   <ProductName>Mini-Camera</ProductName> </p> <p class="paragraph">   <RetailPrice>9.99</RetailPrice> </p> <p class="paragraph">   <Description>For future spies!</Description> </p> <p class="paragraph">  </tblInventory> </p> <p class="paragraph">  <tblInventory ID="9"> </p> <p class="paragraph">   <ProductName>Glow Worms</ProductName> </p> <p class="paragraph">   <RetailPrice>1.99</RetailPrice> </p> <p class="paragraph">   <Description>Makes them easy to find</Description> </p> <p class="paragraph">  </tblInventory> </p> <p class="paragraph">  <tblInventory ID="10"> </p> <p class="paragraph">   <ProductName>Insect Pops</ProductName> </p> <p class="paragraph">   <RetailPrice>0.99</RetailPrice> </p> <p class="paragraph">   <Description>Special treats</Description> </p> <p class="paragraph">  </tblInventory> </p> <p class="paragraph">  <tblInventory ID="11"> </p> <p class="paragraph">   <ProductName>Alien Alarm Clock</ProductName> </p> <p class="paragraph">   <RetailPrice>45.99</RetailPrice> </p> <p class="paragraph">   <Description>Do you know what time it is out there?</Description> </p> <p class="paragraph">   </tblInventory> </p> <p class="paragraph">   <tblInventory ID="12"> </p> <p class="paragraph">    <ProductName>Cinnamon Toothpicks</ProductName> </p> <p class="paragraph">    <RetailPrice>1.99</RetailPrice> </p> <p class="paragraph">    <Description>Really wakes up your mouth</Description> </p> <p class="paragraph">   </tblInventory> </p> <p class="paragraph">  </NewDataSet> </p> <p class="paragraph"> Для составления ведомости на выдачу заработной платы сотрудникам компании нужно создать код сохранения информации о сотрудниках в формате XML для каждого отдела. Для этого разработчик базы данных должен включить в форму frmPrepareXML вторую кнопку btnEmployees и вставить в код класса формы frmPrepareXML код из листинга 10.9. </p> <p>Листинг 10.9. Код сохранения данных из таблиц tblEmployee и tblDepartment в XML-файле </p> <p class="paragraph"> Private Sub btnEmployees_Click (ByVal sender As System.Object, _ </p> <p class="paragraph">  ByVal e As System.EventArgs) Handles btnEmployees.Click </p> <p class="paragraph">  Dim dsEmployees As New DataSet() </p> <p class="paragraph">  Dim daEmployees As New SqlDataAdapter _ </p> <p class="paragraph">   ("select * from tblEmployee", en) </p> <p class="paragraph">  Dim daDepartments As New SqlDataAdapter _ </p> <p class="paragraph">   ("select * from tblDepartment", en) </p> <p class="paragraph">  daDepartments.Fill(dsEmployees,"tblDepartment") </p> <p class="paragraph">  daEmployees.Fill(dsEmployees, "tblEmployee") </p> <p class="paragraph">  ' Определение отношения между таблицами. </p> <p class="paragraph">  dsEmployees.Relations.Add("DepartmentEmployees", _ </p> <p class="paragraph">   dsEmployees.Tables("tblDepartment").Columns("ID"), _ </p> <p class="paragraph">   dsEmployees.Tables("tblEmployee").Columns("DepartmentID")) </p> <p class="paragraph">  ' Сохранение данных в XML-файле. </p> <p class="paragraph">  dsEmployees.WriteXml("..\Employees.xml") </p> <p class="paragraph"> End Sub </p> <p class="paragraph"> В этом коде для сохранения данных из таблиц tblDepartment и tblEmployee в XML-файле используются предлагаемые по умолчанию параметры объекта DataSet. Полученный в результате XML-файл Employees.xml показан в листинге 10.10. </p> <p>Листинг 10.10. XML-файл Employees. xml, полученный в результате сохранения данных из таблиц tblDepartment и tblEmployee </p> <p class="paragraph"> <?xml version="1.0" standalone="yes"?> </p> <p class="paragraph"> <NewDataSet> </p> <p class="paragraph">  <tblDepartment> </p> <p class="paragraph">   <ID>1</ID> </p> <p class="paragraph">   <DepartmentName>Administration</DepartmentName> </p> <p class="paragraph">  </tblDepartment> </p> <p class="paragraph">  <tblDepartment> </p> <p class="paragraph">   <ID>2</ID> </p> <p class="paragraph">   <DepartmentName>Engineering</DepartmentName> </p> <p class="paragraph">  </tblDepartment> </p> <p class="paragraph">  <tblDepartment> </p> <p class="paragraph">   <ID>3</ID> </p> <p class="paragraph">   <DepartmentName>Sales</DepartmentName> </p> <p class="paragraph">  </tblDepartment> </p> <p class="paragraph">  <tblDepartment> </p> <p class="paragraph">   <ID>4</ID> </p> <p class="paragraph">   <DepartmentName>Marketing</DepartmentName> </p> <p class="paragraph">  </tblDepartment> </p> <p class="paragraph">  <tblEmployee> </p> <p class="paragraph">   <ID>1</ID> </p> <p class="paragraph">   <FirstName>Carole</FirstName> </p> <p class="paragraph">   <LastName>Vermeren</LastName> </p> <p class="paragraph">   <DepartmentID>2</DepartmentID> </p> <p class="paragraph">   <Salary>222</Salary> </p> <p class="paragraph">  </tblEmployee> </p> <p class="paragraph">  <tblEmployee> </p> <p class="paragraph">   <ID>2</ID> </p> <p class="paragraph">   <FirstName>Cathy</FirstName> </p> <p class="paragraph">   <LastName>Johnson</LastName> </p> <p class="paragraph">   <DepartmentID>2</DepartmentID> </p> <p class="paragraph">   <Salary>13000</Salary> </p> <p class="paragraph">  </tblEmployee> </p> <p class="paragraph">  <tblEmployee> </p> <p class="paragraph">   <ID>3</ID> </p> <p class="paragraph">   <FirstName>Eric</FirstName> </p> <p class="paragraph">   <LastName>Haglund</LastName> </p> <p class="paragraph">   <DepartmentID>4</DepartmentID> </p> <p class="paragraph">   <Salary>12000</Salary> </p> <p class="paragraph">  </tblEmployee> </p> <p class="paragraph">  <tblEmployee> </p> <p class="paragraph">   <ID>4</ID> </p> <p class="paragraph">   <FirstName>Julie</FirstName> </p> <p class="paragraph">   <LastName>Ryan</LastName> </p> <p class="paragraph">   <DepartmentID>1</DepartmentID> </p> <p class="paragraph">   <Salary>4000</Salary> </p> <p class="paragraph">  </tblEmployee> </p> <p class="paragraph">  <tblEmployee> </p> <p class="paragraph">   <ID>5</ID> </p> <p class="paragraph">   <FirstName>Richard</FirstName> </p> <p class="paragraph">   <LastName>Halpin</LastName> </p> <p class="paragraph">   <DepartmentID>2</DepartmentID> </p> <p class="paragraph">   <Salary>10000</Salary> </p> <p class="paragraph">  </tblEmployee> </p> <p class="paragraph">  <tblEmployee> </p> <p class="paragraph">   <ID>6</ID> </p> <p class="paragraph">   <FirstName>Kathleen</FirstName> </p> <p class="paragraph">   <LastName>Johnson</LastName> </p> <p class="paragraph">   <DepartmentID>3</DepartmentID> </p> <p class="paragraph">   <Salary>18000</Salary> </p> <p class="paragraph">  </tblEmployee> </p> <p class="paragraph">  <tblEmployee> </p> <p class="paragraph">   <ID>7</ID> </p> <p class="paragraph">   <FirstName>Sorel</FirstName> </p> <p class="paragraph">   <LastName>Polito</LastName> </p> <p class="paragraph">   <DepartmentID>4</DepartmentID> </p> <p class="paragraph">   <Salary>28000</Salary> </p> <p class="paragraph">   </tblEmployee> </p> <p class="paragraph">  <tblEmployee> </p> <p class="paragraph">   <ID>8</ID> </p> <p class="paragraph">   <FirstName>Sorel</FirstName> </p> <p class="paragraph">   <LastName>Terman</LastName> </p> <p class="paragraph">   <DepartmentID>1</DepartmentID> </p> <p class="paragraph">   <Salary>8000</Salary> </p> <p class="paragraph">  </tblEmployee> </p> <p class="paragraph">  <tblEmployee> </p> <p class="paragraph">   <ID>9</ID> </p> <p class="paragraph">   <FirstName>Randy</FirstName> </p> <p class="paragraph">   <LastName>Hobaica</LastName> </p> <p class="paragraph">   <DepartmentID>2</DepartmentID> </p> <p class="paragraph">   <Salary>18000</Salary> </p> <p class="paragraph">  </tblEmployee> </p> <p class="paragraph">  <tblEmployee> </p> <p class="paragraph">   <ID>10</ID> </p> <p class="paragraph">   <FirstName>Matthew</FirstName> </p> <p class="paragraph">   <LastName>Haglund</LastName> </p> <p class="paragraph">   <DepartmentID>3</DepartmentID> </p> <p class="paragraph">   <Salary>30000</Salary> </p> <p class="paragraph">  </tblEmployee> </p> <p class="paragraph">  <tblEmployee> </p> <p class="paragraph">   <ID>11</ID> </p> <p class="paragraph">   <FirstName>Cathy</FirstName> </p> <p class="paragraph">   <LastName>Vermeren</LastName> </p> <p class="paragraph">   <DepartmentID>4</DepartmentID> </p> <p class="paragraph">   <Salary>0</Salary> </p> <p class="paragraph">  </tblEmployee> </p> <p class="paragraph">  <tblEmployee> </p> <p class="paragraph">   <ID>12</ID> </p> <p class="paragraph">   <FirstName>Brad</FirstName> </p> <p class="paragraph">   <LastName>Townsend</LastName> </p> <p class="paragraph">   <DepartmentID>2</DepartmentID> </p> <p class="paragraph">   <Salary>12000</Salary> </p> <p class="paragraph">  </tblEmployee> </p> <p class="paragraph">  <tblEmployee> </p> <p class="paragraph">   <ID>13</ID> </p> <p class="paragraph">   <FirstName>Jennifer</FirstName> </p> <p class="paragraph">   <LastName>Eves</LastName> </p> <p class="paragraph">   <DepartmentID>2</DepartmentID> </p> <p class="paragraph">   <Salary>26000</Salary> </p> <p class="paragraph">  </tblEmployee> </p> <p class="paragraph">  <tblEmployee> </p> <p class="paragraph">   <ID>14</ID> </p> <p class="paragraph">   <FirstName>Steve</FirstName> </p> <p class="paragraph">   <LastName>Marshall</LastName> </p> <p class="paragraph">   <DepartmentID>3</DepartmentID> </p> <p class="paragraph">   <Salary>42000</Salary> </p> <p class="paragraph">  </tblEmployee> </p> <p class="paragraph">  <tblEmployee> </p> <p class="paragraph">   <ID>15</ID> </p> <p class="paragraph">   <FirstName>Laura</FirstName> </p> <p class="paragraph">   <LastName>Davidson</LastName> </p> <p class="paragraph">   <DepartmentID>4</DepartmentID> </p> <p class="paragraph">   <Salary>60000</Salary> </p> <p class="paragraph">  </tblEmployee> </p> <p class="paragraph">  <tblEmployee> </p> <p class="paragraph">   <ID>16</ID> </p> <p class="paragraph">   <FirstName>Angela</FirstName> </p> <p class="paragraph">   <LastName>Stefanac</LastName> </p> <p class="paragraph">   <DepartmentID>2</DepartmentID> </p> <p class="paragraph">   <Salary>16000</Salary> </p> <p class="paragraph">  </tblEmployee> </p> <p class="paragraph">  <tblEmployee> </p> <p class="paragraph">   <ID>17</ID> </p> <p class="paragraph">   <FirstName>Marjorie</FirstName> </p> <p class="paragraph">   <LastName>Bassett</LastName> </p> <p class="paragraph">   <DepartmentID>2</DepartmentID> </p> <p class="paragraph">   <Salary>34000</Salary> </p> <p class="paragraph">  </tblEmployee> </p> <p class="paragraph">  <tblEmployee> </p> <p class="paragraph">   <ID>18</ID> </p> <p class="paragraph">   <FirstName>Joe</FirstName> </p> <p class="paragraph">   <LastName>Chideya</LastName> </p> <p class="paragraph">   <DepartmentID>3</DepartmentID> </p> <p class="paragraph">   <Salary>54000</Salary> </p> <p class="paragraph">  </tblEmployee> </p> <p class="paragraph">  <tblEmployee> </p> <p class="paragraph">   <ID>19</ID> </p> <p class="paragraph">   <FirstName>Katie</FirstName> </p> <p class="paragraph">   <LastName>Chideya</LastName> </p> <p class="paragraph">   <DepartmentID>4</DepartmentID> </p> <p class="paragraph">   <Salary>76000</Salary> </p> <p class="paragraph">  </tblEmployee> </p> <p class="paragraph">  <tblEmployee> </p> <p class="paragraph">   <ID>20</ID> </p> <p class="paragraph">   <FirstName>Terri</FirstName> </p> <p class="paragraph">   <LastName>Allen</LastName> </p> <p class="paragraph">   <DepartmentID>1</DepartmentID> </p> <p class="paragraph">   <Salary>20000</Salary> </p> <p class="paragraph">  </tblEmployee> </p> <p class="paragraph">  <tblEmployee> </p> <p class="paragraph">   <ID>21</ID> </p> <p class="paragraph">   <FirstName>Mike</FirstName> </p> <p class="paragraph">   <LastName>Doberstein</LastName> </p> <p class="paragraph">   <DepartmentID>2</DepartmentID> </p> <p class="paragraph">   <Salary>42000</Salary> </p> <p class="paragraph">  </tblEmployee> </p> <p class="paragraph">  <tblEmployee> </p> <p class="paragraph">   <ID>22</ID> </p> <p class="paragraph">   <FirstName>Terri</FirstName> </p> <p class="paragraph">   <LastName>Woodruff</LastName> </p> <p class="paragraph">   <DepartmentID>3</DepartmentID> </p> <p class="paragraph">   <Salary>66000</Salary> </p> <p class="paragraph">  </tblEmployee> </p> <p class="paragraph">  <tblEmployee> </p> <p class="paragraph">   <ID>23</ID> </p> <p class="paragraph">   <FirstName>Cathy</FirstName> </p> <p class="paragraph">   <LastName>Rosenthal</LastName> </p> <p class="paragraph">   <DepartmentID>4</DepartmentID> </p> <p class="paragraph">   <Salary>0</Salary> </p> <p class="paragraph">  </tblEmployee> </p> <p class="paragraph">  <tblEmployee> </p> <p class="paragraph">   <ID>24</ID> </p> <p class="paragraph">   <FirstName>Margaret</FirstName> </p> <p class="paragraph">   <LastName>Eves</LastName> </p> <p class="paragraph">   <DepartmentID>1</DepartmentID> </p> <p class="paragraph">   <Salary>24000</Salary> </p> <p class="paragraph">  </tblEmployee> </p> <p class="paragraph">  <tblEmployee> </p> <p class="paragraph">   <ID>25</ID> </p> <p class="paragraph">   <FirstName>Mikki</FirstName> </p> <p class="paragraph">   <LastName>Lemay</LastName> </p> <p class="paragraph">   <DepartmentID>2</DepartmentID> </p> <p class="paragraph">   <Salary>50000</Salary> </p> <p class="paragraph">  </tblEmployee> </p> <p class="paragraph">  <tblEmployee> </p> <p class="paragraph">   <ID>26</ID> </p> <p class="paragraph">   <FirstName>Randy</FirstName> </p> <p class="paragraph">   <LastName>Nelson</LastName> </p> <p class="paragraph">   <DepartmentID>3</DepartmentID> </p> <p class="paragraph">   <Salary>78000</Salary> </p> <p class="paragraph">  </tblEmployee> </p> <p class="paragraph">  <tblEmployee> </p> <p class="paragraph">   <ID>27</ID> </p> <p class="paragraph">   <FirstName>Kathleen</FirstName> </p> <p class="paragraph">   <LastName>Husbands</LastName> </p> <p class="paragraph">   <DepartmentID>4</DepartmentID> </p> <p class="paragraph">   <Salary>108000</Salary> </p> <p class="paragraph">  </tblEmployee> </p> <p class="paragraph">  <tblEmployee> </p> <p class="paragraph">   <ID>28</ID> </p> <p class="paragraph">   <FirstName>Kathleen</FirstName> </p> <p class="paragraph">   <LastName>Eberman</LastName> </p> <p class="paragraph">   <DepartmentID>1</DepartmentID> </p> <p class="paragraph">   <Salary>28000</Salary> </p> <p class="paragraph">  </tblEmployee> </p> <p class="paragraph">  <tblEmployee> </p> <p class="paragraph">   <ID>29</ID> </p> <p class="paragraph">   <FirstName>Richard</FirstName> </p> <p class="paragraph">   <LastName>Rosenthal</LastName> </p> <p class="paragraph">   <DepartmentID>2</DepartmentID> </p> <p class="paragraph">   <Salary>58000</Salary> </p> <p class="paragraph">  </tblEmployee> </p> <p class="paragraph">  <tblEmployee> </p> <p class="paragraph">   <ID>30</ID> </p> <p class="paragraph">   <FirstName>Mike</FirstName> </p> <p class="paragraph">   <LastName>Woodruff</LastName> </p> <p class="paragraph">   <DepartmentID>3</DepartmentID> </p> <p class="paragraph">   <Salary>90000</Salary> </p> <p class="paragraph">  </tblEmployee> </p> <p class="paragraph"> </NewDataSet> </p> <p class="paragraph"> К сожалению, данный XML-файл содержит список сотрудников, который не сгруппирован по отделам. Несмотря на созданное отношение между родительской таблицей tblDepartment и дочерней таблицей tblEmployee полученный XML-файл содержит данные отдельно для каждой таблицы. Для вложения дочерних элементов из таблицы tblEmployee в родительские элементы из таблицы tblDepartment нужно указать значение True для свойства Nested объекта-отношения Relation. </p> <p class="paragraph"> dsEmployees.Relations("DepartmentEmployees").Nested = True </p> <p class="paragraph"> После вставки этой строки кода перед строкой сохранения данных </p> <p class="paragraph"> dsInventory.WriteXml("..\Inventory.xml", XmlWriteMode.WriteSchema) </p> <p class="paragraph"> будет получен XML-файл Employees.xml, показанный в листинге 10.11. </p> <p> Листинг 10.11. XML-файл Employees.xml с вложением дочерних элементов из таблицы tblEmployee в родительские элементы из таблицы tblDepartment </p> <p class="paragraph"> <?xml version="1.0" standalone="yes"?> </p> <p class="paragraph"> <NewDataSet> </p> <p class="paragraph">  <tblDepartment> </p> <p class="paragraph">   <ID>1</ID> </p> <p class="paragraph">   <DepartmentName>Administration</DepartmentName> </p> <p class="paragraph">   <tblEmployee> </p> <p class="paragraph">    <ID>2035</ID> </p> <p class="paragraph">    <FirstName>Julie</FirstName> </p> <p class="paragraph">    <LastName>Ryan</LastName> </p> <p class="paragraph">    <DepartmentID>1</DepartmentID> </p> <p class="paragraph">    <Salary>4000</Salary> </p> <p class="paragraph">   </tblEmployee> </p> <p class="paragraph">   <tblEmployee> </p> <p class="paragraph">    <ID>2039</ID> </p> <p class="paragraph">    <FirstName>Sorel</FirstName> </p> <p class="paragraph">    <LastName>Terman</LastName> </p> <p class="paragraph">    <DepartmentID>1</DepartmentID> </p> <p class="paragraph">    <Salary>8000</Salary> </p> <p class="paragraph">   </tblEmployee> </p> <p class="paragraph">   <tblEmployee> </p> <p class="paragraph">    <ID>2051</ID> </p> <p class="paragraph">    <FirstName>Terri</FirstName> </p> <p class="paragraph">    <LastName>Allen</LastName> </p> <p class="paragraph">    <DepartmentID>1</DepartmentID> </p> <p class="paragraph">    <Salary>20000</Salary> </p> <p class="paragraph">   </tblEmployee> </p> <p class="paragraph">   <tblEmployee> </p> <p class="paragraph">    <ID>2055</ID> </p> <p class="paragraph">    <FirstName>Margaret</FirstName> </p> <p class="paragraph">    <LastName>Eves</LastName> </p> <p class="paragraph">    <DepartmentID>1</DepartmentID> </p> <p class="paragraph">    <Salary>24000</Salary> </p> <p class="paragraph">   </tblEmployee> </p> <p class="paragraph">   <tblEmployee> </p> <p class="paragraph">    <ID>2059</ID> </p> <p class="paragraph">    <FirstName>Kathleen</FirstName> </p> <p class="paragraph">    <LastName>Eberman</LastName> </p> <p class="paragraph">    <DepartmentID>1</DepartmentID> </p> <p class="paragraph">    <Salary>28000</Salary> </p> <p class="paragraph">   </tblEmployee> </p> <p class="paragraph">  </tblDepartment> </p> <p class="paragraph">  <tblDepartment> </p> <p class="paragraph">   <ID>2</ID> </p> <p class="paragraph">   <DepartmentName>Engineering</DepartmentName> </p> <p class="paragraph">   <tblEmployee> </p> <p class="paragraph">    <ID>2032</ID> </p> <p class="paragraph">    <FirstName>Carole</FirstName> </p> <p class="paragraph">    <LastName>Vermeren</LastName> </p> <p class="paragraph">    <DepartmentID>2</DepartmentID> </p> <p class="paragraph">    <Salary>222</Salary> </p> <p class="paragraph">   </tblEmployee> </p> <p class="paragraph">   <tblEmployee> </p> <p class="paragraph">    <ID>2033</ID> </p> <p class="paragraph">    <FirstName>Cathy</FirstName> </p> <p class="paragraph">    <LastName>Johnson</LastName> </p> <p class="paragraph">    <DepartmentID>2</DepartmentID> </p> <p class="paragraph">    <Salary>13000</Salary> </p> <p class="paragraph">   </tblEmployee> </p> <p class="paragraph">   <tblEmployee> </p> <p class="paragraph">    <ID>2036</ID> </p> <p class="paragraph">    <FirstName>Richard</FirstName> </p> <p class="paragraph">    <LastName>Halpin</LastName> </p> <p class="paragraph">    <DepartmentID>2</DepartmentID> </p> <p class="paragraph">    <Salary>10000</Salary> </p> <p class="paragraph">   </tblEmployee> </p> <p class="paragraph">   <tblEmployee> </p> <p class="paragraph">    <ID>2040</ID> </p> <p class="paragraph">    <FirstName>Randy</FirstName> </p> <p class="paragraph">    <LastName>Hobaica</LastName> </p> <p class="paragraph">    <DepartmentID>2</DepartmentID> </p> <p class="paragraph">    <Salary>18000</Salary> </p> <p class="paragraph">   </tblEmployee> </p> <p class="paragraph">   <tblEmployee> </p> <p class="paragraph">    <ID>2043</ID> </p> <p class="paragraph">    <FirstName>Brad</FirstName> </p> <p class="paragraph">    <LastName>Townsend</LastName> </p> <p class="paragraph">    <DepartmentID>2</DepartmentID> </p> <p class="paragraph">    <Salary>12000</Salary> </p> <p class="paragraph">   </tblEmployee> </p> <p class="paragraph">   <tblEmployee> </p> <p class="paragraph">    <ID>2044</ID> </p> <p class="paragraph">    <FirstName>Jennifer</FirstName> </p> <p class="paragraph">    <LastName>Eves</LastName> </p> <p class="paragraph">    <DepartmentID>2</DepartmentID> </p> <p class="paragraph">    <Salary>26000</Salary> </p> <p class="paragraph">   </tblEmployee> </p> <p class="paragraph">   <tblEmployee> </p> <p class="paragraph">    <ID>204V</ID> </p> <p class="paragraph">    <FirstName>Angela</FirstName> </p> <p class="paragraph">    <LastName>Stefanac</LastName> </p> <p class="paragraph">    <DepartmentID>2</DepartmentID> </p> <p class="paragraph">    <Salary>16000</Salary> </p> <p class="paragraph">   </tblEmployee> </p> <p class="paragraph">   <tblEmployee> </p> <p class="paragraph">    <ID>2048</ID> </p> <p class="paragraph">    <FirstName>Marjorie</FirstName> </p> <p class="paragraph">    <LastName>Bassett</LastName> </p> <p class="paragraph">    <DepartmentID>2</DepartmentID> </p> <p class="paragraph">    <Salary>34000</Salary> </p> <p class="paragraph">   </tblEmployee> </p> <p class="paragraph">   <tblEmployee> </p> <p class="paragraph">    <ID>2052</ID> </p> <p class="paragraph">    <FirstName>Mike</FirstName> </p> <p class="paragraph">    <LastName>Doberstein</LastName> </p> <p class="paragraph">    <DepartmentID>2</DepartmentID> </p> <p class="paragraph">    <Salary>42000</Salary> </p> <p class="paragraph">   </tblEmployee> </p> <p class="paragraph">   <tblEmployee> </p> <p class="paragraph">    <ID>2056</ID> </p> <p class="paragraph">    <FirstName>Mikki</FirstName> </p> <p class="paragraph">    <LastName>Lemay</LastName> </p> <p class="paragraph">    <DepartmentID>2</DepartmentID> </p> <p class="paragraph">    <Salary>50000</Salary> </p> <p class="paragraph">   </tblEmployee> </p> <p class="paragraph">   <tblEmployee> </p> <p class="paragraph">    <ID>2060</ID> </p> <p class="paragraph">    <FirstName>Richard</FirstName> </p> <p class="paragraph">    <LastName>Rosenthal</LastName> </p> <p class="paragraph">    <DepartmentID>2</DepartmentID> </p> <p class="paragraph">    <Salary>58000</Salary> </p> <p class="paragraph">   </tblEmployee> </p> <p class="paragraph">  </tblDepartment> </p> <p class="paragraph">  <tblDepartment> </p> <p class="paragraph">   <ID>3</ID> </p> <p class="paragraph">   <DepartmentName>Sales</DepartmentName> </p> <p class="paragraph">   <tblEmployee> </p> <p class="paragraph">    <ID>2037</ID> </p> <p class="paragraph">    <FirstName>Kathleen</FirstName> </p> <p class="paragraph">    <LastName>Johnson</LastName> </p> <p class="paragraph">    <DepartmentID>3</DepartmentID> </p> <p class="paragraph">    <Salary>18000</Salary> </p> <p class="paragraph">   </tblEmployee> </p> <p class="paragraph">   <tblEmployee> </p> <p class="paragraph">    <ID>2041</ID> </p> <p class="paragraph">    <FirstName>Matthew</FirstName> </p> <p class="paragraph">    <LastName>Haglund</LastName> </p> <p class="paragraph">    <DepartmentID>3</DepartmentID> </p> <p class="paragraph">    <Salary>30000</Salary> </p> <p class="paragraph">   </tblEmployee> </p> <p class="paragraph">   <tblEmployee> </p> <p class="paragraph">    <ID>2045</ID> </p> <p class="paragraph">    <FirstName>Steve</FirstName> </p> <p class="paragraph">    <LastName>Marshall</LastName> </p> <p class="paragraph">    <DepartmentID>3</DepartmentID> </p> <p class="paragraph">    <Salary>42000</Salary> </p> <p class="paragraph">   </tblEmployee> </p> <p class="paragraph">   <tblEmployee> </p> <p class="paragraph">    <ID>2049</ID> </p> <p class="paragraph">    <FirstName>Joe</FirstName> </p> <p class="paragraph">    <LastName>Chideya</LastName> </p> <p class="paragraph">    <DepartmentID>3</DepartmentID> </p> <p class="paragraph">    <Salary>54000</Salary> </p> <p class="paragraph">   </tblEmployee> </p> <p class="paragraph">   <tblEmployee> </p> <p class="paragraph">    <ID>2053</ID> </p> <p class="paragraph">    <FirstName>Terri</FirstName> </p> <p class="paragraph">    <LastName>Woodruff</LastName> </p> <p class="paragraph">    <DepartmentID>3</DepartmentID> </p> <p class="paragraph">    <Salary>66000</Salary> </p> <p class="paragraph">   </tblEmployee> </p> <p class="paragraph">   <tblEmployee> </p> <p class="paragraph">    <ID>2057</ID> </p> <p class="paragraph">    <FirstName>Randy</FirstName> </p> <p class="paragraph">    <LastName>Nelson</LastName> </p> <p class="paragraph">    <DepartmentID>3</DepartmentID> </p> <p class="paragraph">    <Salary>78000</Salary> </p> <p class="paragraph">   </tblEmployee> </p> <p class="paragraph">   <tblEmployee> </p> <p class="paragraph">    <ID>2061</ID> </p> <p class="paragraph">    <FirstName>Mike</FirstName> </p> <p class="paragraph">    <LastName>Woodruff</LastName> </p> <p class="paragraph">    <DepartmentID>3</DepartmentID> </p> <p class="paragraph">    <Salary>90000</Salary> </p> <p class="paragraph">   </tblEmployee> </p> <p class="paragraph">  </tblDepartment> </p> <p class="paragraph">  <tblDepartment> </p> <p class="paragraph">   <ID>4</ID> </p> <p class="paragraph">   <DepartmentName>Marketing</DepartmentName> </p> <p class="paragraph">   <tblEmployee> </p> <p class="paragraph">    <ID>2034</ID> </p> <p class="paragraph">    <FirstName>Eric</FirstName> </p> <p class="paragraph">    <LastName >Haglund</LastName> </p> <p class="paragraph">    <DepartmentID>4</DepartmentID> </p> <p class="paragraph">    <Salary>12000</Salary> </p> <p class="paragraph">   </tblEmployee> </p> <p class="paragraph">   <tblEmployee> </p> <p class="paragraph">    <ID>2038</ID> </p> <p class="paragraph">    <FirstName>Sorel</FirstName> </p> <p class="paragraph">    <LastName>Polito</LastName> </p> <p class="paragraph">    <DepartmentID>4</DepartmentID> </p> <p class="paragraph">    <Salary>28000</Salary> </p> <p class="paragraph">   </tblEmployee> </p> <p class="paragraph">   <tblEmployee> </p> <p class="paragraph">    <ID>2042</ID> </p> <p class="paragraph">    <FirstName>Cathy</FirstName> </p> <p class="paragraph">    <LastName>Vermeren</LastName> </p> <p class="paragraph">    <DepartmentID>4</DepartmentID> </p> <p class="paragraph">    <Salary>0</Salary> </p> <p class="paragraph">   </tblEmployee> </p> <p class="paragraph">   <tblEmployee> </p> <p class="paragraph">    <ID>2046</ID> </p> <p class="paragraph">    <FirstName>Laura</FirstName> </p> <p class="paragraph">    <LastName>Davidson</LastName> </p> <p class="paragraph">    <DepartmentID>4</DepartmentID> </p> <p class="paragraph">    <Salary>60000</Salary> </p> <p class="paragraph">   </tblEmployee> </p> <p class="paragraph">   <tblEmployee> </p> <p class="paragraph">    <ID>2050</ID> </p> <p class="paragraph">    <FirstName>Katie</FirstName> </p> <p class="paragraph">    <LastName>Chideya</LastName> </p> <p class="paragraph">    <DepartmentID>4</DepartmentID> </p> <p class="paragraph">    <Salary>76000</Salary> </p> <p class="paragraph">   </tblEmployee> </p> <p class="paragraph">   <tblEmployee> </p> <p class="paragraph">    <ID>2054</ID> </p> <p class="paragraph">    <FirstName>Cathy</FirstName> </p> <p class="paragraph">    <LastName>Rosenthal</LastName> </p> <p class="paragraph">    <DepartmentID>4</DepartmentID> </p> <p class="paragraph">    <Salary>5555</Salary> </p> <p class="paragraph">   </tblEmployee> </p> <p class="paragraph">   <tblEmployee> </p> <p class="paragraph">    <ID>2058</ID> </p> <p class="paragraph">    <FirstName>Kathleen</FirstName> </p> <p class="paragraph">    <LastName>Husbands</LastName> </p> <p class="paragraph">    <DepartmentID>4</DepartmentID> </p> <p class="paragraph">    <Salary>108000</Salary> </p> <p class="paragraph">   </tblEmployee> </p> <p class="paragraph">  </tblDepartment> </p> <p class="paragraph"> </NewDataSet> </p> </div> </div> <!-- end .note-content--> </div> <!-- end .note-inner--> </div> <!-- end .note--> <div class="note-bottom-left"> <div class="note-bottom-right"> <div class="note-bottom-center"></div> </div> </div> </article> </div> </div> <!-- end .note-content--> </div> <!-- end .note-inner--> </div> <!-- end .note--> <div class="note-bottom-left"> <div class="note-bottom-right"> <div class="note-bottom-center"></div> </div> </div> </article> <article class="note-block entry post"> <div class="note"> <div class="note-inner"> <div class="note-content"> <div class="post-content clearfix"> <p> </p> <p class="chap">Создание объекта XmlReader с помощью объекта Command</p> <p class="paragraph"> В главе 4, "Модель ADO.NET: провайдеры данных", описываются способы работы с объектом Command, который является ключевым объектом — провайдером данных на платформе .NET. В ней рассматриваются способы выполнения команд на основе объектов ExecuteReader, ExecuteScalar и ExecuteNonQuery. Хотя все провайдеры данных на платформе .NET реализуют эти методы, объект SqlCommand имеет дополнительный метод ExecuteXmlReader, который используется для извлечения и доступа к XML-данным из СУБД SQL Server. </p> <p class="paragraph"> Метод ExecuteXmlReader возвращает объект XmlReader точно так же, как он возвращает объект DataReader. </p> <p class="paragraph"> Для демонстрации применения метода ExecuteXmlReader вернитесь к проекту ADO-XML и выполните следующее. </p> <p class="paragraph"> 1. Включите в форму frmXML под кнопкой Write XML еще одну кнопку, перетаскивая ее из панели элементов управления. </p> <p class="paragraph"> 2. В окне свойств Properties укажите значение btnExecuteXML для свойства (Name) и значение ExecuteXMLReader для свойства Text этой кнопки. </p> <p class="paragraph"> 3. Затем в определении класса формы frmXML введите код из листинга 10.12. </p> <p>Листинг 10.12. Код извлечения и обработки данных из СУБД SQL Server в формате XML </p> <p class="paragraph"> Private Sub btnExecuteXML_Click(ByVal sender As System.Object, _ </p> <p class="paragraph">  ByVal e As System.EventArgs) Handles btnExecuteXML.Click </p> <p class="paragraph">  Dim cn As New SqlConnection _ </p> <p class="paragraph">   ("data source=localhost;initial catalog=pubs;user id=sa") </p> <p class="paragraph">  Dim cmd As New SqlCommand _ </p> <p class="paragraph">   ("select * from stores for xml auto, elements", en) </p> <p class="paragraph">  Dim reader As Xml.XmlReader </p> <p class="paragraph">  Dim str As New System.Text.StringBuilder() </p> <p class="paragraph">  cn.Open() </p> <p class="paragraph">  ' Выполнение SQL-команды Select с предложением FOR XML. </p> <p class="paragraph">  reader = cmd.ExecuteXmlReader() </p> <p class="paragraph">  ' Поиск и извлечение данных из узлов-элементов. </p> <p class="paragraph">  While reader.Read() </p> <p class="paragraph">   Select Case reader.NodeType </p> <p class="paragraph">   Case Xml.XmlNodeType.Element </p> <p class="paragraph">    str.Append("<" & reader.Name & ">") </p> <p class="paragraph">   Case Xml.XmlNodeType.EndElement </p> <p class="paragraph">    str.Append("</" & reader.Name & ">" & ControlChars.CrLf) </p> <p class="paragraph">   Case Xml.XmlNodeType.Text </p> <p class="paragraph">    str.Append(reader.Value) </p> <p class="paragraph">   Case Else </p> <p class="paragraph">    ' В данном примере игнорируется. </p> <p class="paragraph">   End Select </p> <p class="paragraph">  End While </p> <p class="paragraph">  MsgBox(str.ToString) </p> <p class="paragraph">  сn.Close() </p> <p class="paragraph"> End Sub </p> <p class="paragraph"> Код в листинге 10.12 содержит пример упрощенного использования метода ЕхеcuteXmlReader в котором просто отображаются данные (вместе с дескрипторами) из таблицы базы данных pubs. СУБД SQL Server передается показанная ниже SQL-команда Select, в которой явно указаны возвращаемые поля в виде XML-элементов. </p> <p class="paragraph"> "select * from stores for xml auto, elements" </p> <p class="paragraph"> В таком случае обработка разных типов XML-узлов упрощается, потому что достаточно найти только начальный и конечный узлы, а текстовые узлы между ними будут содержать фактические данные. Более надежная обработка XML-документа основана на конструкции Select Case, в которой учтены узлы всех типов. После щелчка на кнопке ExecuteXMLReader будет выполнен код из листинга 10.12 и на экране появится диалоговое окно, которое показано на рис. 10.2. </p> <div> <img src="data:image/jpg;base64,/9j/4AAQSkZJRgABAQEAYABgAAD/2wBDAAoHBwgHBgoICAgLCgoLDhgQDg0NDh0VFhEYIx8lJCIfIiEmKzcvJik0KSEiMEExNDk7Pj4+JS5ESUM8SDc9Pjv/wAALCAF5ANcBAREA/8QAHwAAAQUBAQEBAQEAAAAAAAAAAAECAwQFBgcICQoL/8QAtRAAAgEDAwIEAwUFBAQAAAF9AQIDAAQRBRIhMUEGE1FhByJxFDKBkaEII0KxwRVS0fAkM2JyggkKFhcYGRolJicoKSo0NTY3ODk6Q0RFRkdISUpTVFVWV1hZWmNkZWZnaGlqc3R1dnd4eXqDhIWGh4iJipKTlJWWl5iZmqKjpKWmp6ipqrKztLW2t7i5usLDxMXGx8jJytLT1NXW19jZ2uHi4+Tl5ufo6erx8vP09fb3+Pn6/9oACAEBAAA/AOtvdTvLe6EFtaC6YxGV2aRt3BOe/wClVW1bVG2/8SyAKV3lnkZgq4zk5PHHNNbWNTW8+yf2Za+aV3Ac/MMZGDnng0832sBlC6VbHcGYEEkYHXnNUrjxReW9w8EljbLJGdrDng/nTR4xuhn/AEKD82/xpP8AhMbrtZwc/wC0/wDjUkni64wU+xwkHg5d/wDGom8VTgf8eFpk/wCyf8aafFU//Pha/TB/xo/4Sufp9hth+B/xpP8AhK5j/wAuNtx/vf40f8JVNuP+g2//AI9/jTm8Vz8j7HAPxb/Gm/8ACWTnj7HEAP8Abf8AxobxVMcE2cBx/eLN/M00eKZif+PC0H/AT/jSjxTNnmxtT/wE08eK5Rx9gtf++T/jSjxXMP8Alwtf++T/AI0v/CWTjj7Da/k3+NL/AMJdcbf+PG2xnsGH9acfGNxgf6DbZHQ5b/Gox4qmYufsNqSRzkE/1pF8UzDrYWnT+6f8a6ETLFBA8zW6GZAyj7OxBJ7A56+1QC6lfVfs+EiMMxTdECpYbCeeadqEeqRXSS6fFE+V2sXx/C5P61RaLXGJxaQRArscbhhwF2gHn0NRtaa+boXapDujACKHG1cDAIHqKaLLXluBMqQrkEeWGAXkY6fiaq3mh6td3DztBCrucsFfAJ9ag/4RvVQpzCp+jim/8I5qY/5YDPpuFSv4d1NmyIU/FxQ3hjUyPux/99imDw1qQbASPP8Avig+GtTJz5Scf7YpP+EY1QAny48H/bFIvhnVCciJP++xTm8NamTkRJ/32KQeGdUwD5Sc/wDTQUo8MaoesaAeu8Uv/CMannGyL/v4KU+GNSB+7Gf+2lIPDGqFseXH/wB/BTn8L6mFB8uPj/poKP8AhGdS/uRf9/BSf8I1qm0gRKf+2gpD4a1MID5SY/3xT4fDGpupIjjHGeZBS/8ACLamTjZF0/56CtzydTkhiEumwyGJAikz4wR3HvUXl3tpdm9uoEQyz7lQPu/gYGt5l/d7g38T/wDoRqJyAu92CjGSScAUz7Rb5x565bkAt1pBJE2CJY+cdGHekLxmUIJFL9AAwzSNNHHuDSKCBlsnGBSLLEwDLIuCuQdw6etLLLHHlpHAwu6mPcwrG8plXauM+oJ6DH41E97bI5V5trA4wQRU6XMEkTMsoCqfmZuKQ3FugJeVR823k96kVoy21XQsTjAbkmka5hicK7qDu2cnnNLuDgOjBlPIYHg04nIGaNvBx600qMntx1pecYzx/eoI+UAE8c0uVxkDgmlBYK4PtTdpKruJxmnxt8je4x9KVcZycexpw27sjgGqWr8pbL1zIf8A0E1dYHaoyR875I/3jVa7jgmj2zv5aowKuTjBqn9lsjI7G7AaUnJ464549e9INMs7hW2TCQ7/ADCVx6Y/Kljs7MKqm63J5m4LuA+b0z+tNeztZidl0ArybtoYE7vY1F9lsUaF3m3jICBUByRjg4+nSp57X7ZMPOmiU7CqrGdwII54Peq0c2kakssseoROYSFZ2dRsxgdD296luLO0FwizTuWZNqnAPy9OTj9ak+zWhhRTc7iGwrbhlSo6e9QeTZjy7ia4YszkblXIZs5/Kpkt7a0la5jnjklVCoDYx69uc0JZxyXBnNyoldllKqAwGBxgnkD1qWBrS2BiilDNJl2bPBIPPsOtT/abZo1kFzGFK7lJPah5UQjfKoLn5cnGaT7VAW5nTPQDcKUzQd5064HIxn0qR+ucDk0vJ7cH0704A+W59CMUxxhVy3enRnG4nPTikDkHGMnFPB3Dd0qnqRAa05xmRv8A0E1oMflHH8T8/wDAjVa6ht3hVrlgoRgytnBDdiPeqRh08SyA3bb3J3HjGcZI6cHoalgSIRuLCaJ5HYPKzck5+nSqlza6c6AvdYKlY9iEdRgd/r1oFrpbSGYXAHlN8xOORnP9al+y2b3IlW7HnBiSwwxY46Y6UBbO1lhuVkYqQqZVMggDp7HvWSui6TdqkCXVwHaZpFYoowWKnBx2+WtVLawSGFBvjjtUEUch4UYOOvfpiofselGNMz7VUs2CQM4PNTPHZSwxRtchhuZgcjLZ69v5U3+z9PaQwNcnew2YBGSOw6dqfFa2Ceayzb40iCOueFX8OtMNtZzRb3u8Q4Xy9xAZAMnH1/WpjptlHEs0kmYlxtzjBI6fWmXEtvJJL9rmXCgogRCDg7cn+QpsVhpazFFm3u5xjIyeD2/GphY6baq1q85RGw7Rs33x2+tSrqFoTHGsijeMjd29j+dP+1WqqD9pjIOe/p1qVZYpFdEkXcAGx3I9aCg8sc96dGDhs88UhXDEkjkZoQ9eBVXUgfMs++ZG/wDQTV91GwHHUv8A+hGq159mMSi52hVbKHuG9u+apMNPjY5mmLyuQWHrjkf59KerW0ClYLpQZX3M8g3BjgcZ7E5qCK30xxhpZVaRsbWYAuB2/TvzTJE0thKDNJKXKsXxnJAOO3tipreLTgouI7llaM5OG+6SOB0/yaV20+FWYlh5eSwYnLkqMk++OKbALAeXcRySFh8wByT0yOMdhUr2dteRfKztE53BVfgHv/OiTSraTyyfMxH0G7oOwpp0i0cqzBxjoA3t1pP7LQTrJ50hGdx6ZL/3s1IunQJHJF8+2UANluuKY+l2bhx5bYwcDd0yc1Yjs4BEIirMigbcnlPcEdKhOnQM4aR5WYE5fcASSc5PrUkNnFFMZo93mqpCljuAzz0+tMawilmFxLIxlX+JPlx749akj062ieN18xgh3KrNkbj1NR/2RaDI+ccMOCO/4dqtraQr+8AZigVV3tnaMdqcTgADqe1LG+1ZAQckUpbdzjt1FNX17A81BqX+ts8dPMbAx/smrh5RPm7v/wChGqt01v5QW4w2W+X+9n/ZxzmqwbTlmysk37sl92SQrdz9fWmI+l7UVnyBIQpIwrsec4/EUyUacshlleRnyQ5dufofb0pYo9OE3kx+apfLb9/Bxxn8s0oXTYU2KGMbnhm6LjoR+J6imyGw8l3llkJk3gjODIPT36CnrJYh5PLaUmOMJsAO5FNXITEIU8gII+o2ng+9Pzyckf40hHHy+tLnHGaRnORwaTPfsfSlDjnjH40hwDtPf9KAQCcH6mnZHfB5p2RnqKXKjnuTUmcIygDqKY2NoKnJB5pVyd+SOB1po579s05MFeTjHvVXUMfabIZzmRv/AEA1Zdm8tMHAy34/MarXTWwVfPQksf3YHLE+2O9U3k01ZnXy5Q7Z3k7geO1LKunwqAIW3xtuCFivX+LntwKjNxYTq6C0kkAPmtuxk478/wAqbBJp8kkKC1KMSApcjIAHf069KkZbMnK+Y8LAxgKDtA6kr+QpAmmXG1MO5Q/KpJO7vgVPFHazqzpucN8r5Y8Edj71KkYVAFAVF4AHAFOPDYz170gYgjDHFGSTgnilY4+7z+NIHJYAMOmeKXLZ4NIzljRuHIHy/WnqegBPHenqwIGR370bsjkYyacMrGwJHUc0hY+Xxk89B3oR22MOeV9aTLKOuPXFCsdpHTnvVW/ybqzwf42x/wB8mr7EeWnuG/8AQjVe8eBYlWZd+SFRQOc+3pVCUWCTMptpMo5wFJ+Y4G4Hn1IqWa400b0eFgHBJyh5VevPpniol/sydS8cTnCbyFXG0Z5H+I6VZhtLOQrPEPMB+ZWyefQH6Ur6fbySEEFVZTlASBk9/rQulwRTNICx3dtxwDjGfyqcRRxrsjCoByFHFKxAHAzjg0MAR6Y7UmwFfuim4XoDz0zQw+bAx70wgA/L1pcAZyOadgctj396QgZwwIpwVcAAmnD73PandWPAxTwoZGx2I601uBnBzmlRVcN24xihVBByO1OUKV5IzntVK8X/AE6zHrI3/oBq+Y8RLj+84/DcarXjRwQF5lBTgYxnOelUfNtI38lrQsU3O2TnbkZOOeR70rXenQ72+zOGB2MNmeT1FNE+nhAzWoCbvLYsOV5yMjrg1K2owRs/7tysbbCwAADemP60xdUi8uNmjlUuBwFzyegH4c1YurwW7oNjs7qSoA5JFRf2grxgugEphEoy3ykYyeR0+lQnVWjZBJb4Z+AFOSpGC2fYVN/aduYnkdGAD7UAH389D7DIpkupJF5iGBywfCgEe3GfXmpY7uCW6S3RJd7ZIG0dB1P0zSXF8kU7wLEzOpQH0AY4yakjmhuDIsfDxttZSOlSlMAYAxRgg/8A1qQghhk5FOGVxShc8kDNGTnjrT+kbc+lN2/IAc/WnwjAOOwNOzzjjHWhc4wBgZqjrbmOK3aPhxKcHH+ya0c5i78M/wD6EarXN0sKKGXcXO0Ljg/UnpVI3dmJHUWa/Jy3CggjgfzxUlr9juYXCWoCRtzlBjI/wqudRsoAjfZyjE5HyDIyMg/jSG/sZpUU27NMWCjcv3ee5+tRNd2sUyBLNN6k+YSPucjkH8aeLuxuGK+XPcMcKBIM4ye3pmnNqVksQCwkpISu0KOqjvUKX9vLfzxXGnbIzGsiTnB83g5GOuRj9an+3wRL5n2dRHMu5yMHPOBn9ajjurFIl32mN46ABuW6AVZnktbQjMJjaRTl4xhlHc5qut7pbNzDLK6t99xkg9ufwqZNVsjCxhRhHGcHCbcZ7gd6uqysFZW4PtTmbLHjH1poCuSDjI7UgHOduB2pX6cDkGl5xkjk9qVcYYn27UZUL2xnmnxMFJ/3SRQrDsuc+1OEm3v17YrN1tsxQYzjzT/6Ca1tv7sf7z/+hGqt7MsEfzx7w7bcH7o/3j2FUmv7XzGQ2kR8osH5XOcDkex/lUsHkXyuqxPGkTbT5b7Qx/DqPeqkuqWzA7LVf3ZGd6j7uccevHag6jArTNJZZMMgAMe09Rkc+vWnJdW0sscK2qhg5CBsAA4zz6Zphv0gImW2RIxy7H+8OmMdfrUkEpuZ4f8AR4MyZ80BeVGOx/ECoxqIiYzTWw4YpGyLg4BIPXrR/aNkshLWufN4bGCAQeMjp1zTYdQgdgpswZd2AUxtJz6/1p8V3bN9onCyOETIEh3Kc9sducUqahZpEHNn8+3c4RfwPX34qY3NmlolytuAWbIUKMqT0J7D61HNqnkM4MILltqc8DAGcn8f0qWPUluL5IEhYu+eQwOAOuaW51KKyu/JeNmcjqCMAnpn/Gq8GslpIEMO9nZ0IUjO4H+WO9Sf21C6bjBKvUjJAzxnj3qxDepLNHGBkSruUqc4+vp9atcGJwfUU11ygOBgHNLGC24DHQ0iLjgcHmnKeBgZHTpVHWBlLYYGfMOR/wABNaO7MS49W/8AQjUF3cfZ4d/lmTcQp/ur7n2qk1/ueNIreEhpSrbmA6Dr7Z7UNcpPHGWtm2ltoRThuOCQB2FJ9tECsZ4IXdXO3YoGcNt79+9Qx6qrlY1sotsj7VQEDJxnnjpnvUr36YLx26Kxj3KZFAyT6evvSHUC80MYt45P3bEfMNwx2HoTjpUgvcCJ44DtkJAUDDY4+bHpnNTsoYlWClVOeVpSiYB8tPQDaOBSBUUcIq4/uqBSoqbiBGuT14H4U75c8hSCCDkdaX/VggIqgjHyjtTVjhj6RIOuDj1607EbBwEHzDntTI4YoFxGi4568n8zUvyK4KRRj3AFASIqS0SHnoVHfrThIBu2oq5644pQTsY49OaQ/NGBz1xQoAJGcfKc1GuN3WnK5BwOaq6o+/7MBxiQ8f8AATWiSfLQ57v/AOhGql1dNbopERcs23dn5V9z7VW/tV8yN5MaquQTz8xHTBplvq7KIl+yhFdtoAOCg9T+JqT7a7sUKRRKGKmZhuQ/T60kepErO/2YsI8GIqmNy5xn6ZqK41N1QgwJNjGwKcqGAz/OibVR9p8r7KrgjLnIweOce+fzzUkeoSPHCRa4DEp5aHJVR0I9h3q7zvOTk4x0pSAceuKaNuDnv60BfnBBxSsSWIB6U3ryPu4oyMcdB3pSQcnv7GkB+b1x708bfoc80oK5Jz0pTgsTjrTwNsTAHjjimtxGPr2pUyAwKk5FMXGcninrtCkjnJ4NU9TX99aY7yN3/wBk1ewdqEDIw3Gf9o1WuZZIURo4ixJwzHkIPU45qk+rTLIE8mNhlgp2sN2PbHU1JcXVyiP5cP3GGHVfX+HB70w3F3MCI3UHeAEMXTueD2FNtr69knjDRDYz7cKmD7/lQ19JH8wtkiIZ2MZHzfjx3z2p0V+zvJG0EaFc/NjOOMjOB096uwTSTQh5ITGx42+o9aeFOQQSKUqAR3amsM4p+1RwWOTSADfn+VDKT0PP6U1kOTx+IpAmQcUoQcn8KUDIwO/A4pNpXByevpTjgn0xThgxOQD27VG3CjJAyeRzUka4dgG/hPSmqAW5OOOtLGW29uap6iHM1n8wJ8xuP+AmtJMeRHkYG0/+hGq9w88MKtBEHJbDHGdi+oHes9rq5YM8cZdZGYo+wnYAQOnbODUzXt8WcraB9qs2drDp0Hv602K9vJVffCI2CBlxGzBiTjH41cjMhRWliEb4yVznBpdoLqQAWx1x2/zinNhTlQMkc470cHJ6Gm8g8jNO+90IpRkrilHDHHH40EHpjk01gAmRmlVd3GcetDIAcHAx3pSAeQvGKaDyDt49qGXIGMHnNOABY9OTQAVRuQQcU1slRyOtCcO2MH5TzTV4YA+lOU7ePwqtf/8AHzZDIALt/wCgmro+WCL5eAD/ADNRXhuFi3WqBjkbu5A9QO5qiLrUDLIfJcIpbbiH73of50jXeqiPckAYeaAMoQSvr7ZqWO51B/LYxEuzkMrJtUL6561HcXF+jMoiAYttVFXdxzg59fXNNS4v3liiWEHdgM7REYGBz/MUt9dy7zHa/OvlnLKu7a34d+MVJL9tcTRqHVDjy3GFbd0/Edeaqu+oRyhEE0ihsSEr1IPAB9CO9Wd17FC7oHfdKeGwzRp7DvmoTdX7N+6DeXI+8OI8kLux/Lt1qa3ubx7o/aIxHCqlmdkK85xtzn9aimuLme92wljAJl2ui7srj5ue2P1q5bSTzQkzxbBu+U4wWHrjtVhexA//AF0jZ3dOe5NA4yDzQBhTzj1oGMcqcd6UEc4YDnpS8BG+b0FRE5TG7/61CgFmbn7poyAAB3pSMcD2qrqDhbqzZ2CoHbJPQfKav4by0I6ZY4P+8aiu3ulizbBSxYbumQvfGeM/WqfnamZWOHEa5C/uxz0xmnLdTpBKbhlR8EQhlwWwOpHv6VHLPqq3CxiEMpO0vs/8e6+lEVzqZmVZofLTaSzJHknjqPoajnn1lVMix5wgCooAzk8MfQ46+xpftGr4Gy0iBI+8F245x0/HP4GqusXWsx2UTQQ3JlE7F/ITBZR0Udcbs8E8ccnmq+oTawmqyXNpHcfeVkh2SFMGPkf3MBu3WmT6p4qjuZY4tOilRXaMMYWHJJCvnPI4ycdM4q7p2p67cXQW5sPLR4S6o0RXy26qrN0zzg4zzVkz3+RtDu6gK6sncnt27dab5+rRRQxwxFnIAYtFj6n8PTv1qvqWqaqJHfTojNDDLHCwFozMSwbe45HCkL2PWqp1PxSbB7uOxjaVQdts1qylyGUdd3cFj0/hq7ZalrTW8Jn07zZGkZWXY0XyZGGyeF78HrjitfGW4PHfNOxtyMZ46ikYk5AxyPWg8HHFODZVgBuOBxmosHZz3PenpgMehwpFJnPbIAojbPLHJ7ZrP14F4Ih8vMvIx/smtY8QLn/a7/7Rqvdi5MI+z4DZ+Y8Zx7Z4zVQHVhLI58wIAQuAvGcdf15qWC5uIUdr5gnz4jGzqvqcZ5qmz6w6YKdHDKFAGRkHB56Y796AdXXzZIxn94CvmIM4PU4z+FSLPqjXG2SLbFuO7YozjHb8aJftz+S0okwOCsZxx6nB4NPtbeVZYHkaUFQXfMhIyei/hmoVt9RjlSRJT+8lYSbjkIueDycGp7I3wnd7nIXaQuAAD6fSmaRPqbxSrqcDKxI8onGOnI4/2qZI+oF9pBEyBnwFBToAAPXqetAl1eOLARmflsMqkcngZ9MZqW5urgW4iidZL0KMjb0Pfiq7NqsxYeW6FoypCgDb9CTzn1p7NrC7fnUDyvm+QZDenXtQp1LY+SwcbdmNoGcHOavxn92pf74A3Y6Z9qeWIOPXvSBiCc8gjvSoQFYA9vWkZh5eOpzSIRnHse9IGwwBH609cE9Bx271R1nP2a35yRKf/QTWmHCQJkc5bp/vGoblbiSMC3fac5PYlfQHsarGHUjLA+6RVVzvwy9O2B3980sbag8cb7gJGY5zwoXgcjrk4z7Zpjf2qY0EKFCI8YYqckdT+PGKWaO/Jt38vzCFG5Q+MN3JIxnj/wDVUMY1bLtKGywAAXbwM/z5qRF1Jrd/MADhh0wMrjnb757mo5Ib10laJHj8wFQGcZUgAAt7fSnRregGIsxVYlK8gNu6demBjP41cg89IE+0MrS/xFentSlyoyB+tAbnqB+NOLjaaN+5QM89aQMuFHY+lOZgcYI59aQ4JJ3ZPoKRlB4GKXkqMfjSkDODznvS7BtYgdgOaa5OwD36imxrtcgA8g0LlgoPHb6U5GG7gGqOrrlLdcceaf8A0E1pN/qlXHIZ+T/vGoLlZ5INkEmxyck55I9M9qqeVqJmLMXwMhAZRgZHp6CohBrIgOZiHLgltw6YxjHr3NWHgupGct+8h3g+S0nLDn+Lt9Pakjt73zZ3QrCJUwoyW2Yxj9M1DJHqDMwTejELGSzj5uuTn0yaZJHqnmQA7hGgXf8AOMkgev8AnipI4dS8kiW4/eb+HJ6DHcdx7Vcwc568UfNwvpQc460me+Ovf0pxJBGDnIxSYOOvNOA5yDtHalBVuvUc5oA3AjigYAHOc0rA44Gc9aUDJAzzT1PytjAxSPkp1oQkP26UnzDI4pseeAxI4qrqXLWpznMrcf8AATVxs7OOm5+v+8ahuo5p4vLgkETcZPqPT2zWe9vfmQsm7aJBiNZ87V+vap5LS7dXzIMbFDJnIkcY554Az271DDp12sckMpSRXCgux5A9h2wM05rCdLlnD+aDIGXefujHcd6fNb3jS7d5myxdXD7QAAcLjtzjmooIb9LhhK0jJgEkuMEY5H1zjBq5bJNFFtkmL55AznaPTPen/Me35U7kLnbzTRgckc5pM9sU+Tl1+lNz65OePpThz0xkdzTQBnkc0q5OcYyOtLx1HGO2KflvQfUUBcNuPPpTgcKxbA+n1pGY7Bt6ZpYgN/PGFPNNBLMKUbQxY5+lU9SYGW0C8Zkbj/gJq6VyinplnI/76NVrqJ7iPbDMY2JB+o9Paqj2F1Ikm11hEjElA55AAA+tSPZXhkLC4ZFIbjzCcnB2/lxUcdlexoRLMZQYyPmkPBzwcjFXYA6RKs0hkbGCxGM0oO08cjHXtQxGNxI4GT9KVpFUbiyquOCTgfnTd6oeWXH+8Pwpx/2R0NIhTDZI4OCT2NGAoxzn6U13UYBcdQoz6048g46DuaAQVA9Oaa+OvU+1AI9h+FOzj86eT3Ax05pS2Djrx1pUKlWz6DtRuUIBwee1LHjcRzkA4po9eM+tKMDCnJJ7jpVS+ObizVTyJG/9BNXGb5FI7Fv/AEI1Wuo2ni8tJDE2Qcjv7H2qsNMuTIzCaIZyY03N8vGOPp6Ux9NuyrYuihLg7VckBfTP15p62N1/FcYcSFhIMlsenpzSz2F08hdJslm3bmJBA/u4HGPyqL7DcRrEGuQkKbVYiQjI9OfzqW7t7m7kCwoyosbId7bVfPTkUr2GEkLzRrvQLs7YGAWOe/8AjTJ7BcTwoYFR2TZuY5T5cD8TipPsEvlSReaI8yl9qk4YHs3ftVU6fcXLk+YifMWeLeeOcgcdOB1qeG1mt7tZpZy6gHbGHPzN68+3amTWVxPcGdiI4zIr7JGwVx9ODmpra3mhRg8hYE5VeSEHoCamZQqF3IUAZPajY3JyQQOlP2Sdhg9ORSbkYgB0bdwMHr9KV8ohLnandj0FOAfzCM4PSlGCjDcNy43e1O8vCEYyQTnFEIyxYdwRS7GbB2nHemgfKc/XFVbxQl3Ze7v/AOgGrjZ2lRglWcfX5jUF1bm6j2eYYyGDcHg47H2qj/ZkpmdzNHliSg54yO3P+c1YtrV7OOQ8zSOwwqtgKPQZ7VTn02ZYVZLnyCTltzHhsnBz9DikOmTsdqXbLtIyoZutWp7GR5mlEiY3K3lMCUbH973quNPljKqbwHPOxnI39ML9B2q1c2xmRpFuVClWWTechBxnHoeO9QS6Wkt15i3TecQrRlznhe5HfHaltNMktXZ3lEhYg5JPygHOBR9hmR/MVo1SMMQ5yN2f79QyaNcSsWkvQUIBPXHT9OKnewlkhnh85Rux5SFiQuME+/Wkks757w3ImTDD/VAnb06VD/Zc32fyGukb5Pn3OcZyfm/CpG01zCywznJtyqksSpkPG7HXoT3rOj8O367RJqKvKtykg+ZwrRDOYzjHBzVyHSGhtIIWuY0e2QoxXd8pZiwxn645qaTR7hoSPtATceuW+Qei+v41INOlHmq13tMu3btJycdQfb6UyTSp50kXzI4gzHcoJ2kYAGMfTvUkNlMk6yyS4RTkxh2+Y9hz6cU5rN72d5QTbs4CjJz8u05HB9xUEWi3AhKfbiJCT84JPy+n5cVat9OkiMG64JMKnkclsnoT6U3WJTb/AGWcgkRyN8vrlTV5gTuGePMc/wDjxqvdQLdQbC7RgMGLLx09faqTad+/LPdQq0h+RVBwpx25/wDrU+G0kszIyhZZZMfKH2hVHpntmqg06S5Ejrdo4dsnBJCnOcj37VINJlxKBMF8wgjaTgY65570R6e6st0blGhB3/MScrj/AD9KmbT5FihXzEaMHc4IIA9lPYCkGn26Wstsl26xhwzndkbTz/k00accI7XpYBAgbsV57+vSmTaXMMtFP5jYB2vkbzxkE+lNXSLjyz5l2rHaFKnOCcY5+napodN8gwhpQ6Km185yeD/PP6VGdJZY5B9qZnccbug55+nAA/CpYbN0SYSXLguoVWDZKjuR9TUb6c86BS8aAYUMqk5AB/nmlXSv3kbPMvlowyqqRkDHHXpxn6k1LewXN8vlDFuqtneHzuPbp0qs+jyvv/0lNzADJDcEfxdfvGnzaSXkZ0uSMqoUEscYx7/5zUjaY0kTRtMBul3+YAS6cfwnsfetJBhXXLEhepNIwLRknt60sJJYLnAwaFXgEDJ7YpQ5AznPHNZ2vrm0h4OfN9f9k1pMM89BvfPP+0arXVqtxCA7lQp3A54P1HcVU/s6Fpoma4iYhi4Xby/159KItPUxJE1x8yMWfBy2T0G7sMVFNpMRjUfayArcHOcEDn8sUHTY1cCG8Cu6MgXH3uASevXGKZ/ZARtjXgywCbWGc8HGQD2FTLpqpbOn21nAfJYnI467h3pZLNZkaSeeIFwSSoGAD0I9KWHTdpZSy7fL2Lxlc9zt+mKsxxrBEkKuzheMtzUp45HGaNpIyaQjB6DnjmmsDgYpSNnTOfT1oywP8waQHa3Pf0FO7DIINAUkYNO27X78jpTwG2sfYUhP7tuvWljOHz04zSRklueB2FOVeNoXGeaztd+a2gByP3pz/wB8mtJ1JGRwN7/+hGoLyCKeD9+2xUYMGzgKR/P6VRFraiWV/tyB3z/dAXIwfoelQtp1rHAyNcgqsgLAJnB5GMD9KdNHYXHmK92zM5GWQEdD6D26mnx2VrG8JF4+5H2ICepySR7+lNls4gBD9oUR4IGcFlY+p78A9aJNOhkjVPtvyoxc7QMn16f5xU8OnxBjMkoPmRhMqoxj27dqnigWCFYYy2xOhJyaf17UoGFOP1oJORjjFKQWOc0hDdTyB0xR1Jz3pGBxu6k0BmXgjn0pAGGNx69qNw+bI4NPU/N19vpSjBjf0K9aQHEXUDJpYvvDcM/U0ikg546nipFOVwMA+9Z2tkmC3H/TQ9v9k1p/eUDHBZ//AEI1DeRW7wZuHEYjbcGJ+6f89qzprOyMzM94VZXLOzouWyOg9eCPpUktpYyGRTcrvbCAhhlR7f41GLOxjy0d2F3AlSCPung/X69qsHTopGWVjvKy+ah9M9qjfTRjbHKVT5jtABKseOv502DTBFMZPNwMDaAg4OMflVuGGG2jMcYJ3fMST1PrSj5jg5zSsCABgexpf4MGkUjdx+VBUhuG/A0nAPU+pp6j5QMdf5U3HJzjNIV3cYzx2pxGcjGTikCHBNOKgPyOtAVQrHaOB2owNo9AeakhALjd6VGoBYcd+9SjAJ24xVHWuY7c/wDTU/j8prRHyxKMdS3/AKEagu0ga33XJCgHIboQe2PeqTR2MjgT3ZaT52LDg5OPvfQY4oe201j5k10j5BRSzjHzf/rNJFaWUbDyLrh0KAqQAeeeQOtWImtLTFukiRrGPu5zj/69CXlrIqssyKGAYZIHBpZ547YfvZAny55PWmvcRkM6klgoJQD5seuPSqqapaFfvPkjI+Xk+1TrdwSxuyyDZHwWPA5Hake/tolctNgJjjjJ4B4/Oni4gL7RPGWJxjd3pLq8t7NXeaQDYuSOp59PWpI5I5UDxusinlSDxipAT1HHbFBHJH0pQ2CeMAd6Tqp2daUhse4HQUEAHknjtSqMI3HJFNxtTI7npSwk7un0oUk4789KerdT3I4FUdWXItUBy3mt/wCgmtHny0GM53E/99GoLzyHhUXDDAPy4zkN7Y71TC6eJZGM0gZwS7ZOO2QeOuacljYz7gjGXa+9mzkgkd/rimqumpEgNwGiLlwHc4ZuvIpWi0ucjFxtEsmdivgM/wBOxNRuNMhkgLSSSEN8qk/dK4HI7YGKc4t7py010rSKCEaEYwp6+val87TbiUBZfMZlESvuJwCOgPbtmmSRafcLOyyiTC7nVD0HH+FMhXTZIeW2qx4VzgpjJ4/M96YVsZlcy3BZ1J+YHBfOP6cY9qWP7AWS6jn2zbSV8w5255ORT5oLSZRLPcEyyDYDCNu4A9Mc98c063ls7ZCEkw0sp3s5yzt/eJ/CrS3UMjKscyMxGcA5PvSNeWo37p1Gzhjnpzik+3WeSTdxAD1NSJMkpKRyAuozt6cevuKlfuxNIec4OQO9OTo4zzj196TCiPn1pEbLDtwcURjpjnNPQjBwMEd6qaqMPadf9Y3/AKCa0AB5MZHUhsf99Gq10INifaP73y4zuz2245zVbZpaSsFlnBcsXYFsZGMj88fjUsCRNE0WnXIHOZSyliSR6noapTrpLrGzOzlWWM4JGMYGT6CljGkm7895fLeJ9uGJHc46j1qZBpom3K4kkwwLZLl+xPv9ahuH02PaBLJtljCN5Z4IHABHrkUjR6XBbK7pMschaNwW3ANjknH4URT6X5c0gLI08XzRc5APoKZENLmgDiWVQcMVLE89ifcUl1/ZVvZST5kdBKocxtgszHAJJwMe+adbx6fqVtK0DywlVVJQ/wApX5QRn1wMGpR9gRoh50iMwLLPkhuo/PJ/lUSQaYVWVrkqQm0EsV6ZB/Pn+lWBBb2MZuEuDE0u1DLKN3Hbiqs/9mtE3nSuxT+JARu3HJOOw5/wp7Q6M2EMv+rA2DccgHAHH0FWUksllE4bknYJGzhf9kHtVtgPLzyacvDkdvWnKuC/T7vXPvTCBt+Y59R60sS/N2HXqaRDg/e+gFPBDKQOvoKqaquZ7NcjmRu/+wauD7igjoWHHpuNVrp7bCi4G7LYjx13e3vVYyach3BLhmkJBYFucdfrjHbvT99rBEVtrjy0diTJt3KzehJ71UjOkGEvJviDYcqSfmA4HT+VSH+yWEkfmvIXbeSSSxbHb164p0TaYJ0eJ5d7Odu3PUjH6fpSumnqseFbarbd6nhjyck98c0QzafDtttjBYAGJdTjLev1z3piWummcBUdJHUsnzFSwPUrUw0yzjXEQdfl253nIHtRLptu0PlJJJCAAFKHPAJOCCCCOTwaj0/SYNNikhikleJ8FonIK5wATjHt06VI+nQOzKWfaygBdx+XBPQ9utDabasmDvKDou8446fkSfzp09qt2224ctFnKqBgj8e9Eml2jKcpIN+AcOeg6D6e1D6dbyu7Mj5YAEg4zj/9VKtjbKpyrMm8vtZiQT9KsEtuIPQjNA/2uR29afGc7gDzimvwvc+9IiqZASM8EcUqqBjaOnalVuOMgiqGuyvHbQSxna4lOG64+U5rT2howc/3v/QjVe7a2SNVnTcXbCKByT7elVEk03zCVSQGHcdwB+Qjrxn1/OmwXOmgRAhgA2yMumQSe+O3WpZJbedhbJbmSbAQxsdpULyOajDaYzTK8ew27YyG6nsRjvnIpkkmnWmC0MqPFlkUEhskAkflilln05bpY23hjksig4AIPzY9aEbTZo/MAlCTnY0jA8kEcHNXDbxrM0uwb2/i9sfpTgVHXqfypwHOO9Ky7eOc+tIVzgjOfSmbSCBkD2pSSvHU89utISDhh3FG/PHf27Uo+Y9eO4pXyVGeg6mnE7ieNx45FLHklxkjC9cU35gGAP8AXNOTb5gJP4UgyenJzTo1B3ZHb1rM1z/UQ46eb/7Ka1hgRISCPvf+hGq93cQIqJNHvEp2quOp+vaqjXFgHaL7Id2SW4B3Y6896JpbGEFRagshDc9Ap/iyPoKYl5byooW0XbjzQC+DgHBJ989qlae3idIhZqiyFoyevG79fWo/MsDFGwhMsJdmy4zwByevbgClilsJydtowkGRgggnjPU98VdthZTwLLDAq7DgZGNpqU5ycgUgU4BIGMdKUHGcjPoMUYD8+poJB6Dgd6YcAetCHPIGTS7dy4z19BSKux+R/jSAjJOORxSZ4A6AightxwoxxzUqnIP+7TCSASV4zxzSxnMq5UH2NNAxtGeQfypwJyQOT6mqWtH9zbggZ805/wC+TWlg+RHkcDd/6EaivLmK1hBkj3BztC4GM+57VnTPZxO26xiLLIfKCYA4wDnsec1I1/aoXRrZhnLkbVIIHUnB9aal7Yz7pVtBvCiQ7wqk/nVuAW0kccsMYCnLrlcEE9fxoktLZ5C7QoWZdpBHUf5FJ9igj3sIVG9cEEdqslVCKEwFA4AHFR/xc4z3NSOATlTjFJgNuzkkelISUIAOcjnFD5xgY/KmlGGVI+uKUKVAB69sU0ZHI5oySSc845NKc8epFI2cAjkjpxS5ywGceopVAG4A8Ypu0bcj16Y6Uqf6z3oUksMgHmkwQTjntVLWkby7cBf+Wp/9BNait/o6YHZv/QjVa6uFtYwWjMm9goHYf7x7CqiXdokjRJZoyR7gwLAkZPbPqTSDUrQbmWyYbnMbEKvJA55+hp63VkdjfZAqyP5YwASCDwCvp/Kll1SKIu4icqrFQWIB3AHqOw/nQNSR5EjMMnmSMFVRg84BI/DPWpry++zsYvKLyeVvVeB9fyqO61IQo0axAyowGQ2Vx9fXjpUI1Z1RCYN28r90khAW2nd7+lTf2n+53tGjb5NiFThfxJ6Uw6oqSeWYSztJtXkAEZx+dSwajHcXAgjifJXfng/L6/8A1qZLqH+mG1RMssyozE4AyMip7e7S6QsgI2ttbPr7HoakLH2FJkdQB+FLwX4GcijlgOMZpTkcZprEFhxT1+ZWHopNM3nYSPzpYCDKKYBgAjJOegp0bckEHn2qrq2MWhOf9aR/46a0Mfu0GAMFh+G44qvdzC2h8zyzIGO3A6c+voKp/wBoRbjELOLEYYtyADx1HFWLWWO7SREtFRYnHoRux2x/OqzavDbeWTaGNj/dxwp7/jTTqcElyglsiZGYAHhtvvmklv0hbEVnGHQkMwAK4H91h3/lQ95ZJExNq0hI3ZlcOAO3X3PQcilbV0CyFrMNH8pWMYzu68j696VNVie5SOK2CmZl3M2APfPuKk+0oqSLFbIq+ZtZCAGbAJJ2/hwaijvbYRFvsaCMDaArAnaOe/Xr071YLxGwEyWpQzYwqEK3J9R07Gqo1CzQhY7N5HALBiQW/wBoZPpipIdUjcmKKFkCIfvEBFx2q5FcfaYUmVWCt03cYpwIz83Qj1oBKkEdRQSTzuHPPNGSAcMKQn5uDgYp0efmywwVNIM7DjNJEv71cMM56UnR+GAwacjnnLcGqmrr+6tW7+ccf98NWmf9UvqGf/0I1DcztbWwdY9+SAR2X3PtVJdUBcoIIiE3ZIP3jjjBx3/lUtq0eoxuhtwscTjBVzhj6jHUVUk1ZdjJHaqDEQAXwcqCOg9fal/tXHnM1oJBG6hWRgRz05/Onpqscsqw/Z1X58LuIwpxnnilGoKfKH2ZE3uQzlQVJ6ZX1/wpYry5aWDfFEyTkhWVOSvcnPQcfrTX1LyomlkVHJO0QhcMgHqfwpJNVRmiL2i7nXchZh0PHPHA+tT29+txHJi0RDsLIXx2459OtV7KZLi4Zp1QSLtAKsQCeRwMkEe9SSXqKXxAEbzAmGA3sO/HpgHFQrqcTlmNshXgDkA98g/l+dWDfj+zft3lEIfuIx5POBVNtYdzuSIKrQlhublT6n09h3py6u21C9owLRb8hwP89KkGqZVmEI+Tb8pY5bPpxVxfmhViSuRnaRyPalA555FLEQS3I6Gm7jswDz3xSqMyKM8ihFwOueacAVJ78VU1QZ+yjJ/1x/8AQGrRY4jXn+KTp/vGobieS3i3xxhsnBPOF9z3qoNSuPPjEcUe0sQwYH5fQnjjPah7nz4Y2eyDqWIVDndxwTxx61CuoTwRoZrQNkblwMEj2AzTpdTmgZ/MgjwoOUQd8jqcehNNl1KXyxiBI2f5lYnoCcenWppL50bHlBCrcI3LbQCSR25xjj1qIanOZHzHG0SJnK55HGQDjnvVqG5keURNApBUMzY+4fQ561PkHgAH8KUH5juAx9KPlwOFBB446UOqu6M6gsucZ7UHGQpRcD2pOCc+3Pp+VBJz0B49KaDlgPb0p5BJ+UD8qYc45X6UAc579qExllGM4PNN2j5jwPX3pYmAlVvvYOKVSFz9fyp4YE4HP4VU1PBe06j98ev+41X22njHSWTj/gRqCed4oGaGLzHXoo7e9VBqk/2goEUoBywQ/OduR9DntUCapcCBmFumAwCqAcd8nPpnA+pq19tmQupQJGrAeeFJC568d8eopttf3U0v7yMlcMANuN+BkY9z702TVJERZDGpKj54sHIycAH3HNRzalMiRboImlOTnn93z3H0HNSf2jcSxyp9nA2NhF2lvMHPHtnqKtqzsil02MR8yk5wadyowvSkDDJx6UrHjOOnpScH5s9elN3YAPvzQDjntTssFIJAIpC67h34o53Djg0uQM4PHYUZAAx6CkQAk9uvSmA8NjnPenQ5LqDzg9KUcFscDvSqCzcEc1S1v5bGM4P+uA6/7JrTfp/20k/9CNQ3DzxQMYIvNf8Auj07n3qi2oXUcoOAU3BdzRsM5HUj0z/KpHvL3YxSIqCoLNsI8snHHv8AlxUP2jUQwMkjKm3LOqZ2+nGOpPWnG5vY2Ul2MbMAQYwDnGSBx6nA+lTS3c0cpXyxExcBVK7iyjJJyOv096ig1S5mufKeGP5tpGAeh79Og75q5bXE0sRaaPZg4UjOGHrg8inPlsZ4AppLBc7u/p0pBjk+1K44BHSkcAJ97B7cUjM2Ap9OoFAYAKTjH86dxu4HXvSFAy9/ypcYZfXvinEcDjPvTfLQncOmB0pyqFYge9RkYDZ4PHSiP7wHTmlzgn605STnp7VR1hWNrCuclpR/6C1aj4Ee7knzJOP+BGobiSaKHdbRBpDjIzyB3IHc+1UJrm8DMbfdLuJXJj5XC9cduc077dfecFSIMMHJMZXoOO/fimw397JjzYghKM25IycHPHB/lV6CSZ4A86COQ/eVTmhmO0HABHINOL4jzxkjkkUpcMFAxyPyprY4GRkUpCquBgimjk8AYoPoMYoOOmAPc0j/ADKDSAjGMc/zp5YBDkCmjkA7evvSn5eRg88mlVtwHHHNOBAYH/Jo+8TggE5pgBKkkjtTVYiQbcYzikDEueRzTlJDkn9Kq6qcpag9TKf/AEBq0WPyY4x5kn/oZqMjJyCeKFdmzxkDvTWGD1pDgZ5pCcjB49OaCQPc9acHYID6Um3LLxwepowdxApQD6E496Vcg8DFNwS2OpFDJ3G7P6UvJGfQ9xSDBPOQ2aT1LL+dKpxnPBI60A4AGadjoOBj0NBJBBBzx26VInDdD0OaZhsHk49KTaBIoB/I0igA9M4PU0AjcRu/+tVTUx81oOOZif8Axxq0iuFz23v/AOhmkbIweeeKbg/z4pjcjkUg2hc/xEYpOCAMZ460z5j8vpUgOVPBGKVj93uSOTSLnnJPHeopQ7XUUQmkRSrMdhxnGP8AGlFtg7ftdz/32P8ACmPCIPne7nVe/wAw/wAKarxSkIt9cMTxs4BH14qU25Az9ruOfdf8KQwEAn7VOe+Mr/hUdhJJPpsMsrEuyncfXmpwdy8k/SnAZ4pAPl4C4ApwHHGOAKkiDAk5+8DTSCV6kcUxPmlTsM4pTks2MYyaAuSV596qagoJsvTzTx/wBq0jzEOgO98f99mm/wCzjjOTzTNpAOPzpGDbeTgelMKkev0pQp4OMGlIzwPrz2oVcpn+IHrT3UhQepxzxTCvJz1NQXFzb2VzBJcOY1KOvQnn5ajOsaaWP+k8e6mmS6npM6BGvCBkEHacgg5B6VHFdaTDO1wuolpHP7xiuN36VP8A2vpm4k3ae3BoOr6ayNm8XOCOAcml0wH+yrYY52dPxqyVAcnH1FLjHJGB6UD5VOeRj0pMNwDxwKeu7JBwQM9qaDkEcD0oC4kT60nIc9Dg80qOdxzxxwPSq17zcWIIOfOb/wBFtV37VaqoWW5hUhnBBcAg7jTWvrBet3AF9Q4NM+32HQXkJxx98Cm/b7E9b6A89N4pzX1gSQL2Aj/fFNS9s+f9Mg9vnFOW8sS3N5Dk/wC2KU3NnsGLuDj/AGx/jTWvrNcYvIDxz84pv22wIy13B+LinC+sgeLuDk/3xUi3lpz/AKTbHufnWka9su09v+DLR9qtCAftFuDn+8tBuLMjJuLfg/3lpTcWafvBPb8d9w4phvbEn/j7gz/vimm7siT/AKXb5/66CnLdWbZIuYOcf8tBSm4tTn/SYT/20FCz2pP/AB8RAEf3xUkc9uc4uIu/8YpA8OCfNjPp84polgEqhp41Oe7jmk862JYG5hHOf9YKf5sG8kXMJz23iq988UlzYBJY3Ilb7pyf9W1YNz/yEr7/AK7N/M1LY/fb/dq4f4qrSdDUdQN/rV+lRt94fSm/8sxWkn+qT/dqJ/u/jUEnSo2/pUb9/pUEnRaikoT/AFifWrx+8aae/wBKhHQ1HJ90/Wom7fSmN1/Om/w1In3V+tNHU03+Nq0dA/5DNt9W/wDQGr//2Q==" /> </div> <p class="paragraph"> РИС. 10.2. Диалоговое окно с XML-данными, извлеченными из СУБД SQL Server </p> </div> </div> <!-- end .note-content--> </div> <!-- end .note-inner--> </div> <!-- end .note--> <div class="note-bottom-left"> <div class="note-bottom-right"> <div class="note-bottom-center"></div> </div> </div> </article> <article class="note-block entry post"> <div class="note"> <div class="note-inner"> <div class="note-content"> <div class="post-content clearfix"> <p> </p> <p class="chap">Объект XmlDataDocument</p> <p class="paragraph"> В главе 9, "XML и .NET", рассматривается объект XmlDataDocument и способы его использования для доступа к иерархическим данным в виде узлов загруженного в оперативную память XML-документа. В этой книге также рассматриваются способы извлечения реляционных данных (и доступа к ним) из традиционной SQL-совеместимой базы данных. При этом необходимо выяснить следующее: </p> <p class="paragraph"> • как быть, если данные поступили из XML-источника, а нам известны только реляционные способы навигации и манипуляции записями; </p> <p class="paragraph"> • и наоборот: как быть, если данные поступили из SQL-совместимой базы данных, а нам известны только XML-совместимые способы навигации и манипуляции записями. </p> <p class="paragraph"> Ответы на эти простые вопросы основаны на применении объекта XmlDataDocument. Он является производным от класса XmlDocument, но обладает расширенными возможностями. Помимо внутренней копии данных, он содержит XML-совместимые средства доступа к ним как к классу XmlDocument с помощью XML-узлов, а также реляционные средства доступа на основе объекта DataSet. Объект XmlDataDocument автоматически синхронизирует оба эти представления (или, иначе говоря, способа доступа) таким образом, чтобы любые изменения, выраженные в одной технологии, сразу же отображались средствами другой технологии. Такой подход позволяет легко смешивать и находить соответствие между разными источниками данных на основе разных технологий. </p> <p class="paragraph"> Для демонстрации этих средств вернитесь к проекту ADO-XML и выполните перечисленные ниже действия. </p> <p class="paragraph"> 1. Вставьте еще две кнопки в форму frmXML сразу под кнопкой ExecuteXMLReader, перетаскивая их из панели элементов управления. </p> <p class="paragraph"> 2. В окне свойств Properties укажите значение btnNavigateSQL для свойства (Name) и значение Navigate SQL для свойства Text первой кнопки. </p> <p class="paragraph"> 3. В окне свойств Properties укажите значение btnAddRows для свойства (Name) и значение Add Rows to XML для свойства Text второй кнопки. </p> <p class="paragraph"> 4. Для импорта пространства имен XPath включите строку кода Imports System.Xml.XPath в конце списка команд импорта в верхней части файла с кодом. </p> <p class="paragraph"> 5. В код класса frmXML включите две подпрограммы. </p> <p class="paragraph"> Private Sub btnNavigateSQL_Click(ByVal sender As System.Object, _ </p> <p class="paragraph">  ByVal e As System.EventArgs) Handles btnNavigateSQL.Click </p> <p class="paragraph">  Dim en As New SqlConnection _ </p> <p class="paragraph">   ("data source=localhost;initial catalog=pubs;user id=sa") </p> <p class="paragraph">  Dim da As New SqlDataAdapter("Select * from authors", cn) </p> <p class="paragraph">  Dim ds As New DataSet() </p> <p class="paragraph">  ' Вставка в объект DataSet данных из реляционной базы данных </p> <p class="paragraph">  da.Fill(ds, "authors") </p> <p class="paragraph">  ' Создание объекта XmlDataDocument на основе существующего </p> <p class="paragraph">  ' объекта DataSet. </p> <p class="paragraph">  Dim xmlDoc As New Xml.XmlDataDocument(ds) </p> <p class="paragraph">  ' Получение объекта-навигатора из XmlDataDocument. </p> <p class="paragraph">  Dim xmlNav As XPathNavigator = xmlDoc.CreateNavigator() </p> <p class="paragraph">  ' Извлечение всех фамилий авторов из штата Калифорния (СА). </p> <p class="paragraph">  Dim xIterator As XPathNodeIterator xIterator = _ </p> <p class="paragraph">   xmlNav.Select("//authors[state='CA']/au_lname") </p> <p class="paragraph">  ' Последовательный обход всех выбранных узлов и </p> <p class="paragraph">  ' отображение фамилий всех авторов. </p> <p class="paragraph">  Dim str As New System.Text.StringBuilder() </p> <p class="paragraph">  While (xIterator.MoveNext()) </p> <p class="paragraph">   str.Append(xIterator.Current.Value & ControlChars.CrLf) </p> <p class="paragraph">  End While </p> <p class="paragraph">  MsgBox(str.ToString) </p> <p class="paragraph"> End Sub </p> <p class="paragraph"> Private Sub btnAddRows_Click(ByVal sender As System.Object, _ </p> <p class="paragraph">  ByVal e As System.EventArgs) Handles btnAddRows.Click </p> <p class="paragraph">  Dim dsPubs As New DataSet() </p> <p class="paragraph">  ' Считывание XML-данных из файла. </p> <p class="paragraph">  dsPubs.ReadXml("..\Pubs.xml") </p> <p class="paragraph">  ' Вставка новой записи. </p> <p class="paragraph">  Dim row As DataRow = dsPubs.Tables("Publishers").NewRow() </p> <p class="paragraph">  row("pub_name") = "Newbie Publishing Corp." </p> <p class="paragraph">  row("city") = "New York" </p> <p class="paragraph">  row("state") = "NY" </p> <p class="paragraph">  row("Country") = "USA" </p> <p class="paragraph">  dsPubs.Tables("Publishers").Rows.Add(row) </p> <p class="paragraph">  ' Связывание объекта DataSet с сеткой Data Grid </p> <p class="paragraph">  ' для просмотра новых данных. </p> <p class="paragraph">  grdData.DataMember = "publishers" </p> <p class="paragraph">  grdData.DataSource = dsPubs </p> <p class="paragraph"> End Sub </p> <p class="paragraph"> Подпрограмма btnNavigateSQL_Click считывает данные из базы данных SQL Server, а затем выполняет обход всех записей, извлеченных с помощью XPATH-запроса. В этой подпрограмме ключевыми являются приведенные ниже строки. </p> <p class="paragraph"> Dim xmlDoc As New Xml.XmlDataDocument(ds) </p> <p class="paragraph"> ' Получение объекта-навигатора из XmlDataDocument. </p> <p class="paragraph"> Dim xmlNav As XPathNavigator = xmlDoc.CreateNavigator() </p> <p class="paragraph"> ' Извлечение всех фамилий авторов из штата Калифорния (CA). </p> <p class="paragraph"> Dim xIterator As XPathNodeIterator xIterator = _ </p> <p class="paragraph">  xmlNav.Select("//authors[state='CA']/au_lname") </p> <p class="paragraph"> Сначала объект DataSet с данными связывается с новым объектом XmlDataDocument. Затем создается объект-навигатор XPathNavigator на основе объекта-документа XmlDataDocument. После чего на основе объекта XPathNavigator создается объект-итератор XPathNodeIterator. Далее строка XPATH-запроса передается методу Select для возвращения списка фамилий авторов (т.е. значений поля из Калифорнии (т.е. у которых поле state имеет значение СА). После этого выполняется последовательный обход всех узлов, извлеченных данным запросом, и создается строка с искомым перечнем авторов. Эта строка отображается в диалоговом окне, которое показано на рис. 10.3. </p> <div> <img src="data:image/jpg;base64,/9j/4AAQSkZJRgABAQEAYABgAAD/2wBDAAoHBwgHBgoICAgLCgoLDhgQDg0NDh0VFhEYIx8lJCIfIiEmKzcvJik0KSEiMEExNDk7Pj4+JS5ESUM8SDc9Pjv/wAALCACqAEABAREA/8QAHwAAAQUBAQEBAQEAAAAAAAAAAAECAwQFBgcICQoL/8QAtRAAAgEDAwIEAwUFBAQAAAF9AQIDAAQRBRIhMUEGE1FhByJxFDKBkaEII0KxwRVS0fAkM2JyggkKFhcYGRolJicoKSo0NTY3ODk6Q0RFRkdISUpTVFVWV1hZWmNkZWZnaGlqc3R1dnd4eXqDhIWGh4iJipKTlJWWl5iZmqKjpKWmp6ipqrKztLW2t7i5usLDxMXGx8jJytLT1NXW19jZ2uHi4+Tl5ufo6erx8vP09fb3+Pn6/9oACAEBAAA/AOrfV7yGOGOOK5uX+zrNI/nsOvU4pDrWp71zp1wAy5H+kNjGM8nPHHrUa+IL9rh4BY3BlQZZBcNkDj/EVN/bGqCQRf2bclyN2PPbpnH86qHxbKjMj2koZSQQbhuDR/wl7EjFtJx/08NWraX891Yx3ZkSFJSQgeeTtUc+pXC3UUCyEFjG4kSV8EFgMYNVjPf2ywyWVkJ1e2j3vjPAzlfxzULSaoVkUaUQk6bZBnqNoUY9OBTEOsi9a7GmElhhRjGOMde/FPhl123nDLYyGJRtSItwOnf8KzrjSdSmuJJVsHUOxOM5xmmf2NqY6Wjiti3F0umRWM+lXEiRkkhXAD85FJMLt7qK4mtpIURYowXIJOHHcVq2ysLO3G44EKEj/gIqUuAdpIyuOM0hmVowyuCrEhcHqacpbPfp3o5Z84PFNOQozwKCWyQA3ByMVBqGfLg3D5TcxZHr8wq7FgQQ8EfuUHX2FVL+0gnmRnujEzLgAHliDx/M/nTG0iMtGVkVVjJYpgkMc8d/SrFpZi0idTIZMvuyST/OrCkYxjGTSgjnp9KTHcDoeag1Ejy4OMf6VFn/AL6FPi/49YiVyTEmSP8AdFU761SSVQt15EkihOBkkf06mo5dIR5JGS4KK5BVQTgD061Ys7MWiFVlDbgAeepGefrVghs4YnIFEatuOR16UMrhmGODVe/GUg6/8fMRP/fQq1Cc28IHQwpz/wABFQ3Plxy7/tIgeSPa425yvb6VTt9Mtvs4Ed1kSEbWZcEAdhmpItPgWQP56u/ABAA6H+fHNaLEM24KOecjpQOTmhiScjmqupMfJg7YuYv/AEIVJa5NnbkAkGBMf98ioLswrcBpJmjLoPMVRkMgOefTnvUctpazESvfKwV2ZAMfLk54561ClrYxCVRcI0sq5DHHyYOTj3PNasXleUpiOY9o2n2pw9T36ULktjB5/I1V1L/UQKB/y8RZ/wC+hUloVWxtj6wp/Kqt+9lLMkFxKybhkYUY/E9qjkt9NmC7rocEtuBXnPempa2ILRyXSP5gEaBMZC9R+PvWogWOIR7s7QAOBSsVGRnr29KUMByc+1VdRPyW5J/5eov/AEIU60Xdp9sQMZhUdfaqd9FZvMDcmQr5fz4+6q54JPbmmRW9h9sS0iZ2kTE2QeMjpmrMemW8EolQsr7t2ferIUltxOD7dqcUz8oPfJOKUqcjoRUGoR5t4DnP+lRf+hCktDmyt8tj90OO1RXSWnm4kDuxT51DYXaD1ao7VtMhumnSc+YVxuc5yMf/AKqmTU7JnZTOuQeNxxu4zTo9TtXZl83bg9SMAjGeKsLIr4Zfu9aduz0PeoNQyYrfJ/5eYv8A0IU21Uiwgwf+WajpUV3BaXL+Xc7gVj3MQcArnp+dQvHpruQGLCVlBYE4UqOP5dKjji0pHHnXDtITzK3BkPPOKsx6daSQsIizrwMbiQOnT34FaATHXvSDbg8c5qtqCjy7c/NkXMX/AKEKW0cfYbfKk/u1qG8a1E6tMkpZlIG1iAQOT+XWokfThO8QjcbGDbctkse+PWkjfSdyFA2/d8p+bLn0HrU1peWkcKpEX2hiMkdTnr+dXQ4BHX1xS7xywA46iq+oMBbw56/aYv8A0IUtnHmygAP/ACyU/pUN/LHb7Q9u0q7Tls4Hpj61Xd9OEgja2lBJLFsHdkde+aR5dKjjRTGyr95MKRj/AGh7Vcgs7N4UkjgKj7y5yP0/DNThVOD0xSBP7p4J5qDVARaIR2niI/76FTWWfsVtxjECdfoKp6hcxJcBJrYzEpkHPHXv+GTTHvLII5S2aQw5zx2PGc+hqJJdPhLI9s+887CCQP8AZH+FTJq8WFbyXWAKQHxnocDvU1vqEd2xESSKAATuXGKsb+wHeqmqSA2Skf8APaPv/tCrloCLCA56wp/6CKguLmCO7MDRoS0W5mLdVGeKpx3emlDILJgoYAkoBtJ//VTlu7O8mH+jEs+FZnUcAnirv2W3UcQx4OAePSnRwRRbvKjVQeu3jNO2jJx3qrqqJ9hXC4/fR/8AoQqSBz9htgOR5S1Xvb5YHcPbCYLHvJC5wM459qgk1G0j3iO2BRSp6DbuPSpob62e4+zx22JN3JwMZHfNXTJj5SOf0pV3FW5pCTgD171W1QE2iqMZM0Q4P+0KmtIh9kg4A/dioL+6ktpPKjtlmBiLMT2we/tVcX8UciEWsIhcbjyCefXFOXUoC0JitVXc21skAg44/D3pYNU80BTA7OBk/MAOBk/571rBRtA7HB4pPLB7nAPSq2pqvkRAZ/4+Yv8A0IVLaYFnb4PJiGKec7skdR+lIIkOSFQMQedopTFEE4iU4GPujpTljQjIUD3AxkelOyD64pRhWwap6mSIIPl5+1Rc/wDAhUtmR9ig7kRgYpkcl1LGzqYFXcwAIJPBxRtuRz5kH/fDf40ubgAKZrbLdBtOT+tODXR5Elue2Ah4/WnYu+0lvyOmxv8AGoZZ7iO+tYJTE4nLcqCMYGaNT4ghPpdRf+hCmWbE21uMkfuweKSB0S33GZVzI/ylhx8xqVp4dwAmjyemHFVbqCO6dttxAA6bSzMNyYPVfrU9kEt7ZYWuIWKj7wYAt9amMsOTmaPA6DeKqXUsZ1TTSsqtgyZ2tn+H2qTVBi1jwxI+0RH6fMKntFP2KEgD7nBPpUZ06xdi7WkTOTknGcmkbTNPUD/Q4P8Avmj+zNPK5+xQ5/3aF0ywP/LlCce1P/sqwH/LlD9dtOgsLSGQSQ2sKOp4YLzUWrqBZhiANs8R6/7QririeUTyqJXADsANx45NRefMBxM//fRo8+YnmV/++jSCeXP+tf8A76NPWeXP+tf/AL6NNFxPz++k/wC+jQJ5iR++f/vo1OksjSRhpGI3rwT71//Z" /> </div> <p class="paragraph"> РИС. 10.3. Диалоговое окно с XML-данными, извлеченными из объекта DataSet </p> <p class="paragraph"> Вторая подпрограмма, btnAddRows_Clicks, выполняет другую задачу. Сначала она считывает XML-данные с помощью метода ReadXml из файла Pubs. в набор данных dsPubs, как показано в листинге 10.1. Этот метод автоматически создает таблицу publishers в объекте DataSet. Далее новые данные вставляются с помощью реляционных методов и объектов, например объекта-записи DataRow. Новый объект DataRow включается в схему таблицы publishers, а полям присваиваются указанные значения. После этого новая запись вставляется в таблицу publishers, а результат вставки отображается в сетке DataGrid (рис. 10.4). </p> <div> <img src="data:image/jpg;base64,/9j/4AAQSkZJRgABAQEAYABgAAD//gAcU29mdHdhcmU6IE1pY3Jvc29mdCBPZmZpY2X/2wBDAAoHBwgHBgoICAgLCgoLDhgQDg0NDh0VFhEYIx8lJCIfIiEmKzcvJik0KSEiMEExNDk7Pj4+JS5ESUM8SDc9Pjv/wAALCAEWAYMBAREA/8QAGwAAAwADAQEAAAAAAAAAAAAAAAECAwQFBgf/xABKEAABAwIEAgUHBwkIAgMBAQABAAIRAyEEBRIxQVETImFxkQYUFTKBodEWIzNCUpKxJDRDU2JygqLhJTVEY3OywfCT8VSDwkWj/90ABAAo/9oACAEBAAA/APX4vNGYE0qfm/S6qTXlxqOkkjvWbG4urg8vbi34Sk6m6CAKz5v7Vq+mMWC5pyaC0CQarpvtx7FjdndalTbUflDQ18QTVdxuOPFUc4xNPpTUyZrRTMP11XANnvKx18+qUKzadTKqYe5ocAKriSD3FYx5RP39FNhxgdd9ythua4o1alMZOwvZGsCo60ieao5pjtVRpyQTS9frutaVpfKpsf3dSJ/fcgeVLXR/Z1Of9RyZ8qmxbLqR/jco+VYBn0dS++5U3ysbxyyl99yZ8q2kR6No/fcg+Voj+7aHtc5R8qwT/d1G37TlR8rOJy2jH7zlI8q7/wB20e7UUfKsxHo2h4lI+Ve85dQ8Sj5U2tltDxKB5VA2GW0B7SkfKgx/d+H96j5TmP7voX70/lRa+X4fuukfKXUDOXYbwKB5SXP9m4aO5MeU075dhrfsp/KSJ/s/C/dQ3yktfLsN91S/ymk/3bhfuo+UxAj0dhvuoPlMRAGXYX7qQ8piCCcuwvsELL8qRP8Ad1L77kvlS0x/ZtLt67kx5UtiPR1Mfxu+KfypA/8A51K37bkfKoR/d1IX+274r//Q7g8rGnfLaX/kcj5VibZbT/8AI5IeVYuDltL/AMjlTfKoOcA3LaQJMfSOXdDa5AmhhRPDU9ajsaQGuOHokO1QGio7YwTbtCdLGuq1qlNuHw4DKYqF5L9ieW6VfHijSFQUcLWbraw9G59tS5NbFYmniKrGYh7Wte4ABxtdb+Z5ZicRXo6aD6gbh2CW8471r1sJm7qApebVKgbEMcRBg96yVPTr4L8vaXh4eHAgGQSRx7VjfQzqowNq5a186ZOoCS0QOKKlPygxGFq4ethC8VOOoSLk89rrG3BZ357TxJy8FzKQpgahEBumd91tvf5QVXPJwDDPCRbfa+91rjD52MRXqnLWl1doa8Fw2jbfsV0W+UNN9QuwpqNq/Ue8QBeYv2rmHyezYvdpwZaCbNDhb3pDyezYSThD99vxQPJ3NZMYYj+JvxQPJzNpjzQxw67fim3yczafzT//AEb8Ux5OZtBPmv8AO34pv8ns1EF2EAP77fih3k7mwH5r/O34oHk5mp/w387fim3yazWJOG/nb8Uj5OZsP8N/M34pHyazU/4b+dvxS+TWa3jD/wAzfihvk3moP5t/O34qfk7mhn8n/nb8UfJzNSPzeP42/FP5O5ob+b/zD4pjyazQ283E/vt+KY8ncz283H32/FV8m8zAjoh99vxSPk5meofNNt+2Piq+TuYhgHQgnf12/Ff/0ekfJzMzfoBcW67fij5NZoQPmG/fb8Uj5M5nM9E237YUu8m80DbUAT2PCXyfzQwfNT95vxSHk9mg2wx+834o+T+accKfvD4oOQ5mN8KfvN+KG5Bmc/mx+834oPk/mgP5qY4dZpn3pDyezVpnzUx+8PikfJ/NQTGGJ/iHxVMyDNGODvNjIMxqHxXoH4jNnYgVW4Gq1jRBp9K3SVrsqZrR09HgHtIDgfnGmQXE/wDKnDtzPD1qtQZa8tqUm0xFZsiDuh2GxrqAw9PLX0qZrMqOJqggQbmFzMU4jF14H6R34r3RBZpbJ6rQNt7LE50PEGCdyqDgPrbcSmXi51T2qXO5X5ILnQOZPBUXhpG5KReHgGbpl0CTw5KDVG8QVIcAY9qDUBPfZMPHYFTKkNJ/BSxwN5sdkVHdsxuQq1tjeYNkB0b7HhCA+TzSFW8IDxxMJaiSe1f/0vojXEA34LHrBseSNZ9gTNW3/bIa8xYpipA22SFWTcJh3YUF21jHNBIDQRdBdyJhAqEAN3QSNUxsjUIMo1Bp1XR0tpMgdoQ4tJ6vuUB0SBzTDpmbnimXBo/op1CxunrGqd+5IO9/BJ7g4SDABtCGvdMk23VteTJlecZl/nWqv0unW9xjTMXK9O+eksd2j8ExSDgS94bB4oNMfrWchYpGiIgV2D2FOnTZsa7Z7AUywDasL9hQKbARNYeBSNFhN6w8Cn0dMtjph4FSabZ+lbcfZKwPcxtdtAO1PewukDgP/aeieOybADb3r//T+hNaGtJBPasFWszC4d9d8kUxJAWgfKfAGG6ao9gS+U2XATFbf7IVHypy8gdWt90KB5T5dcaawB7EDyoy8CzK3gEvlRl/FlXwCG+VOAgno6220BIeVGA4Mq+AUnymwHBlXbkEO8p8DdoZVv2BI+VGCI+jqzxsEx5TYKJ0VrdgSPlTgz+jq90BU3ynwUD5qqCO5NvlPgwTFGrccgj5T4WI6OsLdiR8qMFt0VbbsS+U2CsDSrd1kh5U4IG1GtPsTd5T4F0DoqwncwFQ8pMuuYq/dR8pcv8A877qo+UuXG3z3cW7pfKbLg3qitP7qkeUuAm4q7/ZR8pcvDTDas/uhB8pMABPzs/uqflLl5FxVP8ACmPKXAfZq78kfKbL5mKwPcEm+UeAfUDGsqkuIFwF3TTDXO2U9EIiTdcrCQ3DgWs53+4rsue1wYZ62hp37E2VCaZBP1rKC8GJEBKRzEg37l//1PaHNnU6tbpafzVMuDSGmTHamc8wzjoYx5e5stEDfkoq5vVp0tQptLjTDwQbC2x7VeHzZuJr6QwMZzcIJMLd6TrSRspbUlu0Faznf2nRJ/UPv7WrZ6Vom14Qx0xFoCGmziZ9i082cPQ+KsfVi68OTBEiyCRCAbbKiW9qkxcXlEgCNyjUCDISls+xHqnmE3EEbJTNuaoOEARsglqQ5pzeTsqkQsZN5iETBFu9U2EjEQm2IQYSkFIkDxQCCg6YhIlpKNQAjmhuiDO6/9XAS2bXhVhyPOaRH2wvpFUt1mygP7JEc9lyMJfDgz9Z3+4rsimXUqRNgaTPwU1X0cPSBq1QwE2LnQsLsdgLF2Lp/eUux2BMxjKYn9pI4zLS2DWoGZ5X5qOnygkdfDSBGwVuxGVvpFvTYfSbEWiyTsRljx16tBx4Eq/PcCRPnVIE8nIZjcvE/lVOf3ljbUoYjNKPQVBUDaLgdJniFuGiL8SU2UTyt3qmUDoJJPdKxYugw4NzHCWOe0OB7wrqZTloI/IKEcJYsZyrLjduBoRt6iG5Xl4aZwNDb7AWnOUijUecvpAtZqh1MXnb8Vmdhsu81qYjzCi0U/WBpgkf9lPD4DL8U17hl1Foa4AamCSCAf8AlZjlGXD/AANDu6MLSNLKRiehdgKTTJaHGmIdAkpYPD5fjGEjLaTTGodQQRJE+5Yn1Mnpta92BpxYx0IsDx7rqhUynpGsOXM1OPq9CLDafFb/AKKy/f0fQ/8AGExlmXz+YYfb9UPgoqZfggBGBw5Mj9E3n3LTxQy/Dl4GX0D0Zg/Ntgnl71sYfDZfimudTwFFoaYINJtjy2VDLcIHgeY0DP8AlN+Cs5ZgDH5HQHMGmPgkMvwEGcFh4J/VBJ2XYDoahOCoQ0TakJX/1u4/OfJ9lOs70cHGmdLW6Gy46Qb8vWAXSwVLKMx1ClgGtcz1tVMATJBHsIIW56Iy8H8xon+BQ7KMuEg4OiP4Ueicu/8Ag0fuqauByygKerAUnGps1rBw3K1QMlaHl2CYNLQ69MXBMCFMZQajmHLmDSBJLBYnn7vFbdPLcrqUmPZgqMPEtlnBW7KMu3GCoexq1sVlmCpYcPZhaLHa23DYi661Vp1uvcbKDT2BMc4XEw/VpaeTnf7iu2x5OGpBu3Rs/BNrySLAdpumahDeqBPOFOu4sAT2JanA8+2FTXwZ4jayNb+W29lTTFxftQ9xtbjyRqPeE508vYgOgExdNskTcBZGHqkclhxbfyR0b62f7gstQzWc0PaSwdZs3EqXam8WjluqDC4Pc6pSa1okkyAAYWJmFwLGCnqwkMEib25rLSy6nXL20atMhtjTa46fDZZmZVVpS1nQsaTwBVMwGIZBc+mYPasFLK6FR73N82qGp1jfVPD8Qm/JQxuvUyk0XcWEt8YS9HUq5awPwrzoDmjc6eB7lkOTu300CRsdK//X+l0qIrVqlKni8O+pTMOY10lveOCzej6jXhrq1MF2wjdTUy2sGyKrJBEGCsTcFQxNd9PpaL6jfXGi4VsykUQKTK1NsyQDJJ5q/RtaZbWpj+EoOV1j+lZPPSUei68fSs+6VNTA1KbSalalpIvqFjdaB8nsA9/RilgtRcWkabkwJB8B4BbdHIjhgegbQpyPqgj/ALxWX0XiZ+kpx7UvRWI/WU/ej0XiQZD6XiVhfgCWgVn4c6Bqh52vusLcBha3q1MC+X6bOB6x4d/Ys9TITVlpbRGqxLZBKzeiq7fVfTA2i9lPovEh3r0jPaVpZrl9ejgX1Kj6ZY0gkCZ3VPfFV0c90mvJb1rXXBpPZoMm+t3H9orusB83pOAiaTdu5OlTL7QAQsnm7iN2x3oFCI6zbcZSOHc4yHNH8SRoaHdao2O9X0IDZL2EHtTFKD6zSP3kzQl1y2P3lPRSSOrbtUuDG1W03OGpwLgAdwP/AGqDBvF0zcbWJTa3SS4BY8WfyUyCJe0249YJHBf2pVxzi8l7A0NGwHatgjqgOYd+S//Q+nUqbqhLGgNcdLmyLSDMHwWQ4CoKL2teC97Q0EgiG8RYyry3AvwDXNNVz2E9UGec/wDQFv6uwqXutsV5in5K4ii9vQY9zKbWiaQZYkkl3HYkgxzE8Vkw/k1jaVbEGtmlavRqU3tZTfJ0kiASZvGp/fI5LXo+R+IoV+lZjzakaLRoI0046gEH6pJI/oFsYfybxlLEsrVcxq1NDaTQCXdZzagc55v6zgC0n4lQzyXxNPMqmLbihD3vd0Za4hwc4ug9awE8IkgTMBL5L44YjDVjmtZ5w2qSQSa0kEB8nYARaLLq5XgMRl1CqyrXfX11NTZ+rYWkm/eb3Uuyp7q1aq1/0hkNc0kbg3E9nCFj9COu41S53CW24Tx4wtrL8v8AMna9TnuIIcY7o49nvW/q/ZKNdvVctbHUfPMO6hNSnqA67LOF+BXOpZLiKeIbVOOrVDTdqYH3mTJn8BHBdrX2O8Ea/wBl3gjV2HwRr/Zd4Li5ll2JxtYvw76badakKNXpAZADplscbnfsXKo+SOMYxrDjRRbRcKlEUmaoqNENJ1SY3sDYGAV61riGiWme5VrBMaXeCNY+y7wXPzw68qrNDTccloObOptljaznfmF51obL7fXd+JXoWOIoUgBPzTQPBZGOOkui1kg47Nue1O4JBAPctR+PpUy5jtWtriNMSTHxkLEczwge/U8s03kiyyVsdTw4cHMc53rNDeLeayYXHUsTX6Kn1gAetNrR8fcv/9H6ESST2bBNrtMmJWBxPpehb9C/8WrZkg96bTJkq2uIaYNlgxbj5rcSNTY8Qtio4FxiLGISJIgS03WZsvBNKNXRmQDxiFrjD4wVy4U6hpQ7S1z+BDu3mQt/CYV1HES57iGU2tBLiQ88St6RzU1Nh3ri9FmVKsTQ+vWuXfVbLpMT2hQHZ/TaTrY8ucZBaOoBERfiZWdrceG4R5Je9lZ5qDVA0k247QfcqrMxzcTVq0nAsFUlrZ4dHA47TwWAuzqrgnNqS17gQCwNBPLjZKjWzigWUqhaQXBjBExbcn3rt1HDozcLlMZmPS9G54dRYSWnVd0SR4yPurG0ZxWaxlV+mHAlwDREPmd+Sg185oUTVq6A0PALWgEhp3I7exQKudnAdJhyTVeXuGrRIOnqSDsJ34roZScxbTqek6jXPlpaQG/ZEi3bK2cfL8LVZTJLiwwGuglaFJlUVwX0qzqUnowH3Zcb37+a7EjmEamjiEahwIRqbzC4eZYnG0a76eGbWcK1ENomm3UG1NZmTwsRc2suLh8T5TaWtZTxFU0ntrVX1YZ0gA61MDTYnexI5EXXtWvaWi+6cjmEahzC0c5ePRNfSZ6vBcp7iahvw8UzApzx4lf/0u2HHU+59d3DtK9PTaDh6Vham2PBUNJpuFh2qJBES0doITbpiNQ9hCxnC4Z9bp3NYXyDqnaNljfluBcLht9+tushwmFqNIfoPGZ7LJeZYUQ9kMLdtD4/7sFsdQGS5oJ3EhMOp6Y1snsK1nFpzXDkEH5mpse1q2obJv7UACQqp+o4QFhxZBwjgRfW38Qtus46otvyCmXEzAj2LLTa44hgAbOi0i0xxWCtmFdlLDvBpfOMu0Nu0xvusuX4yviMYKdVrNLqRcIAtdo59p8F1Sxp+qPBTUDWtkgQDdcRmd6atMOpMOsuJgRAgFsk7cQqqZ9SdRJpYeHmm5zS4iBHNUM8oa6gGH6tIGTa5kAR4rZqZg0U6FVlDUK7QWtsDJI4+1auHz1tSkHuoGKhOgCAYkxb2X71ZzyiGgjDETF5EXiPx9y36D/OMBSrOYGuewOIHCQua7NH0MViWPph7KZIDQADuBv7eKKedgvqOfhXCmKepogTIm3thQzygBedWCeZu0CLCBPeuvhalLEUG1WUwGu2tv2rMWtO7Qe8LXxvzWHfUYxmposXCwutOhjWjG08K7oqoNi9jYBJuP8Avaun0bDuxvgg0qZMljT7EdGwfUb4L//T+x9FT+w3wWhicSMMQ1raYHRvcJH1gQAPeVrPzR1Ivpvp03VA+zA22m87TNh4ldam2k9jXta2CJFuCro2fYb4INNh+o3wWlm7GNyusdA24DtXLqNHTOcIjiqLZuea8s4gVKg/bd+JXpxbD0mxE02iT3KKtKjXhlVrajQdjwWA4PBAyMNTgcYVDA4IiRhac7bIGAwPWBw1Lb7KfmGCMEYSkYkbKRl+ENhhacdyyDBYJo/NacRxCRwWEd/hqc/uptwOD0CcPTm/1VVLDYek5r6VFjHRuAs7hI6yTRKtlpJ5rFiW/kr73Bbse0LYqtGoXdb9pQQ0/bF9g5Z8O/oy+o4OdoYXCCCbclk8+ouc5raRe5jASOqLEA8eEFZcLiGV6ultN1M6A4EgXb7FtaHT67kOBA9Ymd1w253k+PqVMNXq6A01B865rQ7oz1ovNrm/BboxmXto6qdVr2h9OmQwA3c4Mb7Jt7ClXzLLaOJGGqYhgqvMEW4Am/gR32V+ksuLxTGNpapgNDhzjwm07Ssfn9AY12GeC3S7RqkcgduAuFjOYYCg6qGm4qw7hqMC/sW82rTrYc1aNQvbMCDZc2pnuBo1yyo3EBjqpo9OaJ6MvB0xPObewwv/1PqDc4yuo1zvPmANJFnDcf8ANxbe6ZzLKazCPPaLqZbNnWIvJB5WMnsPJdBlINYACQAIAB4JmnP6R49qw4pwo03Pe5xY1pJHNLC9HWw7X0iWNJMCALgwsxa6bVHe5PQ79Y73JhpH1z7kFhj13e5aFfE4ahrZiKpJpM6R0snSJInbsWrRz3K6rKVWnWe1teq2kxxolutzhIgxcdq67WENgPPusmGOB+kcfD4I6N0/Sv8Ad8Fo5u1zcsrnW51tjHNcx5cKp6u/HgpkmZgLzRLdb5I9d3DtK9TTLfN6PPoxv3JtE2a2TxhBpuJHzZHsKOjdPqu7JCYoPv8ANnsMIbSqB12OPKVRpVY9U+COhqFvqE+xM0alzoIhQGPvNNyANLg1w0uIsDxj/wBpxJuU7bbKqdmkAbLDin/klWBcEbntWw/pQbuZvHFA1RIdTJPOVmwukPqGo5gYGEEyRAspq0cuNRzXYhrHaQIFWDsL+AC2MJSpU69R1CsajjGsGpMLdl/IeK//1fsTy61mrjOyTKMfFEtY80XOMNqXBLw90x2tjukbFZx5P4NuGqUKbXUm1HMfLHQWlrtTYPYVrfJLLXV/OarH1qwJIqvqS6TxmNxNuSVbJsnwgpCs6lRJqh1PpKobJBkAT2ldCpSw4pVhUNNocQ+oS+C3kZ4bBYPQ+BcNGnWT1wOlJibT7lu0sMMNQ6OnZsk3cSuaMpwNbGvIxDyWvdU6DpOox5uXAczv7TzWGn5MZVoq4KkXaA8VKlIVXRqgQSO4DwSwvkfhcNLOle+iymaVGnqI6Nh1S2Zkzqj2LvgOa0NaGgAQAn1/2VixIBov6YsFMthxJgeKwYLoqTC3D1m1WF1h0ocAd4FluS/7LfH+iJfwaPFE1Pst8Upq/Yb97+i5eNyyljq3S1K9SkQzRUZTeAKjA6YMtJ34iDdc+n5J5VrqPqVatZxHRyaoBa7gZaBLxPrOk9q9I3WGgAAkcyiav2G/e/onNT7LfH+i082LzlleWj1eB7VoOa0OdJjlKgjUwxHtXlXECo8Fv13fiV6ikNeEon/Kb+CbSejfw2utepXFOqyi7pDUcDGkE+1W2owAF1Zs8tSp2KpNY15rt0kgTO87LDUx1JhfqqSG36t57uaVPHUqlRlNtSXVAC0Dtn4JMx9N73gVHNDdy+w3hZn4qnSa41KrYbv1rhUx7HmWVWmeGq61qur0phjJk06n/wCVtSdQgQO0L//W+hSdZuVbZ6NxG618WYwdQme72rZc5xcXNa9zZMSEm6rHQ8/wlZsNTNU16bmkB1MtEtndbFbAmsDOl7mhoYDIDY32Ty3C1cI6oKld1RpuJB3kmfet/WOR8FDqgkDS7e/VK5dXK3kP6Ks4GoDqmTu7VA5LH6IxDWj8qc5xILp1Q4SSQe+R4KX5TieiAZjH6nSHkh3W2juiPesuZZKzNjQZiKtUMZh6lJ4ZLS/Vo4/w+9cXF+SWPxQxU5joNenh6bHta/VTFLfjB1ceXabrcy7yaxGFxxxVTH1ajh0bWSHWa10kb3mYvJ7SvRvqAsNnD+FaFXAVX1KrhVDdRcWQwyJABnwWi3IcTTdUd56Zqafqm2mYv2SuvgaRwtA0nOc86iZg8Vs9KN4d90pdKOTvulY6rqdVuipTLmHcOZIXn8syA5fmGCxTalMNw+GZh3UmsIa4hsGp+9Np5Er0gqsJi89yOmZMX8CmKrDz8FPTsHPwXEzPAYnGYgPw72BtWk6jU1yC0F4OoQL7G1ly2+SuOfUcwYilhqTXtq0tDdR1t1aSSQDpvMEkgzfZevbUDWgOnVF4BT6Zh4nwR0rLb37FpZzWb6LrtBIJbwHauZULtVzbtSLiSCDtwXlqoPTVOsPXd+JXrcN1cJQLYvSb+CthlrrQLLWr4QVcTTrtfBYCI0g2Pev/1/ZHIcM8iXvNovCyuymm97S6q+Q8PIAABcNuCdPJ6VNjtNSoHfVcLaO0J0spo0nB9BzqbmxcAGYnn3p1Mowz26QSCR1iAOteZPNT6Eogud0r5c2JMG0QsmCy6jgqxqUnOMgjrRsY+CqsB6UwtrFlT/8AK2DpnYJfWEAFZGX1CNlr4yPMqpO5j8Vs1PWMEESdkgWhsC08Flo6uk0AlriwxHcVr6Mw1sINct13FxDb9v4+xdHAMrMeTUdVLSwQHmYuf+IW9KThI9q4rBjOkLXsxBaDLnanXPW2v+7sj8u0g9HWFRzI9Yw3qd++pGGONOIpGrTrxqDbuMAAEEnhJK7aEKahhhK5GIp5oK9Q0zNEVC5om56th3SqFfNOs9tEBmuA1zetF7791lNSrm9NjnUmh2t1tTPVEC8TxvZbeCqY99UjFU2hhaSNIjSZ28LreWDGuc3CViydQYSI3mFzamMzFkgYY1GFrtDmtJMgkNm95sVlyQ4no3NxTnmoAJD9xc/8QupxQhczGuxDa1N1IVXMg2YTGrUN47J3WFuNzdz3Dzam1oJglrjxFj7JR5/mxexjcIwF0AktdaTv3Qv/0Pq2XYzEYqrUbVphop2JH2uS31p5uJyuv+6uZVjVBFhdT1Zgi68jXePOa1/0jvxK9SwluGoAAn5pvDsU1KbqrRT6SrTHHQYlYfM2ixxOKvb10hgg0/nOIt/mKm4IH9PiAf8AUKZwQGmK+Jn/AFCp8zFprYgH/UKrzFoicRiTb9YVXmTSLV8QP/sKDgWafpsR/wCQpMwjKNZtUPqucAQNTyYndZ3Akcdvem0O1CfCFkAN9O61sSw+avEHgNu1bdRul2kNEfuhGgEAlrJ4y0LJSL2tq1GMa57GdWRt/wBusXpPFl7GNos+cBIMWAESd+02W/gsQ7E1agPRvpgAhzOBPA/94rd6Nn2Qk6myPVC5tPMdLntrUg5+sgNaIgXO5MHZY6md4WnTe5tB8tbqi23j7t0Oz3D0wzXhqmp8wGwZjda+aeULcHg6dfC4A4hzqxpFjiW7U3P4Bx+rG3FXS8osFU6BjcNWNTEBxphobDtPrwSRt2xPBY8v8q8vxrKL2UKoFap0YcG9UEugSTG8j2mN13nNaacgBcqtmhoYioyrRllN7oLR6wDZ8ZKqnnGHxFZlFuHqtqPMN1NtJFv+fBc8eUwZTrvxWBczobHQ4Ekguad9+uxw7gCd1v5VmzcxxmIwr8MaVSgdjsRAIvxN7xtbmut0TPshf//R+r5nXGX5diMayi2o6jTLwwnTqjhPBcnB+UJx2aDB08A679IJf6ukA1NVrFuoAC8zwXoRRpjZsSgUWR6qOhp/ZTFJg4Ln4jE+bVHMFNvqFwJJ31AQtZ+bCgD5xRYHipGkOuG8+2w4Lrimx7QYmdiqFNoEaUdGzktLOKbfRVeBfTZcuoyHOcA4AjioILgCLOB9i8liBGJrf6juHaV7BjgMJRM36Nv4JB+qSLRwVaovEqQ60xEqgQTabdiJJdvMojeeF0aiXCFTZEnhKchxPDsQBAEiUAy24hOGmJgBWxoabbDksOKd+SVYkEkX9oWxVazWdT6lu0fBSabNBOupBPMfBZcM6iwVC/U5mgyCAZAvskMfl5Ib0AJIiNDeB29yz4PFYOtiSzDs0Pc3UToAkW+IW/pP2vcpeDG53WlTq5fUpa5pBjnOPWaBJa7ST7CRftCh2JytgDjXwwaHapJbYjj7wjz3Knt/OMM5rdhLbXHxHiF//9L6dizljKNKhiKLcRSM1W6gHj96/Hre9Fd2Usc9lRlAl1MVCNDesBt32VGtlIdSqEUA4nqmGy3d3s2K6DHNqYcPY8lpFjIK5rs5y04qphaz+jc0vBdVZpa6IDoJsYkSstDMsuq1TSo4ugXNcGtDXN35Dx962xhqLiHFjSRMEtHHf8VbaDGu1NaA7mAP+8B4K4P2isOL6MUHGt1qcQWkAzKwa8DSFTEtdR1NlzntAnhP4AexZcHimY2l0tJx08JbC2NJ+17kQefuRB5+5c7HYvBYatRZi5dUdqfTig58AESTAOkCRcxuqGIyxrjpxGFa51zDmgmfisrMXhtYosxVHVq0BgcJkcI59i2dJn1vcjS77XuWnm4IyquZ2bOy0KkPdpfBHcpbxG8814vEOHnVbf6R34lerY1xwmHA2FNvfss1AlgebzZKo+s4CHEAclBqvEa6ukkwJIugVKrgHNeS12xBsrbUqOBLXTFt+KoOqltnHxTD3W+c7N+Kqamk6XkpNfVudRJWs91R2ZYdtRxPzdQxP7qzhrr27lbGGQT7ZVMaTPV48FhxtMtwlUAbEH3rNUZVNQy1hvxd/Rf/0/pJFQfVpxv6/HwWTDNJqua7S1habh21o+KyjKKQAdreC0GD1bE7nbt7leDwdClVFai/XpZoHWBAFuXct8F3FvvSeTG3HmuF8nqT3FrsdXqMl+mmXMAYHPD3AQ2SNTW7nh2pVfJfBvoMp1qtUsawUpdUHq9UNG3DSIWav5P4TElri54eyoagc146rjpnh+yPetnD4XCkU209D/N6fRthwMC3hstV2T4R7oNR7ulbpANUdZo28Fkbk2EZZsnTLQDUngQfbcrepUvNcG2jTYdDBAl11ysX5M5XjW1WOa1r69Vz6r6ZAe4lpBBMSRBmOEBVR8m8FhH0qzDUb0BDp1xMRuYmLDjfiuw2oCSBpJF4nhwVNfqB0wYMG6AXzdo8Vr4xjqtIsLWt26xPaFz3ZNhHs0hzmw0McG1BeNge1buBwZwVI02M6sAAF3ALa1VP1f8AMjVU/V/zI1VONP8AmXKzLKMLm8HF4dji2jVpNDtJ0a4lwkWI02PatGt5K4TE5lVxj6lUuqUqlLQHjSwPbpMCLFZ6PkvhqWIoYiC91FrGN1BvqsMs4bjmu4C+bsj2py77HvWlm2p2VYgGnbQeK5OktvvIATvJsJ714rGP0Y6u2NqjvxXtqTtOHogxemFbS3Q8GPFSCA4XEdi1sVhvOeiaXxoqarbix2WuzLsU3SfOw0spaRpkXHYpOBxbKxptq62Okio5xsDNlVLLMQx7CMVqLLu6xgmBv4L/1O3R8nMYwVPyXCVGOpmm2k9/qPMDXIaJiIv1o4rvZVhsXg6Jw2INKowPe5tUVCXP1PLrjSALHmV0CdJtJ7lq1C30phiYANOp/wDlbAdcWIVtJLhfwVA2cJgDtWvjav5DVl1rGfatitiKJcSKgM8VDcRRP1wPYVlYG4htRtJ2s9EZHgpfgcwBcWYuQ9sEPcbEmSfCyz5RhXYCh0D9ILQBLdjv8V0dTealz2xvsVx6mV1wajqGJ0awfVJBBLgbGLWCmpluNe0NOM6QBwdpc4iYM7j2+5PCYHH0saytWxxfTH1ATERttdU3LatOi12HxBbWLXMcXOMQRaI5LDTynGtNMtxYY1lMsgOdxG8/92VnLMUIIxpZqeXP0udfYW9k+K6lJ3RYUU3vLiJE3Nptv2Ln4jLKtTEVa1HEdEajnGwP2NIPYU6GXYhj6fS46o+m0jUwkkG1xtfYe9FTL3tpgUK5pmXEuDnbTbvgWhZ8uwz8G53SVtbXCYM2K3+lZEz7lrY1tPF4Z9AugPFybbELWw2D6Ku11Wqx8Oc50W1GZaT2hdLpGfaHijpGfaCOlp/bHijpWfbC4WbYbF4l7jhCxwrUH0Hl1TTolwOra8QVyKfkzmvzrKNbDYZoqNrNe4l7n1G6tOwb1ZINyTIvIXs2VOoNZAdxE7FPpGfaCDUaN3Ba2ZVGHLcQNY+jP4LlF3WbqM2H4L//1folmuAmSvD5m8ek8Tb9K78V7OmCMLRBj6IIqMqkDoXspl0Ekt1LB0OOO2LpwOPQ/wBVTcLjYnzymf8A6f6pnDYyJ88YCOAo/wBUdBjP/mMt/k/1VdBjb/llMAX+h/ql0ONBEYxgJ/yf6rIyhjT/AI1lh+p/qkaWOggY5hn/ACf6qaWDrDEsrVsSKmhrgGhmneO3sWzpdJ4AjmraHW4Rx5qhqIPetTHD+zq1gLcCseMp5h5/R6F0UAevHJb4EHeea2sB9K8AcF0ESEKXmG+1UiyEQAiySitPRGwiFY2CaEESgC11NtYgiIKaLSJTX//W+yRdBhRSjSZP1j+KyIQhauZ3y3EfuFcZ7XEjTeAOPcl1i4X29y8Vj6U4+uS4T0jvxXtKJnC0OfRhPWFWtpFtuKXStJsdzZMVBBIQ2pq7B3Ic8cCjpQdwE+k9aNk5MWtKWu4n2FPpbC4PCyYqhpiZtsqp1BpNwCTay1swf/ZuJ61wzmuQ/McU4Nd07ht7ExmGL0kiu7dU3MMcy7cQ8E8kxmuYEz53UnvT9LY474x/sKXpTMHO/PKgjhKZzPHkT55UMCbFIZtmBdbF1NMc1JzTMCPzupftR6TzAC2Lqb/aS9KY47YypvzT9JY4T+V1d+aRzPHD/F1Y/eSdmeOI0+dVdpjUv//X9OMzx+n87rfeVHMcaY/K6kEfaUnMcbH53V+8l6SxoI/LKs8tRTGaY6LYur94oGZYxokYurO/rKhm+YkT55UtaEzmuYyD52+O0oGb5hJnFv8AFI5xmOr87qR3oGb5jMeePg9qfpXMQDpxTxFzBR6Yx49bFvkHmgZtmBJjGVIQM3zAug4yoPag5rmIicY+yxuzTMKg0Pxb3B1i2V3SZcZuNI3SbUHqxbuuvEZiZzLEQf0jvxXs6Y/JqDdpphNjQGvLodp70y4Ewym2++6oNl0dE3sN/inLWlreib70iRwptHZdIXcIY0R3qh/pN24goJAn5lluUqw5rmWptB7ZWu+o84rDU2Q1r9UgDeAshbBv7YU6C58qqbDpcINlhxzD5hiOZYVwbkN4jSJConq2EEqrngUaTJIPBAb1gCALWJX/0PQ6d5PtCvT1CWEyB7lIbO3AJQRAMlDvVtA4KdHVibogEesU9MC9whzQ0zY24JRbsCA2DuVMEGDvEIFjEzdOA5p5pubsARMKQwzYzG4WQA7m3YoAGo9VBiDHBQ0TcgBXBizkmtkRO6Yb1t91Onry0hU7rbFS0S8Xjrcl6VzYqHrcEg0kwCIjivFY9o8/xF/0jvxXuKVMOw1AkbUwZVMZZ9rLHUY8U3GmJeB1RO5XOdhczbQNAiSbtcHA3kGCTw3WzSp4sUaznNIrVHtI1RawmPesBGcyNJpgECdQEzx24fBPFU8yOUVej1jE9I0t0ESWh4n3SubjML5RYmiXUnVWhtOHAVGsc46RAEWEOkzxFleGw2fUMxpV8QK1ejTIYabKo67WteNRBIEklpPd2L0TKZOm5HGDwWCqIzDCCY+kNu5f/9H6OWNNyfcp6oNxunTmCYWvjiRgK5P2CuCBrpsO0AboIJ2HhwVAQZM9namLS07cymdp3A4IgkGZHdwTiG77jksZmZuITBJujciUnCx5JtDR2ypJMxw7EiQARFykOqIVNmJmT3KQ4tvCY35SkLx+KfVBEb/ikYExchVII0koAM79WNlDjGw3U3hMnqSSFYa4AHwUk3HBEgGUi6XETFkAy9p7V6VzgXzpiQLpMqdYGJG23FeKzLUMzxIE/Su/Fe5oud5thxEg02oe6sxh6Gm2o4nZztIAX//S9+KmPP8Ah8OL/rT8Ey/HTIoYf/yH4I14+BFDD9/SH4IL8e4Nmjh4N/pD8FWvHl3Vo4cf/Yfggux5I+Yw4kfrD8EaswBtSw4/jPwSDsc0gGlh57ah+CkUsRVxlCrVbSa2kHTocTM+xbFyY2GygmAALgIpvdJBEDZa2MBOArhpvoK4cEME3MBUSbwYKYJMO/6FUQSXX5I+tEbJmNJJHeqmxExaygAkmTciykcOzeUC8FBPhxSGw7ShxE3RpBFgZQWweaQkReEOBc6AYBTAa0gbpaQW2QGi0pOaCbFUWjdQAQbGAmRxPBKBqt7Uyy/9E9hvuv/T7wYSbwmQTfkk5psSApaNQJNl6dzCCL8B+CG6Q4WkeK8TmWkZniQT+kd+K9xQI81of6YTJknrIaZYdXBIWJEbqg6NjKNQ9aFRAsQTskbGxk96XSaZgkk9qeouINj2KNYAg2KCQ2OeymQDM2HCU6ZkkCIusOKB9HYjrD1HLhD6NnMC/aq6txvCAAD1eCeqXGOCZuL80yA6QDxQG+uSbKG3fc8EG/qo2Ek7IMaYmZ5ouRG/JSWw2CetKpz4AQAd0zteFOnrnsuEyOPGV//U9GBz9qRLdSRgGdVjaE5B7kAb28VIi90iA10cSmY0778UNI8EdrZCHAi1jxTMkTaFHqlswQSvTubL5mLDh2ItLQCZPGV4TNXA5riZ/WO/Fe4ok+Z0Lz83F0g/q6oAjdJ1UxHNNtUmBsEnVbi03ukKztFx3dqptUAm822lBqODi0HZHS6uHep6Ugn/ALCnWJgkqmv1gmePBBu60iEmPI1AO71hxLz5jiXO4MJkLigyxrtW7RvwTM6ZJtKJI9nJG99jwTc4zGrZMv4AE8ZComGwJlYwTqIJNx3obqiZO6//1fQOdIEGEtUi/HsSDnNMiVc2sd7oJJ3SvETYJ9a10GqdAAAEbEbpGSIkpsFrkm90nWdYR2qXHU4GUPBDuMcU7kQCpsQRM9iRdp35KXHUwA2PBXTsBZI1Dw9qYeXXOyCfGFA1Ai8iea9J0rzUc0OJ2A7LJtc4GCbheKzEu9I4i5+kPDtXt6X5tS4dX/kpFg59/JDhLtUzIR6wgD1UAhouAXdqNjPDdItkk/igtJjUYQQNk9M2TZTIAgz3obT2FhHJUGdm6G0y0na5WLF0yMvxJ/YK/9b0QpkMYBxaEi3TPV96fRkE8eaBTJBm3K+6NJJg+qLmyoN6sk27EDaDflKgNh20pukGYAB3QAD/AO03NnhKIJ24c0i3ZNwIJ2khDWdWyoNsN+5LRB2HZCAzSBxM8UjI2klIjr3HikHTJcFJBmwJCc2hQd9hbikQJkgpXA23QCZ3lMzxsENNwRJhEdb4pD1hB4rv6XCqSBuL+CyN3vMErxmZR6SxPVH0juHavasJdRpCNmke8pho0XgkqWgteATIhMjTFt0OBImLotG0lf/X+glsWKJ5tkIcDAER2JsuPV35qhDTAV+qLC5Q1pETA7wm2TI37lrYwH0diQJjQZJXC06WMcOLQm0gX3vxVNOqTBhMSDyCRcQ5MGReEyOpGwUt2NilaB4KoNgNktp4+xMHSOGyXarsLxKRBDZBiUAgtBBCmADfZMAetv2wpBDSCT7kTqm8rGSdUQm4kAWupk9YQkHWiPcpdJG5kKd5SAJNhZAa7VEnwVCRIDQn1TEwpFvFf//Q96Wus4DgLR2KdJkAArxmZFzMyxDdO1Q/ivc03DoGbbHh+0UAtFkEyLDxQBIuR2AJgAxpHigaSCiGwJugEHiArDWkyZ24IcOtO1p70NjnZH1bH2lVp9W8wnMbm88FgxricBiLASw7Lz8ktY68aQqhsS0i9kpIlvFZJERYJEgjeBCTGnSbCDxVNAIMnhZSwEuIkCynYgGLJxzPFMnt3RqnklLSYMFVPcOZBQXSIk3CbZJAEFIjbUY7kgZaI2G6mZaBKR084hIXNyhxuJlf/9HuyLw0m6VgbWlAdbt5IBBubIAmdgENIt2rIBJ27VLjJCgtaRc3JXpoAIOq2gBAAcZJO8RzXiMzP9p4mx+kK9myTQYNJsHf7iiDyuEg3RN5lEPD7Qrl8SYsnTjjuk4XgDja6rSRB0g+5AcQ2DN/ckTAJMntBTGo+1BLnP3gBPriJF02AkuIN1r4kOGCrt4aHLgsJNKnzLQqkhsE+5ULesN0jZ449yPVNlQbMiTKIcLbwOKI606Y9qTrutO90iCRY7cEOJmCOCfZx4JEQZIkyv/S9BLhMDdF4niPeiTEnfsUlznOG4hMuIi3GFOoukcEdaDIsgggEceaR1AiygkgO5Ig6W7jjKcCZ3KRBMTYIAM3MgpkGRp4Ktgd7JXtY9iCHathM8V6RwJa0GPVB9yQadxuSvF5qwDNMQDM6yvcscPN2XvLv9xSJGmSbo0tIJN+NyhpDW7DvCC4EbxfiqAAIJcD2KSW8IlWIcYkCApDpuLgbylqmBaRsgOiB2XunZosbFIEFwmwKYOkEgysWIc12ArGd2O/BcBrh0NIj7IHuVAtczhujqnd3sQD1r3sv//T9ESDu0IJGozf/hAPK6YNyOahxgyqNQ8QFJqAxaE2nUJmE3GAT71LnAA8e5Kzm2dA7UwQ0CSLhDoIEESL7qdUgQ0bqGkGxsecp6jsIsnqB9aJQ9wIg2CAAZgd6QibkgdyWqOSHAxP/KARqEhPUNXCUSJJNk7RBO/JFjYnuXpWQWNFvUEzwsm5zQ4XhomYXiM3qN9LYmBbpCvZNp/MNMR60/eKbmutA23CZO0CbWMpNaXbC/ESgsLwJFkBlgRwtdZCSG7A+1NstbL4mViLXGTFjtCA0m5Mdy//1PftabTf2ogiRCYa4x2K6Q6pm6wYljjhKwHBpPuXAax4o0uENVkWHiUwDplpT0kEugXHghxvvwTAJGoJNbIMnfgm0auPDZS9pgAC6kCGxufCEiJsARCvifcm4EiBYclAYfckWWhFyQhoMgkKhFtljLYkyIlKxIIugCSTHBW4agL7cUXk9Y3UGmdWrnwQW9ntTddsattk9JIEn2KdJDiSNlQaCBA4plkmCkWyJnivTMaWsYAbljb80FhJ223tuvFZtPpXExHrle0YfmaZg/W/3Ff/1foZg31I2E8BbdNouHE+KIAB4xwQb2sIukSLjYIJGmeI3RYtJAgBNrZi1lBJ5bFSXFx6g3sUS4HSbc+xZWAsBKx1zqw1cAEywxHcvPijXFGmDRf6v2Ssgo17NFF9v2eCG0a8kdC+P3SrFKuXkdA+APslHRVYjon/AHSm2nVEg0KkbjqlHRVoJ6GoI5NKjocQX2pVLfspDD4lx+hqET9kpmjXA+gqb8GlBoYh36CoP4SgYfEER0FS3HSUeb4gn6CpH7pT82xQaQcNUvt1SpGGxIJnDVPulHm+KAvQqW/YKRwmL0tPm9QjtaUHDYkD83qHh6qnzXFkD5h88tJR5tihIOGf90qegrCSaVQGNtJTdQrlwAo1NpjQVbaFYtnoqlv2SkKNcG1Gp7WlI4esRq6CoDP2Sg4fEaSOgqfdK//W9CKVaCOgqT+4U2UK5j8nq8fqFV5tXLvoKkHk0pdFXmDQqfcKYo1tM9A+37BXfB6jJbs0b8LLI1wEQDsvE5vTac2xJj65XsmD5hsc3iP4imWHTAPegstsN0BhBJEQjo3XNgSFQa7TAgHeSgMJkkQk1jnCO2EBrnXFuCprCGi9+axhjtZmIKOjINid1QpHVJdccwsmlzrWsoY20tgEcVfzhcPnJtxRNTbWSecpS+8vuNkwahBPSGYUuL2sJ1kAC91jo124inro1dbdgQVk+c0kl/BSG1Q+S+D3o+cAkvdc81Lmvt84R7UgKrbCpIiN0+u4aekJVQ6Y1kd6AXWaXnbf/pQ5jyNWvshPS+I1d8FS8uN9Rtxlf//X+hxtqeSe9Ig365idwiC0tdqJ4yieTjyCJqafpDfe6YcQyA8kpB9UujWTbwVdcm1Q+KHayIFQ+KOvEl5t2pAvJEvNk2ucHktqGe0qi6pI1OJgKSah6pfZGhwIOqSgCpYt9q8Xm4f6WxN/rle0bApC4MPfb+Ip6hy5Km6SeSchok8OSOrIJJJ4JzKJJESY7lbGwAk4EXjjupuLbIaQCIdeUOdNwfciDqEm5TpyAZJ9qbB1d0zH2boaSHQjckgzw2TDJeYnbisdWmHMM3BsRwWOjh2Yaloot0NGzQqgQQTfmlNyATMcl//Q+iySZJPgkTNuxNrTF+9PTY6Y5pgCLSUyJ3O6nSZ1X3iEOsLGxuUpJDYsU9Oo3MJQAIjjwQbN3kfgp2G1u1AdYiIRqB6reBumIkxKAHNcReEy4EGDw3SDri/BMvt/ypJEzIKrcwEEEjULCOSRcQ6DfuVNcXPMCANl4nOHuObYn98rvYnN6mGxlXDebscGVHdYuImXTyUjP6smMLT6o+2fgqp57iKgluFpC/F5+CsZvinmPNqF7+ufgqbmWLP+GobTd5+CpmZY09bzfD3G2t3wWUY3Hhs9Bhvvu+CoY7HESMPhvvu+Ck4zHu3oYX7zvgmcZj9xRw333fBPzjMHCTQwv33fBArZhH0GEsZ9d3wVCtmJ/RYT77vgsjKmY6p6LCQf2nfBf//R+g6sxN+jwg5dZ3wQTmhtowf3nfBWDmhAingx/E74JA5o3qluEnsLvgic11Q4YM+13wROaRZuD8XKS3NSSQcIJ5FykszW/wCZye1ynoc1kn8jnh61vcn0Gakb4O+/rfBIYbNeeDn+JWMNmpO+Dv8AvfBZGYTNzMPwYjscmcJnJ2qYK/7LkvR+cNuKuCmOTkNwGdOF62CH8LkvR2c/r8Gf4XKvR2czPT4P7jkOy7OSZFfBD+FyTcszrc4nB9nUcoqZbnLGFxr4Mxw0uWDoc12/JOe7vgq6HNQbeZj7yZo5reDhPFyQo5s0b4Pl9b4KyzNtX+C/mSOHzaT+ZfzJDDZqL/kc/wAXwT6DNrfmX83wQcLmxdM4L+b4JnDZsTvgh95I4XOLDVg4n9r4I81zeTLsF/N8FYw2bwQDgh974LkYnyWzDE4mpXdXwzXPMkDVH4L/2Q==" /> </div> <p class="paragraph"> РИС. 10.4. Вид сетки DataGrid после считывания данных из XML-файла вставки строки </p> </div> </div> <!-- end .note-content--> </div> <!-- end .note-inner--> </div> <!-- end .note--> <div class="note-bottom-left"> <div class="note-bottom-right"> <div class="note-bottom-center"></div> </div> </div> </article> <article class="note-block entry post"> <div class="note"> <div class="note-inner"> <div class="note-content"> <div class="post-content clearfix"> <p> </p> <p class="chap">Резюме</p> <p class="paragraph"> В этой главе демонстрируется тесная взаимосвязь и интеграция способов доступа к данным и XML на платформе .NET Framework. В частности, показано, что объект DataSet обладает возможностями чтения и записи XML-данных и XML-схем. При отсутствии определения XML-схемы объект DataSet способен вывести его на основании анализа структуры данных в считанном XML-документе. </p> <p class="paragraph"> С другой стороны, объект XmlDataDocument образует мост между реляционным и иерархическим миром XML. Доступ к данным внутри объекта XmlDataDocument можно получить либо XML-совместимым способом, либо реляционным. Изменения в одном представлении автоматически реплицируются в другом представлении. Разработчик базы данных может выбрать наиболее удобный способ доступа к данным и манипулирования ими. </p> <p class="paragraph"> Методам и инструментам реляционного и иерархического доступа к данным посвящено множество специализированных книг и учебных пособий. Невозможно в рамках одной главы или даже целой книги полностью описать их. Здесь следует лишь запомнить, что ADO.NET и XML-объекты на платформе .NET предназначены для наиболее тесной интеграции и взаимодействия друг с другом. </p> </div> </div> <!-- end .note-content--> </div> <!-- end .note-inner--> </div> <!-- end .note--> <div class="note-bottom-left"> <div class="note-bottom-right"> <div class="note-bottom-center"></div> </div> </div> </article> <article class="note-block entry post"> <div class="note"> <div class="note-inner"> <div class="note-content"> <div class="post-content clearfix"> <p> </p> <p class="chap">Вопросы и ответы</p> <p class="paragraph"> Иногда в документации по платформе.NET, помимо XSD-формата схемы данных, упоминается XDR-формат. Что это такое? </p> <p class="paragraph"> XSD-формат — это стандартный формат определения схемы XML-данных, принятый консорциумом World Wide Web Consortium (W3C), который специализируется на создании Web-ориентированных стандартов (более подробную информацию об этом консорциуме можно найти по адресу: www.w3c.org). Еще до окончания работ по созданию стандарта для XSD-формата компания Microsoft решила создать собственный временный формат XML-Data Reduced (XDR) для определений XML-схем. После завершения работы над стандартом XSD-формата в мае 2001 года Microsoft перешла к полной поддержке XSD-формата. Несмотря на то что на платформе .NET Framework схемы данных сохраняются только в XSD-формате, они могут считываться в обоих форматах для совместимости с прежними унаследованными системами. В наборе инструментальных средств разработчика .NET Framework SDK предусмотрена специальная утилита xsd.exe, которая может (помимо прочего) конвертировать схему данных из формата XDR в формат XSD. </p> <p class="paragraph"> Как конкретно ADO.NET автоматически определяет схему данных после анализа XML-документа? </p> <p class="paragraph"> Алгоритм автоматического определения схемы данных хорошо документирован в справочных материалах Visual Studio .NET. Для ознакомления с ним следует обратиться к разделу Inferring DataSet Relational Structure from XML (Автоматическое определение XML-схемы данных после анализа реляционной структуры объекта DataSet). В нем приводится краткое описание алгоритма, некоторые особенности анализа таблиц, полей и отношений, а также ограничения алгоритма.  </p> <p class="paragraph"> В этой главе описаны два способа доступа к данным: реляционный на основе объекта DataSet и иерархический на основе XmlDataDocument. В каких ситуациях следует их применять? </p> <p class="paragraph"> Вообще говоря, не существует единственно верного и универсального способа. Каждый из них следует применять в зависимости от используемых источников данных и поставленной задачи. Платформа .NET Framework позволяет гибко использовать данные из любых источников: реляционных или иерархических. Независимо от источника, данные можно сохранять как реляционные или как иерархические в соответствии с конкретными потребностями. Кроме того, если источник данных и полученные после обработки данные должны иметь формат XML, а вы в недостаточной степени владеете технологиями и инструментами XML, то поставленную задачу все равно можно успешно выполнить с помощью реляционных инструментов на основе объектов DataSet и DataTable. </p> </div> </div> <!-- end .note-content--> </div> <!-- end .note-inner--> </div> <!-- end .note--> <div class="note-bottom-left"> <div class="note-bottom-right"> <div class="note-bottom-center"></div> </div> </div> </article> </div> </div> <!-- end .note-content--> </div> <!-- end .note-inner--> </div> <!-- end .note--> <div class="note-bottom-left"> <div class="note-bottom-right"> <div class="note-bottom-center"></div> </div> </div> </article> </div> <div id="sec_12"> <article class="note-block entry post"> <div class="note"> <div class="note-inner"> <div class="note-content"> <div class="post-content clearfix"> <p> </p> <p class="chap">ГЛАВА 11</p> <p class="chap">Web-формы: приложения на основе ASP.NET для работы с базами данных</p> <article class="note-block entry post"> <div class="note"> <div class="note-inner"> <div class="note-content"> <div class="post-content clearfix"> <p> </p> <p class="paragraph"> До сих пор демонстрировались различные способы работы с базой данных на разных этапах создания приложения и способы использования результатов выполнения приложения (на основе объектов DataSet, DataAdapter и Connection). В этой главе эти способы комбинируются для просмотра информации из базы данных в Web-среде с помощью Web-броузера. В контексте платформы.NET Framework Web-страница, которая применяется для извлечения или вставки данных, называется Web-формой (WebForm). Прежде, при создании приложения с помощью технологии ASP, единственным способом извлечения данных из реляционной базы данных было применение объектов ADODB.Connection и ADODB.Recordset. С появлением платформы .NET модель ADO.NET позволяет использовать не только новые классы и параметры, но и встроенную поддержку для работы с XML-данными так, как если бы они были элементами базы данных. Описание новых способов работы на основе технологии ASP .NET начинается с базовых сведений, а затем приводятся более сложные понятия. </p> </div> </div> <!-- end .note-content--> </div> <!-- end .note-inner--> </div> <!-- end .note--> <div class="note-bottom-left"> <div class="note-bottom-right"> <div class="note-bottom-center"></div> </div> </div> </article> <article class="note-block entry post"> <div class="note"> <div class="note-inner"> <div class="note-content"> <div class="post-content clearfix"> <p> </p> <p class="chap">Обзор технологии ASP.NET</p> <article class="note-block entry post"> <div class="note"> <div class="note-inner"> <div class="note-content"> <div class="post-content clearfix"> <p> </p> <p class="paragraph"> После изобретения возможностей использования серверного кода для создания Web-страниц разработчики пытались найти способы его упрощения для конечных пользователей и разработчиков. Рассмотрим следующую бизнес-ситуацию: пользователи могут осуществлять доступ к Web-узлу, получать базовую контактную информацию и звонить по телефону для оформления заказа. (Не так давно именно такими ограниченными возможностями обладали все Web-узлы электронной коммерции.) Проблема заключается в том, что пользователи при этом хотели бы видеть выставленные на продажу товары, причем таких пользователей может быть очень много. </p> <p class="paragraph"> Для организации такого взаимодействия с Web-узлом начали появляться разные языки и технологии создания сценариев. Одной из таких технологий является технология активных серверных страниц (Active Server Pages — ASP). Она предоставляет средства вставки в Web-страницу кода, который выполняется во время обработки Web-сервером поступившего запроса. В контексте разработки приложений эта новинка была революционной: по крайней мере теперь разработчики могли использовать сценарий на языке VBScript, который выполняется на сервере. Этот тип взаимодействия постепенно начал превосходить другие подходы на основе языков JavaScript и ActiveX. Кроме того, язык VBScript был расширен таким образом, чтобы вызывать компилированные COM-объекты на Web-сервере и включать их функции в Web-страницу. На этом этапе появился Microsoft Transaction Server, который теперь называется набором компонентных служб Component Services. </p> <p class="paragraph"> Итак, что же произойдет при смешении серверного кода, клиентских сценариев, а также кода, откомпилированного для обеспечения безопасности и масштабируемости. Именно эти компоненты и образуют основу технологии ASP.NET. Полученный в результате такой комбинации ASPX-файл позволяет использовать мощный серверный код, основанный на полноценном языке программирования, которым привыкли пользоваться разработчики. Теперь поддержка языков программирования С#, Visual Basic, C++, FoxPro, Perl, COBOL и Fortran осуществляется благодаря общеязыковой исполняющей среде (Common Language Runtime — CLR), и эти языки могут использоваться в специальных Web-страницах для более полного удовлетворения требований пользователей. </p> <p class="paragraph"> Кроме того, все ASPX-файлы компилируются и кэшируются, т.е. после использования ASPX-страницы она компилируется во временный DLL-файл, который фактически выполняет всю работу при поступлении следующих запросов. В результате повышается производительность и уменьшается время задержки ответа на запрос. </p> </div> </div> <!-- end .note-content--> </div> <!-- end .note-inner--> </div> <!-- end .note--> <div class="note-bottom-left"> <div class="note-bottom-right"> <div class="note-bottom-center"></div> </div> </div> </article> <article class="note-block entry post"> <div class="note"> <div class="note-inner"> <div class="note-content"> <div class="post-content clearfix"> <p> </p> <p class="chap">HTML-элементы управления и серверные элементы управления</p> <p class="paragraph"> Еще одной новинкой технологии ASP.NET является использование серверных элементов управления. Серверный элемент управления кодируется в Web-странице, а все его события и свойства обрабатываются Web-сервером. Серверные элементы управления аналогичны HTML-элементам управления, но обладают существенными преимуществами. </p> <p class="paragraph"> Любому разработчику, которому приходилось создавать Web-страницу с формой ввода данных, уже известны HTML-элементы управления. Для программирования формы ввода данных используется элемент FORM вместе с несколькими элементами INPUT, например для создания текстового поля, списка или флажка, как показано ниже. </p> <p class="paragraph"> <input type="text" name="txtxName" value=" "> </p> <p class="paragraph"> Элемент INPUT также доступен в технологии ASP.NET, но для работы с его содержимым требуется создать клиентский или серверный сценарий. В рассматриваемой бизнес-ситуации поставлена задача обеспечить полную совместимость созданного приложения со всеми типами Web-броузеров. При использовании клиентского сценария всегда существует вероятность, что какой-то Web-броузер не поддерживает данный сценарий либо выполнение сценариев отключено по соображениям безопасности. Для исключения этих проблем и предназначены серверные элементы управления. </p> <p class="paragraph"> Еще один интересный аспект использования серверных элементов управления связан с технологией ActiveX. Эта технология основана на использовании "толстого" клиента. ("Толстый" клиент — это компьютер с богатыми функциональными возможностями и ресурсами, которые часто избыточны с точки зрения сетевых вычислений. — Прим.ред.) По причинам, полное описание которых выходит за рамки данной книги, использование вставленных в Web-страницу элементов управления ActiveX, которыми можно управлять через Internet, было крайне неудачной идеей. В отличие от элемента управления ActiveX, серверный элемент управления не содержит никакого кода, который выполняется на клиентской стороне. Клиент получает только HTML-код, а все операции взаимодействия с пользователям выполняются Web-сервером после получения соответствующего запроса от пользователя ("posting back"). Далее на примере объекта DataGrid показан способ применения серверного элемента управления, который принимает набор данных, обрабатывает его и создает HTML-таблицу, которую можно отобразить в любом Web-броузере. Следует признать, что она несколько отличается от стандартной HTML-таблицы с данными. </p> <p> <blockquote>НА ЗАМЕТКУ </blockquote> </p> <p> <blockquote>Серверные элементы управления можно создавать с помощью интегрированной среды разработки Visual Studio .NET.  </blockquote> </p> <p class="paragraph"> Завершая сравнение HTML-элементов управления и серверных элементов управления, рассмотрим приведенный ниже фрагмент кода ASP.NET, предназначенного для представления серверного элемента управления, а именно текстового поля txtName. </p> <p class="paragraph"> <asp:TextBox id="txtName" runat="server" text="></asp:TextBox> </p> <p class="paragraph"> Этот серверный элемент управления выполняет точно ту же задачу, которую выполняет HTML-элемент управления из приведенного фрагмента кода. Единственным отличием является то, что это текстовое поле обрабатывается Web-сервером. </p> </div> </div> <!-- end .note-content--> </div> <!-- end .note-inner--> </div> <!-- end .note--> <div class="note-bottom-left"> <div class="note-bottom-right"> <div class="note-bottom-center"></div> </div> </div> </article> <article class="note-block entry post"> <div class="note"> <div class="note-inner"> <div class="note-content"> <div class="post-content clearfix"> <p> </p> <p class="chap">Дополнительные преимущества технологии ASP.NET</p> <p class="paragraph"> Описанию технологии ASP.NET посвящено множество книг, здесь же описываются два компонента ASP.NET. </p> <p class="paragraph"> Первый компонент связан со свойством IsPostBack. При создании ASPX-файла (или, иначе говоря, Web-формы) ему по умолчанию передаются данные. Свойство IsPostBack используется для того, чтобы избежать появления сообщений об ошибках при отсутствии таких данных на Web-странице, которую пользователь еще даже не успел увидеть. Свойство IsPostBack имеет значение true, если данная Web-страница запрашивается пользователем, либо значение false, если данная Web-страница загружается самостоятельно впервые. Ниже приводится фрагмент кода с примером использования этого метода. </p> <p class="paragraph"> If Page.IsPostBack Then </p> <p class="paragraph"> ' Обработка данных. </p> <p class="paragraph"> End If </p> <p class="paragraph"> Конечно, ASPX-файл или HTML-файл можно использовать для передачи данных другому ASPX-файлу. Это позволяет создать файл с нужной функциональностью, например переадресовать пользователя после проверки и исправления данных к другой Web-странице с помощью метода Response.Redirect. </p> <p class="paragraph"> Еще одно важное достоинство ASP.NET связано с процессом доставки готового приложения. Для этого достаточно скопировать все файлы с одного компьютера на другой. Конечно, на новом компьютере под управлением Web-сервера Internet Information Server (IIS) нужно также создать новый виртуальный каталог с помощью консоли управления IIS ММС. Для этого выберите команду Start→Settings→Control Panel Administrative Tools→Internet Services Manager (Пуск→Параметры→Панель управления→Административные инструменты→Менеджер Internet-служб), в появившемся окне Internet Information Services (Информационные Internet-службы) выберите узел Default Web Site (Web-узел по умолчанию) и щелкните правой кнопкой мыши на нужном каталоге. Выберите в контекстном меню команду Properties. Появится одноименное диалоговое окно; выберите в нем вкладку Virtual Directory (Виртуальный каталог) или Home Directory (Домашний каталог), в зависимости от используемой операционной системы. Если выбранный каталог не сконфигурирован, то в группе элементов управления Application Settings (Параметры приложения) будет присутствовать кнопка Create (Создать). (В противном случае этой кнопки не будет и тогда следует щелкнуть на кнопке Cancel.) После щелчка на кнопке Create и конфигурирования каталога щелкните на кнопке OK для закрытия диалогового окна. Теперь выбранный виртуальный каталог сконфигурирован как приложение.  </p> <p class="paragraph"> Совсем необязательно инсталлировать интегрированную среду выполнения Visual Studio .NET на любом Web-сервере, на который нужно скопировать Web-приложение. Для работоспособности такого Web-приложения нужно только установить платформу .NET Framework, которую можно бесплатно скопировать с Web-узла компании Microsoft по адресу: . </p> </div> </div> <!-- end .note-content--> </div> <!-- end .note-inner--> </div> <!-- end .note--> <div class="note-bottom-left"> <div class="note-bottom-right"> <div class="note-bottom-center"></div> </div> </div> </article> </div> </div> <!-- end .note-content--> </div> <!-- end .note-inner--> </div> <!-- end .note--> <div class="note-bottom-left"> <div class="note-bottom-right"> <div class="note-bottom-center"></div> </div> </div> </article> <article class="note-block entry post"> <div class="note"> <div class="note-inner"> <div class="note-content"> <div class="post-content clearfix"> <p> </p> <p class="chap">Доступ к базе данных с помощью ASP.NET</p> <article class="note-block entry post"> <div class="note"> <div class="note-inner"> <div class="note-content"> <div class="post-content clearfix"> <p> </p> <p class="paragraph"> Ядром любого приложения баз данных является база данных. Для использования базы данных необходимо иметь надежный и безопасный способ подключения. На платформе .NET этот способ реализуется с помощью пространства имен System.Data и одной строки подключения. </p> <p class="paragraph"> Учтите, что доступ к данным связан с рядом трудностей. Одна из них заключается в том, что пользователь может не иметь прав доступа к базе данных, включая выполнение запроса на выборку данных. Еще одна часто возникающая проблема связана с сохранением имен и паролей пользователей в простом текстовом файле, который обычно не отображается Web-сервером для внешних пользователей. Например, при просмотре кода ASP-страницы очень редко можно встретить следующие строки: </p> <p class="paragraph"> Set Conn = Server.CreateObject("ADODB.Connection") </p> <p class="paragraph"> Conn.Open("server=myServerName;uid=sa;pwd=") </p> <p class="paragraph"> В примерах данной главы используется параметр TRUSTED_CONNECTION = YES, который означает применение надежного подключения, т.е. пользователь должен быть идентифицирован операционной системой Windows, а аутентифицирующая информация о нем должна храниться в SQL Server. В большинстве практических приложений в SQL Server не принято создавать отдельные учетные записи ASP.NET, если только не требуется ограничить возможности пользователя лишь операциями выборки данных. </p> <p> <blockquote>НА ЗАМЕТКУ </blockquote> </p> <p> <blockquote>Учетная запись ASP.NET используется по умолчанию при анонимных Web-запросах к Web-серверу с инсталлированной средой выполнения платформы .NET. </blockquote> </p> </div> </div> <!-- end .note-content--> </div> <!-- end .note-inner--> </div> <!-- end .note--> <div class="note-bottom-left"> <div class="note-bottom-right"> <div class="note-bottom-center"></div> </div> </div> </article> <article class="note-block entry post"> <div class="note"> <div class="note-inner"> <div class="note-content"> <div class="post-content clearfix"> <p> </p> <p class="chap">Включение учетной записи ASP.NET в состав учетных записей SQL Server</p> <p class="paragraph"> Для создания надежного подключения (на основе параметра TRUST необходимо иметь учетную запись операционной системы Windows, которую следует включить в состав учетных записей SQL Server. Кроме того, SQL Server должен быть сконфигурирован так, чтобы разрешалось использовать аутентификацию операционной системы Windows. Хотя большая часть этого процесса уже описана в предыдущей главе, он рассматривается здесь более подробно для демонстрации прямой связи между управлением учетной записью ASP.NET в SQL Server и использованием надежного подключения на основе параметра TRUSTED_CONNECTION. В данном примере рассматривается редкий случай создания отдельной учетной записи ASP.NET в SQL Server для ограничения возможностей пользователя только операциями выборки данных.  </p> <p class="paragraph"> 1. Откройте программу SQL Server Enterprise Manager, выбрав команду Start→Microsoft SQL Server→Enterprise Manager. Раскройте узел используемой базы данных и узел Security (Безопасность), как показано на рис. 11.1. </p> <div> <img src="data:image/jpg;base64,/9j/4AAQSkZJRgABAQEAYABgAAD//gAcU29mdHdhcmU6IE1pY3Jvc29mdCBPZmZpY2X/2wBDAAoHBwgHBgoICAgLCgoLDhgQDg0NDh0VFhEYIx8lJCIfIiEmKzcvJik0KSEiMEExNDk7Pj4+JS5ESUM8SDc9Pjv/wAALCAEnAcMBAREA/8QAGwABAAIDAQEAAAAAAAAAAAAAAAECAwQFBgf/xABFEAABAwIEAgYEDAQFBQEBAAABAAIDBBEFEiExE0EGIlFhcZEUMoHRFRYjM0JSYnKSobHBJDSC4UNTc6LwRFSDk7LxY//dAAQAKP/aAAgBAQAAPwDr0xrKl5EZkkIO2cqXVVRSyvjLpI3A9YCQj91b4Vnt89N/7XKvwpPe3FlI/wBUqPhKblJL/wCwqrsRmI1dJ/7D71UVspHrPP8AWfeqemyE6l/hnKq+sedet+M+9VFW76Wf8ZUGqObYj+sqzqpxa0WP4j71Q1Tuw+OcqhqnE3AJ/qKsZyW6t37HFR6VrYtueV3FQKknq5d/tFWdVOFrAtHc4hDWOItZ5N/rH3qDVO5X/EfeoNW7sOnY4oKsk3yn8RUmodqCyx7yU9Ju3Rvk4qfSibDJ+quypsSHRjbtKxioGto2+0lGVIuAI2796njWJBibvzU8cZvm26qeOLW4TL+CGUj1oAPFtlQzi5PDZ5KwnAFxG0dttFInJ1EIdy2UGV93Xg9XfQ6Khls7WMDuKkTdb1G+Sl09gOo0+xRxhraJnkv/0Nhz3BtzAADsctgqmbrXyN27FImJ0yMv4KWue91uELg2IDVBlGvUb5IJHH1YgeejVaOR2YgQguHLKrNdIXEGEA9mVY+I67rsaCOVlLpCwjPE3UbZbLNTAVE3DyMYLZibdizuipWE3lI0/wAoe9GUjZZLtNxYZbR3c6/crTUXAaHSRyszEAF0FhfxugomiDPI4g7kNjBt4m6wVFM2KJzw4nTNqy1wtugmaKGIb6dnesFHEySoY2SR0bS7VwNrBTUCkEbjE93EFtzfNvf9l0IHYQKKn43BDmBpNmElztb5tL22vqb8lD/g10LmOmphUSQ24kcbgwOzDsB1tm1stbDvQWUFVHUGLiXdlc5pJPVNraa694SdmEsizQvlkeI9nXF3dXu+95K4jwS7xxZgMoLd9zfTbcdUeaxU76SKukEbssfo5aHOdu/KO7TVWpPg1kMMkxBkDgX3ub9ex/26qLYVxYiRvcvIJsND+9lSOKiENM6doDn2c6xN7ZnA39llIfQvoGcQBsgaSd+rryHgsZdh7a6nMItEx15HG5uL6aeCs92GvkiLrZQ5xcMp2JB/K5HsVWjDsjASA5oabgHXR17/AO1bD4cKyZ2xlzL3JJIIFzbx3HktCpdSGICnjyu4jiSdTlsLfndIHwR1EZc3NGGkuDxfWx7FnaKV8LQ98DYy0Zmhpz5vG237Kgjw6zbm7tc1ibD1dtPvLIxmFsqY3B4cwEF9we7l2b3uqROoqeupZI3XY2RpfcHQafnusz58Nma4zZnECw7fpX/b2L//0ewybDoo6gQBrXPhIYSL2NwR7bXWZtXh5Ile4CRznOIA0BcAD+59i155aF8cJjF32ZxC4HQAC9vbdS6TDC+V3BHzpyjUDLcZfZa91MUuGRSh4juWyg3y8rjl2Wuk9RTTVULssbmCV+YOba4Lri6zSGiJzRSUzZiG3zNu0C5vsLE7cthZatcKQTNko5ImtZ9EA3JznXba1ueyyyVNA9sj3sL5iO/KTre3ZyVHS0HHlcIA5gjbw7C3Wy638z5JNLhzuLwoACWgMuDvm9yu2rpoHyCAtABa5l26A2sR5FWiq6czEMcQ1pecryTxLtAAv433WtVOhlxV04e10b3gkEGwGm62KhuHvkYXuY1wFi2MaWv2gDXbksEbMNzESF7Q1rTcXOc218LE38AVSdlG2I8Il0mnaAN7/stlk9DJPHNUZi0Fg4djlAA1v2rXbJRljC6IZg+5AbyzH8rW0WUuoRTveGtJsG2y2JOU6js1tqs0FZTxlk5JuZGGQW36pB/NYJZaIgiOJrHZdHFtxy0t56qzaujjgyMY4SGN7M1tdWi1/aqumj9Mq3Ai74y1rh22F/0Pms8lfTPYAxhzl7C7TlcF35gKrqrDnPzGn6okDtrE9dxOvhZatbLDVzte11gI2tJy22CmiaI5nkOveI/ostXFSNgZJDUOkldbMwx2t7VkgfwTA4vc3VpuBtoqvqJXjLJUSTAubZpDu3fVbMVQ2Cd7nlxAb1WAXD+49y18SkbUOlla5+V0XqubYMOmi1KYgU7RmP8AwrrYXhNNWwOfNUSRuzkNDRut2Po3ST34NbIQw5XAtFwVl+KkDhrWS7/UCgdE6a3Vq5CDt1Qh6JwX/nH/AIQod0TgaL+lS/hC/9L2reidMWk+lynuDQqHopT2/mZdT9UIeidLYXqpRf7IUO6JUrf+pn8gnxSpP+5m8gpPRWkbH1qib2WVT0SpWgfxE9j4Kg6KUdx/Ez/krHonSEj+Jmt4BR8VKJrvn5zbwUjorRgg8acg+CSdFaM2Anmb42VfilTWs2plJ21AUjonSWGapnv4BD0TogMxqZx5IOidGb/xE9vYr/FOiJP8RONO5B0SosulROfJT8VKIbz1Hm1XHROgv89UEWPMKg6KUGU2mn8x7kZ0Wocw+Vn1PMhB0YoLkB8+/wBYe5Sei+Hh5Dnz25XcEHRjDwDczHn6ykdGMO3vNb7yqejWHXt8sb7ddS7ovhxAs6ZuuozKB0XoCbZ5vxBVPRnD2nUzEfeCfFrDzoHT2+8jujOHj/Em0+0FPxaw4j1p/wASl3Rqgy7zn+tQOjmHH/N8M6Hozh4H+Lf76q7o3hx2bLfverM6N4dbUSX++pHRvDSblspt2PUno1h2b1Jbf6i//9P2vxaw7NZjJR/Wr/FjDGu1jl1Gnyir8WsNG7Jf/Yqv6M4c46NlbYcnqR0aw9oDmyTh3c5Xb0epHyBglqBpe/EUno3Qs6/HnFhraQ6qj8JwlrW8XEJGOe0FrXz2NjtophwDD3RktqJ2ta8s1lsCViq8Dw8ARiSd7nNLmjiEjS1/1XlY6ksYG5du5eoweKJ+FVOdo0k9bm0dvsWxhDiydsbWSNDr5rttmsDre3gt2ron1M7pWvtliysF9zr/AGUYZBV07nNqZMzQwBrQbgWWxVtfLA+KI5XOFrnl2/ktD0OtDQx8mYREZCJCBYcvFIqOuysa6ocMo6zhKetpp4cl0RmEQJIzW17ytGtoaiplzRThoABseTgd/K6xw0WIMazNWk2OoJvfXt8CfyXTdZwBJsLri1WEvbictbSxxMMjWBxZZj3euXda2l7sv22WlNhmPu9Ge6vaZIcxkeH6SE7EC2gtpbv7l3YBK2CISuBlDBnIN9barh43gmJ1tZLU4fUshvECzM4i0vq3NuWQlI8KxqKlhp/TMzGxlkjRJlPqZRY201uVUYb0kZDC2DEWNMcYa8OfcPcDcW00BsGnuJ7Ln0MUb46eJkkhe9jAHPP0jbUrlYzhmIVhqX0dc6le+GNsdrEF7XucS64JtqNiL81q0tDjUWNPkkqHcB4Y75y4FnDMCLaktBG/NegcRuCbdinNZ1hbtVnEmxG6N09Y29qsS4kEXsEjcbnQ3sdFXWxdYC4VY83EF77qxFidDe6//9T6Y7Ne2UKLk8tbKTYOseXJUNraeSAHNoLi/apYMxO+vIqou7cG3ggbY7aqxFrEsJJ3S1hbbXdRlsSb6KBo+5uFGuhF91Ju7Te3cpyGwFlGXlfmrjq72upzWINt0zWPO6nc7DUclB16qa9h052QuMc2fK51mk2aN1z2VeIukIlpwInCwyNIde/eVoyYW+epbNLTykjJ1s2oAaBYDbcLokPdRuY6CYZpS6zbXA9pWNrJDNCHRSNZGxwJdbmRbY9y8Ib3O/kvddGY2nDpZDzlOhNuS6UU8E7XthlacpLTZ/NZLNbZ2a3i5REWvaSxwdqb2cVErmsa+R1yG6kAm61o66J7Xl9LOwN9Y5SQPG2yzSSRsjkkfxMkeXSO5Jv7VrRVlJLK2JoqQXuygubYX/4Fle9jKaSUtJyMLrBzhfS61DUvY3rQsFr3+Vd22W66FgIGXQ/bd71r1dRTUrC0i7xrlzOsNOZX/9X6FQ1QqmkOjALWtILXEgg37deSzueyNnEyEttyuVjinilfIzJ6p0IJIO2v5q5DbuBYLWBuCVqmtjiqg2SFzInnK2Uk2LuxbFbKKWlkm4XEygAAG11jpKhk8b+LG2EsfYguJB0HNUxSthwujM7oi5zntjjja4gve4gNG/aVjwvEo8QZURyQCKoo5jDNHnJANgQQeYIIKrXYvBh7iXwFzXPyDK4lxNtdPatinroKiimqTTyR8O92vJB09qhstU1hM9A1rdwWz/lutsGNzWlrTYtB1J0Usjja4uDBcja5UBjCCQAPaUjazOCWgW7UDWl+w33U8NhJcWjVRwo26ZW7d6qY49iweKgxxnWw130VOHFtYXvuNFPCjuTYXtzJVWxstqweau1kZAswA77q1o9DlFghLNgxpCgtZY5mgrGQw6ANt2WUCKLMLMGquRHawjbmVGMjaD8mPFZGMjOrWhS4RXBLBccyFdoYG3yA30OinKxrtGt71BEQN3Nab7aKuSF5s5je62igMhtYsHmVIbE24LR+a//W+mWjAAyi42UHLbQC420Q2Gjmt130WKqdHFA52VpsPNeCipXSRh4cRfuXrujpjGDyMe8AOkIIJtcWCy01BRQy5+IHua+7SXbDkFvTNhnZke6MtBuOtZVp46eja5sbmdfUnNy5BRJI2SB7BKxrnfWd3LXdC/8AieDJAz0m+Zok0JItfZbcnBlp5ITKxocGjNm0NjqtCmoYqOpbMa2OweHkantNvzWy8CWKVmbLxGZRc6DRc6tpJ32LKiNziAPk7C2tzfN+y6rHsZExjpWuLRr1lp1TXufMIywte1uvEAtpbsWWiiFNSBssrOJu43uT2X9imUQzQcN0jQQ3Qkka+xYmU8UVUZnShzRbKCTfTZZmyRiSRzpWkEDcrG2GFzOG90To36PaG6EcvCytPFG6gNGyUtuMrXE6halNQv2rqtkjC/OQ36R7/JR0ipnYjhzfRZGiennjnia52jnMcHWPjZVwSldBLiNZUuDJa2cP4RcCWNaxrBe3Pq3SuopJKyCpgMUnCm4li7KdhpfnsFtU0T5aOeOrMbJJi8nIbjVa1ZR1FQWEyRVTGNLRG45A03vm537Fv044FJEx8ge5jA0nt0WaNzCC6+tiqhwOYhylkrXEXd+SBzRz1UcUEEXJ9iF4sL3ty0Vc4ItqfYVUyEA3vbwKqHttzFzpcFSHhtrm1+5f/9f3/Ea1wN72WTiNzdx7ApMoFgSfJVc9pGhOnchc2wJcfIo1zL6Enl6qqXAa2PkpLw0XAN/AqWuN9zfssrxuAOWx/CUc64DSD45SoMlhluR/SVZsgtoHd/VUPcCQRmt90qrnNZqbj2Kz3ABpB/JVLgSBv4BZHub9Yiw2sVSNwO+9+xWcOrmJO/Zdatc8NoZw0ElrCfVOmi5OD4bFPhUErgbuBv5lbPR90xpHsjmczri1rW1vfl3LsRNe+SOJ9bIJHkgWa1wJGvZposgjEedzq6RjQcvEMbQ0nsHbsUaYtvhUk3y6xt9yqJ6cyCM4o4EkAEsbqTfTbu/NYpa+lixJ1FLiMsb2Oylzo2hgdlDrZrW2IKzPno2FjTjLS+RzWNDXMJJda2w53C3Dhb3b1s3k33J8Fvtb06fyb7lHwU+9/T5/JvuT4Lkvf4QqP9vuUHCXH/r6j/b7lPwU7/vqjzb7lHwQ874hUn8PuUfAx/7+p8x7kODOJv8ACFV+Ie5SzCzC8P8ATJ5ANcryLH8lz5Z+GWulle0vnEYy66k2C//Q99LiNFG5wdiTRk1dmfsBe58Lgi/KypFi1BO1uTEAS86Nz6g/259i3DG5thxXknS+ZadPiEM3pIY+pBpQDI112kAg20J7tjYrIcSpWn5SoljJzCzifo72UxVkL5WxMqJS95sGnMtnhvLx8o8j7ytFG4E3e8ix+kVThvsbvky/eUxNIe2z32v9YoIy5xBfIdfrFTwdT1pB3ZisZhs0DM/8RR0QDALvv3OKgwgNGr/xFQYSDo9+/wBYoYbkDM4f1FUfE7LYuefBxUsYcurpNftFSGuJABk07XFQYi/W7wPvFVdF2GT8ZUcAHXNIL/bKlsbhoC/xuVPBJbu7tPWKhrbuA6x12zFZOHlvq7U69YqXxgiwLj/UVDoARu4/1H3qwiAbqT3dYqrorkEZtPtGygxj1Wlw/qKuWXbYveezrFUjZYE53nl6xUyxm7rOcDbm4qGxaDrPF/tlQ9pvu4j75WKqhaMPqtXX4Tjq49hWvgF/gSm05H/6KjoxT+k01QBLwsuU5iL9q//R+mw4d6PMypdV52QZnEZLHay0xiuE1Icc1QyMuuOTQdjbxufNbzafDZ2U13W4jbxMLrFwFzt7UpaDC6praqmkMwcQ4StkzB2lxrzFiFWr6PYdV1Zq5I3CfjNmErTY5g0NA7x1QbbXCwnAsMiqoGCeSOZrxIxhkF3OBbc2I1vkAP5WW/JjmFQmVsuI0zDCbSB0gGU3tY+S2W1lM+AzsmY6Ju72m4V2zxPYHNeCCL3UmVgt1hrtqpbIx/quB0voVZERVfqwjuXnKmGKsZJE+Coc1kuYPiNiHA3FiCuZU4BTTMDIo62JxjdEZDdzsjtXAEnmTdXOB4Zw42DD6nJHcNu69rm/b2rqic6AUsw000HvWnBRRUzp8tPWP4zQ0l7wS1ovoDfvParuooCBmoKhx10Lhz/qVxBE2RswoZ2vbqLOG/hdbAqJNb0k48verNlk3FHP6p+r71VtRIWEehzD8PvVo55C8fwcvh1feq+kSteP4SW5OxLfep48ji61HICPtN96xy1MkYzvpXgDnnb71k4k1r+hvNv/AOjfesZlnAN6Zw/8jUEsrtXU0hN+T2+9SHPda9LJcfab71QvkdqKWS3Znb71V8z4YzI6mcGt1PWashfOHaUr7X/zGqHvntb0V1/vtUOfLt6K643+UaoL5r6UjrW+u1f/0voYklNiKR58JGoHTO2pH6j/ADGoDK03FI8H/UapEk7r/wAK7t+canFnAJ9DcQBfSRqtnqD/ANI4f+VqE1BJHoxH/kCgOn0BpT/7Gqokmvc0jz4SNVnOkB0pJfxt96NdILkUkg/rapLpsxtSON7f4jVUvlOnorgfvtR0kjGHPTusBcnO1Y6t0jsOn/hyGmF5BL2n6JWt0fuMDphYbO/+ir9EIy+lqWh1ico/VeihowxrmvcXhzS03JK85V4ZLDelpaWXhtkuwACxF773WxiOBMrMPom1NW6lkpWkB7NXC4AdbXm3MPb3LQg6PUckktLHiWsxaWxmIgxho1yai17a+zsW9N0TzzGSOvfCA8uaGM2BcT27i4ANtA0KYOiggrYqs1LJHxuYQDDYANFjbXc6nxKq/o3WMxN1dS10cbmySSRsdG5zLvvqRmsCAT6tr87rawfBJsLw6SgfVRTQvJdbgEEOO+uaxF9hYWWSLo9EycTPmdIbgkHnbl4JL0cppXNdxHDLf2A7AeC3aTD2Ukz5I3aPa1uUCwFgtxERUebMK83PJamqo2zCOV0py6gEbarS9NxAPbZ7AC8hxzNNgTuNfyWWnrKx1TE2eaIRkDNfLrprfXtW5NUwOBayeFp7S8LM6qoi8ZamO1tesFU1dJm0qI9ftBSamky/zEe31wv/0/pAq6U71MelvpBTHW04c61RGBlNuuFHptMWH5eP8YUsq6YOBFRH39cLG7EKa9xNFYH64U+n0wOk0Wu/WC16qqgkhs2aNxztsM3eFjq6mJ1Q6eOVoeyJ1iCSC7S2nmtKWrq3Z8lTaxuTfTUDRvfcldWCupzG1klRHmsL3da5srispWmzp4vY8LH6bTAWEzO7rLXq6qF9FK0SscS2waHLHXVBlqg+nmYHNaQ3M4ZQfeqMnquH165jXaDrEHQ7nRRSVE4qQaqraYxf6Q17PZuqNkna5731DSJHZiI36gm+mvsUGpqxlLasAFlnDOLk8/Z2LZoKtwc81VQ1wsLHPe3at702lBsJmealtfSi/wAsz2FY6qsgdBIIpxnc0ga87Ln4i8PoKJmWWpLCONHDNkc7qEetcfStzXMDukAZTiWe5ge9xAc3r9V2TW2u4vcanVVrKvpBUYbPBd0UwlzMex7GnIHMtqDvYPJ8V26idjpY5WSMbJlZZ8j7FpBJII53uAtZlRWuEhNW3iOAyniN05/ujJ6yOMNZUsbd13fKNOtydO7VZmVVS2eJ0lazhDVzbgk6nf8AJdEV1Le/pDfNUnrqZ8MgErdWEaXWrWTQyMGUh4FLI062scot+6x4DLbBacX5O/8Aora6GaRzjub+69OudiNJU1EUggcxrjtnF+YWHHKepeKaaJx4cTrytGlwuXhsbqnpGyqjDjFHEQ950ANl0HU844rmNEjQTlZxAXa/SuOzsVpqKrnwSakc0ukI0PEsX637Db23Hbpdf//U9zSYP0gjhbE2pbTxDRjIyGljcxJBAFr2N9LDlpbXM/DOkfEeGYiCzrMj11A0yuNxqTrdWxrBK2qpoGQ5ahzYHRgzP+bkNiJO+1iNNQDoscWG9I6dkH8dxi1oMuaT1jkaCBp9fMb9hC3ujcGLw0oOKyOc/hgODn5iXhzru2FgQW+Xn21ClFV/qHmvKYpWyUlDUyRRMfJxiAS0EjQLVwqSYVvFqaps+WAyugawAHS9tuWi7bMTgdSyyigYHRuDSw2G9+7uWdtQJaeCSOghJkkLHNLgMtr92uxWqMXjAA9Bja8kW1FrWzHW3IWWR+L0ofOxlM174icjW2JdYG/haxU/DVFkGamINr2yDUc7eY80kxekZdopLv2DS0Dbcf8A5dWnxekgjzeiOzEuAGQakafrorDFKTiCI0jg83sMgO3reVluUroaqBszYmtDhcAgLNwIr/Ns/CnCjH+G38KGJlvUZ5LzmM9JoMGrn0s1EXlsYmu11vk7OGbb6wa232gVkpek1FVQRF1JKJpdGxtaCC4FocATbbONTZVb0rwptCyrqYHxh7C63DDtQLkDtN7DxIW1TY9hda+RkUTrsY54JjAzAWuR277phGKNxEyRyUccDmMjkytfn6rwSL9Ua6crjvXWbFER823yXHxzF24PLE1tCKjNG+Qhua9mkXAAabnXnYabrEeleGjMPRakhrQ57uCAGjKX3316rSdL7duiy4djdNiOISUkdK5vDLw5zgNCwhpBHifBdrhM+q3yUGGMj5tvkghjH0G+SnhM+o3yThMv6rfJDGz6rfJaVfXR0L42+jmQyX2sLbdviF//1fpcnSGla8sbA4uABB0tr392nmqM6QROkjhdRO4j2tNmkWuToL+1doxRuNyxpPeLpwYxtGz8KcGP/LZ+FTwmb5G+ScNn1G+ScJn1G+S5OOVHCgNMIQWzQyku+rYf3Xn8Fe0YTAMwGh/UrpdDbcOft0Xp1CrJcRnLvbRacj6g0k5lYG/JutY35eC8y+vlp6yaogmiaaeEWD9Q+52HeuhiWMYnFU0votO97Hshc9jYy7RznB50F7NAadPrLFJ0ixiOnklGDzOe18jWxtgkJcG+q65A0d2bjvOiiPE8ZnwepIJiqDPHHFI6KxjDst7tI5X59q0o8b6VkmWTDpi3LxmsMBGhIYIzpe92ucednBdCoxnG47ZMNkLmTOaWtheeI0F4ve1gOq3v10UHH8dbW+jswR8jHPDWz5HtaQXZQSCLjZxPYLdqyuxPHJ6ammio3xSNldxojERnaGX0vtrsTuRra9ljjqsYjMdRNUT2MVK7gSQtaHPe4iRvq3uBY76c9F6dSqv0YV5mtZQto55K+q9GibUEA2DsxIFgAQbnwC2cMwXC6aH02OUTQviJa64LSwjU6DXRbXDwbKy8UWt2i7Tp49m/NTDPhEUZdC6FrTZ5y7a6A/qoc/CI2PhIY3hXu0NNxyNvOylrsKmaKdzYnBrb2cNNgdDz3/NZuHhrmg5YOQF7XF//AMVooaGpBljijffd1u0LK6ipXBrXQMIZfKCNr7qGUNJGSWU8bSd7N7rLLFDHBGI4mBjRoABoFdF//9b7KdlyK+qwYVJbXmDii0fyrdSLF4Hh1CfYrxsweambIyOm4RbnF2gWBym9jqNm+QUwU2CywxyRw0hY5rHM0AFhYtNuX0fyWQMwykjM8TYGNjaGFzLdVugA08APYOxa8FFgrHSQwxwxmN1nta7LY2BsfMea6cHByZYS0tbpZpvZYKmekgqGCcWe8EB2W9gSL68tbLWbDgMbCGto2tfvbLY7t/QkfkslM3ChXk0zIRUlrnZmDVwcQXG/O5AK6CKUUXRa89RRxPaKmWFjtcokcAfZdYjNhQOcy0gII1L27nZUp6zCZWsninpcr2hzXZmi4OoP7roC3JSiIi5eMup/R3xvaDM6KThnLe2mq8bhsuXD4m57WvpbvK73Q31Kj2L1CKDsqht2WfrpY3XKqYqM1bInUMTg25B4Wg25+1ZMaxCXDaeOSmpmzyPfww0k6CxOwBJ9XYC/klDiza/CHYhEGloa4ixNja/aO5cpvSyOBzoa6mZxnBj2iF+Zrs1rA3AIN3AeRWdvS6GWppqaKlkdPNYlgc3QZMxsb2NtFDOm2GSNzMZM5tmuLsosGuJAJPL1Stik6UUlXUwwMhnaZrZXPaA3Vube+unYu0NRdf/X+yOYH2uAbdoUqVR/qFecqaSOsp8vpUlLPDWcWGSNgcQ4NtqDuLEhbtDU4fUUQwyHEONIIjD1z1zYWJI7Vm+CAcxdUOLpfnjlHXHZ3LGejtJZrQ57WhmVwacufS1zZWOBse4ufUSF+YODrWOh2Uw4JAyMCTruDw4G2wAAA8gFjHR6DhMjMz3NY4ltwOe//wCroUVG2igEMbnFg2B5LYRERQuHjPReixitNTPJKx7oBAQw2Fs2a/juL9hKxQ9DqKBtKI5Xg0rSGEtaQ67Wt1FtdGC3esMvQailghh9LqGiBpa0sIB1uTc211II7Mostqm6L0tJSVVNTzPjbUMawWscmW5BHtP/ADVYZehsFRVGsnrZXVLpBK9zAGtc4aDTsA07e9dbCMKgwbD2UdOSWNLjmIFySSdbeKvU0MFVM2SVuYtaWgHvt7lqx9H6RsTo8zjm0JFgefd3rNS4ZBS1bp4nPDnElwNrG630RFClaNZhNPXVDJpc2ZmW1rfRe145drR7LrkxdCMOhy2qas5Gta2729UC+gNrjc7dqzUnROippqeUzTSmnIcxryC24aGA2t2AeS7oFgpRF//Q+zIubi9KyWF05cQ+KKQNGmtxr+i8LQloo4735/qvRdDTcz6Hb916pFCBabqun9KMBAL+bTbtAusGIPineaaeCKaEWuyRt7ndZMPqKedksEVO2JsRDS1oAbqL7LiUeK4GYYhPhUVFdkc0LDEwgiT1S3LsSRbkbrcoX4DXMIp8Pp3SCFsnCdA0Oy2Fv2CyMq8IZH6RJRRxO6r3fIgnW5abjnqT7U+EMIgj4sFMwPALow2HKTcbg259q2WYzAGMEzZGSOA6oYTqRew07wo+H6DIXl72tFvWYRujMcpi0Oe2RoIBF28r2v4e9ZJMVjbR+ksikc0OykEWI7yqMxmkqJeBGXveTbRunjfsXFq2SvbKYopJBxHtORpJFwFp4DSti9FibTTR1N3udLwjobWAN/Fehw+PFmVcZqnXh4ZaRmB15HxXXUKURQpRERea6RYLX4hiUVRSBptEGBzpLBpubna4NnaFp332WGnw3pT6RmkrWRwCMZI2ykkODvpXGummn91hlwjpY2d0lNWxgytaHvdMScw0JAy2A308Nl1cNw3EoMWFRV1BmjbFKwF0l75nMLerYWsGm67i/9H7MuFjuBS4xUxObMYmxRPAc0DMHktsRcaWsdRqtJuE9JiJHPxSzsvybWvs0OyO1PV5vynzG2i2sJwzFKTGpaisnM0LuKGO4hNmlzSwEaXNgdfzXoERERcvEaCsq6qOSCqfFGwAFrZHNv12l232A4d1/auL8B9JXwlkuK3dkDbtmcASARci1+Y2PJbGH4JjMM1KKmvk4EVs8bJ3WdZoAG19CL7631XpRcDVSiIi5eL00khbO2xbFFIHC+uoXzuCbJC1tjp3r1vQ0fKT6bD916tFBUMN2ArX4FO6oD9OJqd9TYg/rZalcQ2o0a/lmIaP3WShjga+bhPJcSM4y25aLkQUnROVtLwTC/jxieBzpXXexhaAcxOwJbYHTsC6NFh+EYdMZKURtlI4RPFLjy6up36o8lkfS4ZLGGHhFhGlpOQFt79ig0eFvawEQlrAGtGfTu5+SmMYZVVzhG+KSdga5zWvuWjYG1+4+SzOwihewNdA0gbalPgmiNrwNNu0n/lu5ZX0VPJEYnRgsJuRc6lQygpYHGSKFrXa6hYMLaA6qAJPyv7Bb9l//9L7KpREREUKURQpRERQilERQilERERERYK0Xop/9N36L5SxpyDUe1ex6HfPT+H7r1i//9P7Mo5KG+qLrVFHGaxtQ5maRgcGu2sCQbfksVcyIP8AlDYu1BB2t7Feip4YZJnRvDi+xIBBtYW5Lhx9CqFkbBBWVDeG0MaWub1WgDQaaAnM7xceSxTdA6GSgFAMQqmD0d0TsrwHPDnlxJsO0+HkrfE2KpdVvr6kl1W1rHtis1oa1oDeQ157dg5LcqeiNFUVfpJlmabSAsaQGkPfmI071sYT0ehwiskngmkc2SCGFzHAW+TbladO4m67KIqu9UrRwzV1SSLfK/sugiIiIiIiIiIiIiIiL//U+zIihFKIiIiLWryW0M5vbqH9F8qje4MGy9n0Pb8tO62trfmvVooUN9ULRfRvdW8XidXXqWHaNb+ayVcL5JWua62ljoVhhonx1MkxcMro8gFiDvdafwPWRRxtiqCA05nZDl1sB2dx81jbhOIOe2UzWNgCwyuJtzGbv1V5MHr5KmWV07crtGNMhs2/Pbw0WaDDKtkzZZKgksc0gB7iDr1jr2jkuwNBZSiKHGwWjhvr1XZxf2C30RERF//V+zIiIiIiIiIiIigADYKUREREREWGr1pJb/UP6L5Q1lxfNbusvZ9EB8vObcjr7V6pEUNFhZaLzU+km3q5rDU3tfst+6w4lVmmkIMuS4BaLHXdUw2qkqZan5Zz2Bjcuh0Ot9/Yv//W+jMlxmMhrI3ObrZz2m7tOdzpy0Wf0jFC+KJkbrFxLpHxgdWwtz33VaGTFGup4p73cTxM7fVAsdDz00XaUoiKrxdhC5+FEl9VcEfK8/ALpIiIiIiIiIiIiIiIoUoiIi//1/syIiIixVP8tJcXGUr5K3Pl0PMr2nQ8/wAROO4/qF6tEUKtvlb9yl4ux1t7LBWuMeHyvBILYybheRfU4jLiVVwap1PHTRXsD62lxvpddmtx+LDaoU1TJCHOhicxr5A1z3PeWnfkNz7VzJenEbaqkgjpSXVNQ+nA4ovdo9a31SSLO5jxXVwrHm4pWup+C6J0etnOuSNuWm/ffuXbUoiq71StDCxaSrAv87z8AuiiIiIiIiIv/9D7MiIiIoUooUoiIiIiIiLFUG0Emn0Svkg0Ftd17XokT6XOD2HX2herRQobfKLofWClY6lhlppIwAS5pAB22Xmaemw+bitq6SWN4IDw1zgD43K6eKYwzCYqdwpzJHICS8uytY0W1Jsbb87DTcaX1mY5gb6sVDCTK42MrYzoLtbcnYD1dVng6S4VVTwxQvkkkldlYGxu3tc37LAa3WH42U7MXkoJYHNyuc1rmkuc4ttfq2+12nYqIOmuDzU8cplcBJe1mk9/6Eea/9H7KDcAjmpVXGzStHDTeorBrpKN/BdBEREREREREREREUKUREREREREX//S+zLHP8w/7pXyUAfmV7LolY1tRbYB36hesRFA21VdeINNLKJpGxszONhtssXpLTTuewtJYNc2g2XDq3vqJJXunpAxrgXtLwbjx5adq3sRZhUzYY65gfaJ8jLEjqDKHC43BzNuNj7Fhhn6OSSTwxmjLeGM+2VzZL6e0NOnvWSGTARiAZSimdO2N0vyVjlAABOm2jx5rFDV4BiEbal7ImglzmSTMyF17EuaT4N1HZZXEHRhkDQ1tC2IgtaGkBthofyFj3C2y6NNiNDVO4dNVQym1wGPB00948wtpVd6pWhhhvPWWJPyg38AugpRERERERERERF//9P7MiIiIiIiIiIiKk3zL79hXyS7QTrzK9j0Pbeqnf3HT2r1qKFDDdoKg+uNeSrPC2aMsf6vMdq1nU0VLh0sbSGx5DvoALLygjd6O98jnMzSESusQcluVx3hd6toMPl9EpqmuMMjIjCxvFa10rCW3BB3vkGywnodhRl4oErZQyKNrw/UNjFmj9L9tgtujwOioZw6F8uYMe0NL9OsW5jYbElg/suc/ovgsU3CqKo8afqgPexrpBppawv6o1303W3U9FMLqXyPc2RrpAGuyv8Ao5cpFjtcbrbpMIo6Gr9IgDmv4YjtfSwAA8TZo3XQCh3qlaGFt+Uq3dsu3sXRRf/U+zIiIiIiIihSiIiIiIiKFKIiIiIsc5tA82v1SvkRLLm+hv2L2vQ4/wARODvY/qvWIv/V+yqG2yjLsq5jxLcrI+aOOwe8NzbXO6w1peKGUxAveG9VrdSe5cLC8Nq8QpHNxZ9Qx7H3aL2zA8vBZ8c6PHF5OIysfTSBjGMc25sQ/Nci+umi1/itUOZLmxR+d46rgHAM6j2iwzadZzXeLVV/RWtdWtqG4lqIhGbsJLrOuSbnW/PwC2MQ6PVNVNTyQ1nDfFEyN0xuX9U3vvZx1O+xNwsTei9XwyfhWUS5Q1jxmAbqc2mbmD56qB0TqNc+JzPs1wZuLEuaQ462JsCNRz9i9BQwPpqKGCSQyPjYGl5+kQN1mebMK5+EnM6qP/8AX9gukiIiIiIiIiIiIiIiKF//1vsyIiKBfW4UoiIixzi8Dx9kr5CWuubC/eva9DgBU1Gmtj+q9aihQ2xAIWhNDVOrLseRFrcc76W5qMVLg1jmxvkNiOowusTbktPD+M/FGkwzMjbG4EyRloJ0t+hWliNNjsOPmtoYZpouI3M0zNDcmUAhoLhre+hbzvm5LnsqemMk0bGiQE8RpDmR5M7T1db3ydp3PK66WG0/SN1fFLXyyCnZKzqXjBLeG/Nmy7jOW27rc1tOpMXY+1NMY2Zies4Enx7vzWWakxV0TRHU5iGtddx1z6XHgsTqXGS6ThzvDS0BjXPaSPE+eq7rAQxodvYXVlDvVK52E6Pqxe/yvZ3BdJERERF//9f7MiIiIoUoiIiIoUoiIiIiIixzawvHcvkbiQ5w7yvZ9ED/ABc+nI/qF61FChugstWKeoNbwzD8l1vlL8wdAtfGZY4uGJXhrXB27rC+i18Lr3T4k6ETcRgic6176gt95WIVmNwsjMkDJMzRsw6c7m3jZf/Q+m0tfXuqKeOaCweTxDkIy72125DzXIq+kOJUM0zmxOqw2SVph4RbwrSZWHNzzN1WfCuklbXYnFSTUJYyXMeJlc3KOsWjXfQAX7Ty2WlT9JsXi6klGatxLdWsMbQToWgkb87EaW3K2pOkuJsEefCywhzRIQXFoD2kg3y3sNzbwVXdLMSDwBhJylzRfM6435Ft9dxzsdl6thu26l5swlc/Cvnqze/FG/gF0kREREREREUKURERERERERF//9H7MiIiKknzbvBfH5H/ACr/ALxXteiAHplRa+x/UL1qlUlfw2FwF7cljpaj0mLPlLb8iCD+a4tLQY3D0hfL6UPg98rpHRmxJvm07R9C1uw9q6WIzOidEG07Zi6+hF7W/TxWjHizmxMe2niYSbFoFjbLf/hWSfFp4C64ilDGB3yfO/Iao7GHskZEYczpAC0sBIsdtfG49iocYlD7cOF4IcRI09XTl+w7VlmxB7GiVroBFwg+7rmxva2nisXwvPG1pkijcLZnZDfK3Lv5hVjx185yx07WkNdrK8AH8+26o7G5WxOk4ccpuG8NvrHv3Oi3ZMRmiZG9rGOHD4jw2+ouAQO8C/ksUOL1M0sUbqQt4pLbO6tiN1sYWLVFaNfnRv4BdFERERERERF//9L7KpREREREREREREREVJfmneC+QODS9x7SV7Xoef4uoGmgP6hetRQQCLEXUBoGoAF1ZQQDuAVTgx3B4bbt2NtlHo0IIIhj026oVhEwfRb5KGwRNBAjYAd7NGqcGLLk4bMv1cosoFPECSImC4y7cuz8yp4ER/w2a6nqhBDGNo2Dlo1f/9P7FwYy5riwXbtpspc0AXsNO5aOG/zVaNb8UfoF0URERFClERERERERFCKURERFClERF//U+xTG0Lz9kr48XanRe56INtV1B7Qf1C9YiIiIihSiIiKrzZputHDv5isOoJkG/gugiIiIiIiIiIiIi//V+zIiKFKIiIiIiIsU+sDx9kr5CW9Y6jde36I/zlQO4/qF6xEREREREREVJB1CtDDHZqis/wBQfoukiL//1vsyIiIiIiIiIiKFKIiKFKIiIiIixz6QvN+RXyTOQSDbcr2XRL+fqO2zv1C9aiL/1/syIiIiIiIoOxWhh4tVVf8AqD9F0ERFClERERFClERERQUUoi//0PsyIiIiIiKkt+E/wK+QkXcTbmV7PokR8JVItydr7QvXIiIiIiIiIig7LnYYHCqrAfrg/kukiIoUoiL/0fsyIiIihSiIoRLqUREREREUIqyn5J9uwr5FlNz4r2fRTTFKofe/UL1qIiIiIv/S+zIiIig7LQoB/GVepPWbv4LoIiIiIiIiIiIiIiIiIiIiIv/T+zIoQFSqS/Mv8Cvkg5+JXsuiwIxerH3v/perUoiIiIiIiIoOoXPw/wDnazS3Wb+i6KIiIiIiIiIv/9T7MiIiKL62UoihSiIiIiIipNpC/wAF8fdlzu15le26MEnGqvuzfqvWKUREREREREX/1fsq0KAk1tZppmb+i6CIiIiIiIoRERERERPapUIpRFCKURQirL807wK//9a77CR3iV7Lo7Jw8ZrnXGhdv4rv0+MRVD3MYPVcW3G2iucSAv8AJu08FX4VbbWM+aOxUNdbhHzUHFbG3D/NPha28XkVHwwAL8L/AHBVOM6H5LbvQYySdIgR4qDjVrfJfmhxogX4YsO9PhokXEQ/EtyCoklhbJYDMLhXMkoA0GyxzVT4IzI8NtotKLHWT1DomttbQ33BVY6sUdXWOeRa7Tqe5ZabGm1MReyPS1x3qgxtx/wrW71Jxo8ox5qRjLv8oH2qDjZsSYwB4qRjJI0h5fWQ4w+5+RGnK6sMWeQfkRoPrKhxl+Qngi4P1kbjLy4Awjv6yg4zKNeCLX16ygYzJe3DG2+b+yk4xIHWLB5/2T4XlLbhjfG6q7GZR9AX7LqzsXla0XjaSdPWQYxIWn5EX+8qfDE2W/DHn/ZBjMovmYPP+yj4alzWyAe1S7GZQ0WY0nxX/9f6Wcamvbht9h/sq/DU+lmN8/7KRjM9r5GnXXVVGNTl1srR7U+Gp81rN81IxmbNq1tkdjM42a3zU/DE9r5W+CkYxKXWyhdCnmlmha+1i4LIDNbW3krfKD6Y8kBkIvcI7inYhLS9o8lgqZ5adhf1XXIAB0WnHi3pBcxpYdCDY7G9rbL5o4NLnX3uV6vCm5cRxB5LQ0OLdfH+y6dHFFA8ATNy3zHrbX7FaQtLnD0llnHTrBVDW3JM0Zt37KHZR1jMy97DVQ7hutmqGDkdUdo35+PxzKCG852e1wVHcO5/iGX5dZSCwgWqGd4uqkMJPy7O6xR0bHDSdo/qU5WNcBx2WA1uV1oMWpI4WR8VpyttoVc43SC/XGnetatxOmq6V0bJWg6c1zaeOCGXiGRupu4gklWqXRVM85dIwxyEaOPd4KabhQwuYahtg2zSTcquWMnSpYbjtQsj247PNSYorF3pDQRyuv/Q94xrACOOyxCkBgvadnmpLWZifSG8v+bKzcjg607Rccr+5YrMN2ioFue/uUxsZxBaobp4+5QGsJ+fFueh1/JGCKxPHFxrsfchDcxPGJHgfchYxr83HJv9k+5UdkzE8U67dV3uVg1lwRPqTzB9yNDD/jD2A+5YsrQ63GdqPqn3KzmMt89p903VrRjeUkdoaVBMQbrIe7qu9yBzGt1kd+F3uVCGc5nexp9ymzRrxT+B3uS0ZuWyHTnkPuUBsZcLyu/Cfcr5Yi7WV5HYGFRZlwc5v9x3uVi1m4kf+A+5G5A4dZxPex3uXWhxWGGFsYa92XTRhWQYzAAcweD2FpT4bp+x34Sp+GYL7O/CVDsZh5Xv3tKfDEdh2316rvctasxBlVBkzWIdf1Xe5aVNHFA90rn3c4EuNnXPmO6y8I5zQ92h3K9x0fF63Emm1uL+5XZEbNbsB77KhjjOmQXGuyqI4i43Y0+AUOZHrZrd+xf/0fppYw6iMX8FAaBqWN8lUsDrXaB7EMTWgnKL27FAj0u5gtbTRCGjTI3u6qhwzC1h4AKz2CxOUad26x2aR6oHsVrDQBg8lDY9zkFhysrAXFrA+xVewfVHdpsoytFgWi/bZWaxo0IHjZVIDjo0eSvoHEkAeAUFmp0HkmS5JsB4KxaPq689FkjYBe7R6vYq2Fj1bX52VmNGYENHjZUDdbkWF+QQAjUblHXL9Ajgc2wse5Y8rgCBY69iktLiLAaHsRrQAQLg+CxtNxoVUucdBYALKywGoJ9iq5xP0dx2KBctAtfW2ym3Xy8rIxpvbuVgywIIsfBQLBw15q27ri9ua//S+kAEOvr5IfaUZva3tU3tfXmqBzjmOp61h+SvrktzUh2pUF3LQm3Yo0J77323UZS4G+19lV2rQOWU6+xfOJGvMjrdpXpKTHPg2srHCDPxpCbX21K229MWtaM1M78V1PxvjLrimf5hB0uZr/DO81V3SyMG3o7vND0vaALUzr/eVfjYCD/DO/EoPS0ZdKY7/WVHdL76GlP4lX43utb0Y/iUHpeS3+WNz9pD0tLGg+im5+0pd0tcf+l/3LF8bH6j0bf7SyO6Wv8A+1/3qB0qkLf5U7/XT40yki1Nr99XPSpzSM1MbkX9ZV+N2pvSf70+NhcNKYiw+sg6WHQejE/1Kp6WyG/8L/uUt6XSgD+Ev/UpPSyRxB9F2+0h6VzOdf0X/esjOlszWEmjvcf5ir8bKgst6GPxpF0pqQ6/ogNvtr//0/S/GiqLv5Qb/XUfGms1tRt/Gg6UVpNvRGC32k+MdadfRW/iVT0hrwTamYP6lPxnq47Z6Zt/vIzpPVA39Fba31lQ9Jaoi/orfxIekdVaxpW/iUt6SVfKmH4lL+kNaWj+Gb+JPjHXZbGlYQPtKgx+tO1Kz2OVvjFX3saVmv2v7qR0hxAgD0Vmg+t/dQ3HcRzD+FZ+L+6n4dxMbUsd+2/90GN4oRf0WMntuPerDHcVtY0sfn/dG43ihDh6LHt2/wB1Q41iv/ax7/W/up+MWItNn0jPY7+6n4yVp/6Rn4lB6Q1u/orR/Upf0grg82pm7fWVD0gr+VMz8X91PxhxDcUrPxf3T4exDb0VmxHrf3XEdR1DnFxi3PaF/9k=" /> </div> <p class="paragraph"> Рис. 11.1. Выбор узла Security в программе SQL Server Enterprise Manager </p> <p class="paragraph"> 2. Щелкните правой кнопкой мыши на элементе Logins (Учетные записи) и выберите в контекстном меню команду New Login (Создать учетную запись). На экране появится диалоговое окно SQL Server Login Properties – New Login (Свойства учетных записей SQL Server – Создать учетную запись), как показано на рис. 11.2. </p> <div> <img src="data:image/jpg;base64,/9j/4AAQSkZJRgABAQEAYABgAAD/2wBDAAoHBwgHBgoICAgLCgoLDhgQDg0NDh0VFhEYIx8lJCIfIiEmKzcvJik0KSEiMEExNDk7Pj4+JS5ESUM8SDc9Pjv/wAALCAEQAPQBAREA/8QAHwAAAQUBAQEBAQEAAAAAAAAAAAECAwQFBgcICQoL/8QAtRAAAgEDAwIEAwUFBAQAAAF9AQIDAAQRBRIhMUEGE1FhByJxFDKBkaEII0KxwRVS0fAkM2JyggkKFhcYGRolJicoKSo0NTY3ODk6Q0RFRkdISUpTVFVWV1hZWmNkZWZnaGlqc3R1dnd4eXqDhIWGh4iJipKTlJWWl5iZmqKjpKWmp6ipqrKztLW2t7i5usLDxMXGx8jJytLT1NXW19jZ2uHi4+Tl5ufo6erx8vP09fb3+Pn6/9oACAEBAAA/AGWfnSf6qAyleThd2B6mrBa6AV1tm2OCVPk8EDuOKbHNcTttitxIcE4SPJ/Sm/bWHG1M+yjilF84P3U+u0UpujIQAidegUde1PluJImaN40V1O1gUGQR2pqXMhLFI0IQZPyjpTkmmnmESRozt0UIKa88kb4eKNW642iozctj7sef90UC5YtjYnJ/uintJIpy8SqMkcoBzTBMWz8iDtyoqSJpZHKJErtgnCoM8U12kiCmSNR5i7lyo5HqKaZGZgqopZuAAg5NNaYrwVVWHUFRmkEx64j+gUUJcZJIROP9kUv2gknCp/3zR552n5E4/wBkU4XHB/dp/wB8ilFy46BRnuAKPtEwGN4JPNIbmXjnP0p32mXH3s/WlF1KBy2fwrR02NLxWaZmZt20c7R+dSXFmYYmeS3ZQZPLUs5yT9K5y5AS5kTrtYitbw7qcOnCdZ1kZJAvyxkdj9QR9QePetc+JLBo7otHdBroBWTIZYhsK/Jz/hmszSL+10m5uM+c8DqFHTccEHkZ/UGrI1fS9kJ/s0Fk3Ftyq3JDDOT97kg8+lJBq2nJ5TT6cjsIv3rCNeX4GQOmMDp7mqN5eQTG1+zwLCkC/MoABZtxPUcnjA59KtJqtql1dz/Z3cXEhkCnA9flPtzn8Kmmv7VVBBjcNGE8tcEj7pyfQcEY96qSalDJqVvdiFh5e7cvHIJbA/AECkttUWOIJLAJNsqELxgIoI2/rmpv7YtzHIDa7mduchcP8u3n8eeKZPqkchnaKAxtIFC9PlAbJ5+nFTHWreS6lmeBm3yO67sZj3Afn0/Wqd9dR3UUIVDG0ZOeAqkH0ApLW+S11L7VHF5YCMqqjE4JUgHJ9zmrn9uRm12G1QTLGqK2AwOM/wBTmmnWrdbiCSG0EYinWSTGMsqndge+c/higajpMccyC2llMrs5aWNMnPTnJxt5PvnmrUuuaQV2w6bh/myxiTnj5awrqSKa+uZoI/LhkkZkT+6ueBUJABPOPrSlV5+alAG0/nS4RVyzcUjNGD1AHbmlHlE8P1FKDGV+8M/WjMe0Hfn8av6Y8ZjKhQ/73Lrv2krj/Gr1/O17sEsShomBSQSjCJ/d681zF4ym8mZTuUuSCO/Nd54e0fTLrRbeWWyheQqSzMOvNaP9g6Tt/wCPCDB9qZ/YWkkj/QbfkdcUo0PSwMGwt8/Sl/sHSyeNPhbJxjFDeH9OBwNNh59RSf8ACP6cckafFxx060f8I/p4OBp0P5U0eH9PYZ/s+HPTpSDQtMQFm0+AAdd1OXw9p+Fzp8Hr0p58PadjcNOg5GOBTf8AhHtPzj+z4j9BSN4dsByNPi57EU4eH9NVc/2dCRj0pn/CP6cDk6bEB64pjeH9PP3dPhz9KjOh6ZjAs4SQM9O1B0XTMH/QoufakGh6ZjP2KIEe3WhdC0vlmtIie4IpDoenZH+hw+2F6046Lpm0YsYuf9mnxaRpsbfLZxZI/u1I2nWZYH7JF0/uDilFhZ9Tawj0+QU9dPsu9nCcf9MxS/2dZc7bOEf8AFJ/Z9om4fY4T/2zFKmn2fezgwf+mQrz7xIixa9cxxxhFUjAUYHSu/8ADKf8U7bEAZ2Mcf8AAjRfQXJ1COWG3LgBNjZ4Xk7u4xwR61An9vPC7kR+Yv3EKAAnPf2HNNd9e+ysfLDykgKNq9MHrz34qaKWWCazs2fbK1m7PzkhhtGcd+pqoNSvIIIgls85O7MkhPJHpgD+VT3Op30TBRYb9r7GfJC5xnj6jH40XE99LaWzwhopHEjuqMRjA4ByD+VVrjVr5WjaO2ZwjfPgEdv4uOnfipftkt3a3STWwjCRq4PPU/UVHrs11Fe7bWW9EgtwbeOBCySS7/utxjGOuSMCqf8Ab2rtIr/ZZI1+ZNnkEhs+Xgk9sZcfhzTIte1pYN/2KSVpWZvLMDAw8AhcnqCcgd/rViHXtalYD+zVUMww2xsdR8o75wSenGPSrj6jdQ3U5eFjC77YXZTsUA4JOOfemyaxcx7wtoJAWC4O4bR78d+1Og1C4muY4JLXarM6k5bgDGO1S6Yg/s+Md/m5B9zVoKOeDx3HNOK5IB/OkKqQPrRwR8p6cDinDlMAdPemqoxycZH5Uuz5x0x/OpGC8YA/E0mCQDuHPWnArg7sc0xsKDhsgmnKpdyFPbNebeKSV8RXQBz8w7ewr0HwsT/wjtscD7h5/wCBGtHgqPQ880wg4O0jHsaQD5uDj2oWGJZxN5amTbtDEZOPTPpTnY5xhR65HWl3ueNoA9hTN7Bz8q9c/doMxI+6Bz/dqJyZUaKRFZG4IxUvmsqgbU9xin+c/YL09KTzmL8BR+FJ5h4+RSfYUqs6jAVRx6UeYxGWRQOmMUyWQ45VcgelQRGOFBHFEip6badv4OUU+wWhXHXYmR7UrS4HES/lSLJkf6tV4z92nK42H5E/75pUkz0ROB0AoaY7jhRn0xR5rE87SP8Adp4kY9dvHQYpDI+Dnb9NooEjBjnH/fIqtdTSfarMByoaUhto6jFef+J1z4huz/tD+QrvfDPy+G7QDrsP8zVq6mFvaPPIRsjUtyOK4vVvE0/mqlpKw3JkHdjb7YrW0nXbsQIuqxAbiq+ajDKg9Cw7Z9a6LPz8dMZyOmKaT83Izg9aCTgdcE03nkMfxobC+5700MpyOgpks3kW8kxUnYMkfSiI6g4WRdOYqwBB85eRTguoHG7Tmzn/AJ7LSlL8gj+z2GfSZaNl+pP/ABL2P/bZaQJqIGDYscdP3q02SPUT009un/PZaTytQ2r/AMSxuB/z2WkWPUgT/wAS1h6fvlo8rUSxP9nNjH/PVaQQ6nuP/EuOP+uy0oh1EEH+zv8AyKtKI9RUY/s45PrMtSwo+VSeIxu2cqGBwPrQwiG7Ac/gKiuJUhiiZQSWkVcHjAJxUuFKlucU0DceVOe1KeQDgAiq14P9IsjjrKc+3ymuD8TnHiG6B/vDv7Cu88N4Hh21xn/Vnn8anvYWurSW3XgyLxnpntXnGrJeR6kzSWskc4PJCcH6YroEvBdaNBHd24Fwzbl/hAYfKMjvxzXU28a2ltDboxcRIF3MeTWfNYXX257qJkwzqSjk4+VSAR+JqGK21pYj5l4PMX7uXGD6Z4q3YLdwROLuYyuejEjGPoKtls9Ovam43jsSOuKr6i4Gl3HUYjP8q37T/jzh/wCua/yqWiiijoKKKKKOKOKyrkgX2fbsKpsz5wmCvcnioL0sbeBjgHzo+Bz/ABVb3KIx39aQSjjBwM+nWngqSTgYxVa7cfarLof3h/8AQTXBeJyT4husDPzD+QruPDTg+HrY7cfuzjn3NX1dwP60pZioGfes290q3vLlZ97I28M4HcDt/L8q0FJJb68ZpCX59+9IDnLZJPAPtSE/vMEcUcZ5OAentTTy3BxmldA8ZR1DKeCp7iphc3AUBZAox0pfts+AA3XvR9sn25EoPtQ15cBc7v0pPt1xsBEgHPpTWvrnH+t4+lRteXIIG/j3oF/cgklzn0xSrfXGOXNIdQueRvo+3zqceZnvnHSkF/csvMvB9BUMpNwNsqkgjB7Zqv8AYbTfgQcf7xp62VqkiOsIG05Xk8VbycZPemFwRx60u7cCc9O1V5zm+sRxkSHr/umuG8SkDxDdjPRx/IV23hZc+H7Y8kFGz/30avSSokTSyEqkalmJ7ADJrPTxDpraXHftK8avt/cuv7wMTgKV7Hg/lTk13TJbdZ/tscaMAx3nBQEZAPp1/Glj13TGuXiW7BIO3JBAJxkgA8n3x0xzSSa7pyTRwm5Rt4JDj7oHHUn/AHhj1qxDqdlcT/Z4rmJpsf6sHn/6x46VKWUNja+R32k/nTRKAuGR8/7h4/SnLLk58txj/YNKDvGSjD/gBpMgjGxyfXaaUOFAyHxnj5D/AIUbxngOMeqGgvwflfI5z5ZpqkhclGwf9mmSHAyobnj7pppcLtJVz6jBpd+edr/TYaarE5G1ue200Hp9xh9VNMLEnOwjHH3TT+TFja2f900u52HCsCO22mESB+UfPTp2qQggA+W7cccUhaUIAInHOBxSgSHHyMefSgBskFSmOeeKhnP+mWRxyZW7/wCya4XxKC/iG8JUj58cn2Fdz4WTHh2A842t/wChGrd5aRXtjNazqTDOu1wpwSO4zWWfCels8hjM8SSP5hjjkwofB5HGe5/E0s3hfTnkZykmZFRWw3LBAAvbtjtUjeG7I3i3nm3MUwkeUMkmNrsCGI47gkVEfBmk/czcmMYyvm9SMck4yTkA568Vft9Fs7e6a6jEjTySmV3Z87nK7ST+FXFXnrggdc01lG4EZOevNOKhjjJ/OkZduAScfypwXoaNjNyCcn34o2tgA/N70eWRypOT3JoxuUA5qN4wq854qMqSA2SKcF+XqcUhGSSG/Kmtkjv+dIV3rtDYx70/YDHySB9aRY/qRjv1pcfP93vgUrxYCjnGPyoKAEZ5PelKLt44OegpNuFIPr3qvdDF7Y8fdkb/ANBNcL4kG/xBdnn7+P0Fdz4UIPh62JP8Lcf8CNaBC9ST70qhRzkU0cNzyRSquCWqCxtp3nE9xGREU3GQyHcXyeNvTGKrXd5d2dywS3eeN/n4H3Vxgj88H6VHFqV5ayNC9t5qxERmYgnJIyTjHKioYtVvvJT/AERp3ZiOM5xnhj7Gpo9WunjnY2jRlI9yDBJYk4FRSalew2Qj8iR7oFUJaM888kj2GPzpw1W+igiBszMTn5uRx2HTrTZNVv4r3a1sRGqr8qA4ycnOfQDGRT7jWbxpUght8qw3NKqN0HUjI6EU+HWbto0As8/JucHdlOnynjluc1sEgnqT6bqikwA2Rk+gphG9OuPSkzkkA5UDmgbVUgA8+tMU++MHkGjbgnnHtmlJfyu2PrTkBG3f3FIyfvAQcjv7Up+YDOQKUKeSDgUu0bATg59KTaxwMcVVuNv22yBH8bf+g1wniQf8VDeY6eZ/QV3HhdT/AMI3bcDlG5A6fMa0fmUZLL9KUMCORim7SM96chPB3HjsaT5ifQGo5Ly3t5hbySKsh5AIOPQc1ICycZGG7k4olnXIUkbzzx2oDFictnP5UrP8mMkD/ZpVn+Thup6HrQHJPmE9+RSeadwJf5T3GaijuLy7aUW1qjrE+ws0uM4/Cl8nUx0s4ifXz/8A61DQanjK2cYbHP7/AP8ArUzyNWIANnEMdf33/wBaj7Nqh/5cowf+u4/wpptNUPWzi+nnf/WoFtqwz/oUX/f/AP8ArUC11XjNlF/3/wD/AK1KbbVdmBYxZP8A03/+tSJZaq2B9ngjOOrylh+gp/8AZ+rZOTZ8/wC09MkttTQbT9k/N/8ACmwyTm4khm8rMaK48onvx3p53Z5bOOTxTwrDgNmqd0M39lk4y7fT7tcJ4jyPEF5k/wAf9BXd+Fz/AMU3bEddhzn/AHq0CCxzngdqTnGD1FAycj2pV4Qn9aPmA9R6mqtxp5uLgyefsjkVVdQvJ2tkc9qojQFaWTdcE46fJ+vXqe5oHhotd+fLetIvdSn3vc81et7c21tHBneUXbkDGanCnAB6+gpNp+8RyO1O2kgHB60pXLEetS6KAgvB2+0tjj2FafFISAD0NAYYHIpcj1FGR6ikyvqKXI9RSbl9RSkjuRSb0/vCsPWo0vv9GeO8Cgg74Acj6GobeMrNKywTRxiJEHmLzwTVoqCpbI6UmCw9hVa4XF/Z4yMO3Tv8tcD4kyviC7GcfP6+1d14aU/8I7aZxjYf51oqFHJGec4pOcjsCec0jA7j0A7UqqFyCcZpWA4HFYOta9JpV+MeWbWNFaVQgdySTgYyCM4GCAec5xSxeKYDMyNbeWUnSBmeYcs3QqO64OT06GqknjIiaF0s/wDR23FyXBYqFDEj6Z6d8GtCTXYY7S0umglxdKXVQQSFzwfx4/Og62IldjBu2rkhZlOSemPX39KZ/b6E4aF1J2ZDOONxxWvE5MY4ABHUc/rS4OcrSozqCNzU4M2cqWPHrTZZHWIkvn8aj81ht+djx608O7DPmHB756Um+TgiRj680u6QZLOcUonY/wDLTJPXmje2C3mHA96NztxvY9+tO6/Lk/nShiF+9yR69KTduXBYnHbNN4Ix0+tA6n261VugW1Cx7fM/f/ZrgPEqg+Ibzr9/09hXf+HFA8PWuP8Anln9aunnGeuOtIUIG4EZHrSDGOn5ml5PBGTQUO7gc45+tRvbxPNHNJDE0sf3JGQFl+h6imtHaImZIoFULtwYxx7dKQxWV1bMuyF4iNpCrjt+nFPj8l41EaxukeFTGCFxxgelOMaYCrCgxkAbRwDSCJQNvloMY/hHbpSgEADAHbHShQeRRuA5Pf0oQ/KWHbjjvTJANh7r3FIQABx26UpIxycY7Ugcnr3p3sWyO9OUDk9z6UYBViDmhOARjkDinkbR0+9Qfu89qMgrj0pOAvzHn2ppYEjbx2IqtdADUbIH+83T/drgfEZY+Ib3npJ/QV3vh5QPD9rk/N5XT8a0GBwNpB7Um05OSBUZXPfJB5pyjg5Gfc0Adh396VsFADnOar3Fqt28Ks5jCMWyO/GPzHWlktQmmC0SdpD5RUyyfeYnjJNZkVjqcUciQyRQ/KQFVgOoAz068E806303U0ktJbq88wxuWcb+CMYGP1qkNO8Qi4mc3CGJgSg84gRvnhj6gDHHf0pJtK190Hl3xg+RQClxuIYffbJB+96Y49u1zSLHU7W6d725Lo0ZAUyE45HQfQH1x2JBrW6DhRj1qRD8uCvHeoZPusD36U0dAQe3NGCABnIpSpAJz17U4Kdvb86Nh9SPqcU4BihAycDrSjoAetKFGC2MkDpQFDL2pT90DPH070hAx1APbFNRcnPqOOap3Wft1gBkfM+T/wABrz7xG+PEN7yP9aa9G8OgHw/Z9D+5FXAOuT9KU4OQM+tN3jn+QpASQRj2pCRuzycU4N8oxnrmq80rxSRRQqrSzPtXfnaOMkmpZFnt4HNx5bFQT8mQDj61nrrMEcSvegWzPtwAxbO4ZH6dadFq9lcOsccjb3ICqVIznoaamvaY2/FwT5Yy52khF45PoORTJ/EWl2uFmuDEdwUrIhBDHoD7kcj2qe11K0vZZIraRnaIAuCpG3OOOe/Iq1kDjHNAYGM8HqMDNNZlJYjj696YGyBjOMetOVwASQcUZyCMcfWlBwOTn8elCncOW6mpVYCM5/Sk+8O6j2pWBDEDnNKwAx8340YIOTzQAXX+ho4ALD/9VVLr5tRsTjoz/wDoNed+I+fEN8T/AM9T29hXoPhzP/CPWpJ6w/1q+GYL6596Qn5uSRTQOSR+NIudpxkYoy2DgjHvSZxjnBJwaUMRKrFclT8vHSlZjOG3nJIIIz2NUv7JsvJWIW6lEORkknpjr9OKVdPtkukuQhDKnlqOw4xn644qmnhrSQXAtfldQrr5jYYDGARnkDA/KpW0PTySfJZmbBdzIxLEZwSe5GT1qa106zs3aW3h8tigTgk/KO1WTzg5pU+X5PXmmPwpHcGmgHGfbpQM7cZIBpc7OhzQxJOSe1LGcqQFyc9aeC20nbg5oUufl9qcMhhk/iKGGBnBz2p25yBxQSQMkYFJliOBxVS5z/aFl83O5+P+A1wHiEY8Q33y/wDLU16B4eAOgW2Dz5I4q5k7gCOKQ5J6dKNgznHWmgEM2AD/AEpTkn1pCADjBP1pvJfIB9M0ZAGQBz14oHDcdPXHWkOTnGR9aMAKTgnPU+lKA2cZpNxTjHNKpJGOg96OeozjHWo3BCsNue/WhSCAPbrTWZ9vJ49qAcnrTwduVAx708Eg8celLuYo3y06POM8Z/kKVsZIpQRtwR06UqsCufTtSOSRkYI7gU1XPQ8VVud39o2JA4DP/wCg1594jP8AxUN9x/y1Neg+H8f2DaEAH9yKtAseMfjTiG6HkdsUwbQDjgjrilUMzA54J6GqNprEN29uFtrpFugWhMkOBIoGScgkD8cU2612zs7qW2l8/MSB5HWPcqgjIHHPIHpjOBTrXVLe6ujZ+XcQ3KqWMU0e0gDbz1I53DH4+lPGoWxkmVyY0g4eR8BQRTlvLNwSt1EQpGTu4FMk1K0S1adJ1lSMjJQ7uvSkuNRt4IxJJMu1s4AIPQc04Xtj5mz7dDkpuHzjp60z+0rN3bFym2PG4k8c4x/OiXULRZvLMqGTOCA33Tx1/MVNFd28u0RTxM0gO1Qc5p0qk/eHQfnUfAAwMZo5wcHv3pynBxz7nFDEEnaMDNSA/Lk4JFPVjs7c89OtKpATJIz6U1+GO3H1p+e3TIpFHAz69aeepUcEd/Wm9SSFqrcf8hCyA5AL5P8AwGvPvEf/ACMN7wT+9Nd94fONAtiBj9yP51fzwDxz+dNyh49aQLySv/66XJ5DD7p4otESy02GziGY4VCLuOTgVkah4ftdRvPOuJ59hGPLUKCp2kAq2NwHOducEjNJb6E0d896dTupLlyd0rKnKnb8mMYCjbnj1NWLvTLe4lkeQu24Y68LyDx+Q60w6RYrGkbRltocD/gXX/63pSxaLYRwlCrFC4kKluCcY7Uw6JZDoZcAHaC/Az1obQLF7h5yG3yHc2COv5Uh0a0SYyqZEk3s4Kt0Y9arS2Oj75QWmL7tsgXJPrjOKlgXT4JTKryl9wclkOSQCB296svqduIyu5h77D/hTP7QtdpBZiPaM0439v8A3mwOfuH/AApP7Qtuodzn1jP+FOGoWmOHYkdvLNPGoW+er9Omw/4Up1K12EZfpxmM/wCFOS/ibCoskjY5CofzpTfYbJtrjnjHl0rXiheLS5z/ANc6mhmFwpHlSRhQCS64qU8c5yAOKZyCcdSKrTlRqFic/wAT9e/y1574gIOv3v8AD+9PBr0Dw7z4ftcZ4i/rV45A6daau3DHNAHbr7UgPynofrTVUbs4HPWk8sHzHLEYIIHcjHSoc3AjGUBOOo+tOka4BUkKq9+5poErTgOeAcnAFSEcAnv1pFCtwWpwX5uT06CjGDnqPWqunru+1E4z9pfp9BVxcnIPOP0pkmdhbOB2xTF7HNPB6/MKRBhjk/iaQEo7ANkVKuduevfg0/rHyMg9qOAM7iAR2pSPmBDEj3px+YA+nenk/uyeTyKiJOMZ6UiDcW45qtdDbqNkT6yfj8teceIxnxDe8H/WGvRPDjf8U/bcYxF/WrU86W1tJcTMQkSl2wOgAyT+VUTr+l7HlmuVtygO+K4HlyDAz908ng54qSHV7C4tGube8iaNV3MA4JUY7jseRxSWWrafqDAWl7DK5z+7DDdwcHI68GrnTjjNNMmGYkYVQMNng0gZOcnj696QzKV5IPp7UzzE3bd1O3ptPzKTmm5jJJ4JFOd0UhmcAEdM0hkTbkOuPrTYFtoFkOWJkcuSW71Ks0OOhJI7Gklkj8rkkD60gaAgFSc/71AaAvgE+43DpSq0PJAJPY5pC1uR1I57NT0lg6Hd9d3Wlae1I+90/wBunK9ttBzu7dc/ypfMiDZ8snHfBp3nq2B5Zxjjg0gdTHtVSvqcGm+ahBPzZz/dNN8zuM/XBqvcEnUrDB6GQnP+7XnviAZ1+94P+tNeg+HST4dtSeP3X9anuokurOa1Y4WaNkYg8gEYz+tYVx4Qtby4NxdXtxNO6hZHwAHC/dG0cDFR/wDCGwB5cajc4lTY67V+7kEAZHHIHSr2m+HYNOv/ALVBcyZbcNmAFJPrjrjtUlv4h0+6i8wym3QHarTgKHPPQ59jx1HcVYGpWK8NewnDYwsneobPWrHUI3eK4ACyFNrkAk+3r0P5Gm2mu6Vdh2iu1XYBxIdpOQDkD8anmv7SHyvMnUGUjYQ3UHv9PekTULNiwWZCMqu4twSRkY/ClOoW32gWgfMu3fweoxmkXUbOWNZWuo1UqCA7YIz0yKcLy1LFVuYm2/eAYcUjahbbhm5iGSVA3dx1pxvrQIjteRKrglW3feqsdWsmkijS8jledxHGsbBsnnr6dDUiahZtI6tcKpiwCc8Z54HvwaQ6jZKFb7QmXKgfN/eGQT7U8XFv5mDcRg5A27+56Ch723WKN1lV0d/LBVsgH3qK41awtLZrmS5XygVXKnPJ4AqWHV9PuVQRXELM2MKHGTmkTUbIxlmnCFSQVP3hzjp1p0Gp2l1Oscc6Fj90L/F/h/8AWq3kx85z6UrvgAgdetM3sf4sjOaCQV256dBVO6b/AImNmOMDf1+lcBrxzrt4f+mhrvvDzn/hHbYjn910/GrjPsG9jtVRzUZnJRSsUpLnAYocD3qrdajHZ2/nvcxOAQGQKQwycYq6uCCDnj06jIrC/wCEWi80OL6ZgdyyExqGZCjLjgYJ+Y5Y88CpIvDNhbkG3luISI/JG0jPl/3c4yfr/jS2/h22s7yxmiZitmsigN1cseM9uMtj6mmnwxY4h3STM0EhkjZiMg4C88c8DFWJdHtZbeO2LSeUkaptGBkL0zx/KmHQbNoDAxkChtxAI5/DHtUtvpcFveG5WWV5Cu0sxBGMY/wqFfD9osyuXkOwFRuwQMgjP60i6GpYrLO7KE2JswNqdcZ780h8OwsSFuiI3wZgy8uOwB7UXXhq0uookkmmQRqVXbgdTknpjuRTk0O0t703cckykzrOyEjazqpUds9D2pk+g2lwpR5ZijH7oI4GScdPc89acdEgMwlWWVWXgNwSOMY5HpSroFn5rNvmzxwSO3vjNOj0e2S0NsN4TeW9OSMfyqG58O217ZSW0k84SaUSuwI3MwBHp70+28OWVtcxXULTB4FQIMjGEGAPXB6kd6k/sSEl2WWRHLmRSOdjH+Ie9Pg0u3s0Cozl1YOXLclhnn9TWgzFlHTpR1wG/Q0vBUsBgZpqnHTue9VLpf8AiYWZPcv/ACrgdeIGvXoHIEp5rvvDGB4ftuT/AKs9vel1hyuj3LKxyq5BHUVDe3t4LgQpOqg26yAkD055rk7lrmezkupLpJJZ5AdhIyQOhru4G861SUENvjVsjucClwVBPrTiDgA9RTcZI55pcEkn8KbsySc5570h+724PWgDGehp4bGccr78YpCCo4PHoR1oCtyecGlOA2dpwaY+SrBe/QVGcrt4wSOop5YMRkYI68U3IyCOtOcEAcnPpSA46Dp1OOtKSdpIOB0pUAEQBY596DjJBb86CNoBAJyOaVBnnB4pCefT69KOMYOSarXJzf2bbdvMnf8A2RXn+tKP7bvMf89TXe+GGH/CPW5IP+rPH41ZvrV7zTZ7eLaHkjIXPTPvWTqUV1NHEq2dwJY4wgXbkZxjIPSpI4L61VBb6dIcoBMr+XggcYH61qafAbfT4InBDpEoYZzg0kV5aXS7kcrjH+sGzOeh57ZpDqFmkXmm5Qpxznnrjp9akM8G4fvowcA/fHfpSo8bkrHKjspPCkHFKEGW4wc0bOpBwBQqjJ4P+NLtG/bxUGy5ub2SGKeKFIo1O5l3ZJJ9/apTp18cZ1GDAH/PL9etItjduN8ep25wSCfK9OvenNpOpMP+P6Af9sP/AK9NOjakQP8AToOP+mJ/xpf7H1IjH26D/vyf8aQaNqAJzewnP/TE/wCNL/ZGpYx9tg+vlH/Gj+x9R/5/YP8Avyf8aQaNqOCPtsH/AH5P+NOXR9QY7ZNQQLjrHCAf1NVrzT5rXmbVnCcZJjQYqK3JF5EovzcxyK+cKuAQPUVbU9B0z0BpSpyCcYz0oHII61WuEAv7Pnj95jH+7XAa0wGt3nH/AC1Nd14V3Hw5b9/kbB/4Ea01Vsc/pS5zyW6cdaQ5C8sDzQgEZJIrOk0OOa1NvLPJJkAByo4UZwuPxqNvDNp+623Ei+SoVMgEjByPwz270Dw5abiTK5J9Qvrn06e3ardhp0WmtIYWyJOuVHHpz1NWQBtzwM0Dk5C/h609e5CjFPK8AgDr0qo+mi8kuEmbZE/lkMO5XOf51C/hmNzkag5URlArLkAdcdemeac/hu2M8Uj3RJQ8/L97LFj3xzmt7zUHfik+0Rf3x+dO81P7w/OjzY8Z3D86Tz4v76/nSfaIv74/Oj7RERneMfWkN1Dt3bxisvV5Hul8mK3injYEOJJAuc/hVGztZYp7djbRW1vDG6hY5d2cjjjFW9zMuTxt4o+XaecfWnblyMcDFVLon7fZbRjmT/0EV59roxrt6P8Apqa77wrj/hHbYdDsJ/8AHjWmCAozwaCUHXANRhgT0/GlU5TOzGaj+2wLbxzvKsSTr8nmHBPrUf8AaVkQh+1w5k7bqe17aLIyvdRKVGSC3PXH86EvbSWQpFcRSNx8qNk81JlB0xmgNj5vSnKw5wQDnvTsnccDJx19KrjzZ7u4D3htoYY1J+UHOc8kmmxMJmkX+1JIguTukhVVYDgkH0p8aCUuBrRGxyuSiDJAycevWmMEN29p/bZWVAGZTEvc4FWRo0/bUX/79LS/2Nc/9BSX/v2v+FH9j3GMf2nL/wB+0/wpP7FuM/8AITl/79J/hQdFnP8AzEpf+/af4Uf2LMQR/aUv/ftP8KVNDbP7zULhh6AKv9KqalZQWKedLfXSoPvMXGB+lVraWJrqB7a7lngkRz8zZBwPpV4ucBT3HakJyDngZpN3TBGD1FVpmH2+z9Mv/wCg1wetqTrt98v/AC2P9K7fwlIZPD8I7pvUY9Aa1HzsGencUwv04FKT8mRgULlujHIrPm0OzlVYp5Lh0jOEBf7o9BxTLnQraWdWWZ1iLBpkH/LQgYU57YpG8P2gfzI3nWcEusrPuw/96pdO0a301d0cjtKR8zdNx71dIweKT6A5U5NOViT2+lOBfKnHGPSmLbLLcyl/lidF5zyHU5BH50S6PaXCSJNdSSK2doOAEyQT9eR3qFvDmnyW8UJupdkTbuo59aVdDsoZLidryZnuBiQsR8wyCR046Vrpe26qq7wBjipBdQn+McUn2uD/AJ6Ck+3W/wDz0H50fbYP74o+2wDrIOOvNIb63AzvzWdqksl2FSAQMuDuExPPtgVTgtJkuoGc2qRRKy7It3QjGAMVYQDB478UhZcE8kegFN6n/PFQTgLc2rDqJCPzFcP4nDQ6/ciM7QxDEe5Fdb4Vmjh8MpLJJsQM+Tg+taCapZYK+epwP7p6/lSDU7ME/v8An/dbj9KDqdngET9v7rf4ULqlkBkXGcj+43+FKdTsTz5/b+43+FINVs+nm9P9hv8ACl/tW03Y847fQq2R+lNOo2hJPnnHurf4Uf2pZFgfOJX12N/hSHU7IMQJ8enyNSjVLIYHm/jsb/ClXVbTdkzED/cb/ClOq2qtxcc/7jf4Uh1SzP8Ay2/8cb/ChdUsv+e/f+4w/pUc2p2YziX/AMdb/CmnUrMIMzcjno3+FINVs+glPTsp/wAKQapZt/y2Ix6oR/Sk/tK0Lf6/of7h/wAKeNSs+8x4/wBk8/pSDVbPaf3p/wC+G/wpV1S1YbUZ3PXCxkmla/iVgRDck/8AXE0n2+EnPk3B5yD5JoXUI8EmK56/88TSi+hbI8i4x/1xNJ9vhAwIbgH0MLUhuRcT26pHMu2TJLRkADHvXE+Kif8AhIJ8k9v5V2XhJh/wjsIP/PR/51r7uuRz16U0FgG7k80b2I9Bjt2pysQCCT60jA5O/kUhZl6jGeh60vO0HjijJVvvcH0pNx9cfWkbPGODUd1K8NnPKgw8aEjdyM0hhvc86gmf+uA/xpPJvc/8f6Z9fIH+NV2neKRon1SJGQfNm36fjmnxi6kXfHfoy9iIBg/rRIt664N6n/fkf41Xt7mcaubGWRJB5Ak3BNpznFaL7I22BS2O4NNnngiQySqVXpnJP8qEeOWESRpuUjruqRTEoIC8jrlqS3mhli3IhZSMg5OGHqKiknxcwQopCyByxJzjA6VYcqCMoCNo5yaRWRnxsUfiajW8tiwUKpLFwMkgfKcH6UJdQOzRp5bMrEYDc8e1SNKOvlKc+5qvPcMrW8aKqea+1j1PQnFcB4t48QzjjoP5V2HhT5vD0PXKu/P41sAZb5uaQjHA5ye1AGM85waOoPGT6elKwPryO1GPbpSE5faBQAMUm3t3pdhCZJPpmq+okHTbrGP9WQc046hpqtlr6AkHj94KYdT04dL6D6bxWbdx2F55ytqdsI5XZyuRnJUL1z0wKuW99ZQQeW1/C4XhW3jO3sKWTU9PJJ+2QD6OKp2k8E3iRmgkWRPsoyVOcfNWm9zAJpMyoDnpuFV5/JlCGO5iWRJA4yQeeeoz71QbTEnv2uJtRQ5HzICADxx37GkGjxtGivqKMUOS+cM59SQeT6VqWhht7OKD7RG2xQudwGaZvjl1O22MrDY+QGBI6VYnvLSOQxPcxqVA4J5FM/tKzxuNzGSD61mS2ulThw11GrOWJI75OefWm2Ntp9lcmVb2MqGDBSOcgEdfT2rS/tG0Y/8AHwmPrTLi6t7i4tVjmVysufl57GuI8VD/AIqC4zxjH8q6HQ9VfS9LjtZtK1B3VmJKQnHJrQ/4SVQf+QNqX/fg0DxJ2Gjalj18g0w+IWGQNH1Ln/phQviF1wTo2okEd4SKUeIm3AnRdR/79UN4iLcDRNRHP/POgeIiTxo2o/8Afql/4SI7cDRdR/79U0+ImBB/sXUf+/VObxKxyDomoH/tlUY8QDaQ2h6gQeq+VxUa6tbEYbwzdEf9ewoOqWmSR4bu8n/p2H+FNGp2wH/ItXX0+zClj1a1Uc+G7r/wGFI2qWYBA8NXXPf7KP8ACnxa1BAMxaBexsRglLbGRUP9qwMWz4euyM5/496cuqW2Djw/dg44P2cUDVoR08PXmO/+jij+2IAMf8I7dgZ4/wBHpRq1uYznw9eZP/Tv/wDWqSHV34Wz8OXnmkdPLCcfWpDqWslhjwzcYHqwpf7T1kj/AJFmf/voUf2lq+P+RZuCfXcKP7U1nB/4pm4H/AhSf2lrHGPDVxx/tCnLqmsDP/FNXP8A30K5nVtH1zU9Rku10e4i34+UgGv/2Q==" /> </div> <p class="paragraph"> РИС. 11.2. Диалоговое окно SQL Server Login Properties – New Login </p> <p class="paragraph"> 3. Во вкладке General (Общие свойства) в текстовом поле Name (Имя) укажите учетное имя пользователя, выбрав его с помощью щелчка на кнопке с многоточием либо введя в формате имя_компьютера/имя_пользователя или имя_домена/имя_пользователя. На рис. 11.3 показан пример выбора учетного имени пользователя после щелчка на кнопке с многоточием. </p> <div> <img src="data:image/jpg;base64,/9j/4AAQSkZJRgABAQEAYABgAAD/2wBDAAoHBwgHBgoICAgLCgoLDhgQDg0NDh0VFhEYIx8lJCIfIiEmKzcvJik0KSEiMEExNDk7Pj4+JS5ESUM8SDc9Pjv/wAALCADZAP4BAREA/8QAHwAAAQUBAQEBAQEAAAAAAAAAAAECAwQFBgcICQoL/8QAtRAAAgEDAwIEAwUFBAQAAAF9AQIDAAQRBRIhMUEGE1FhByJxFDKBkaEII0KxwRVS0fAkM2JyggkKFhcYGRolJicoKSo0NTY3ODk6Q0RFRkdISUpTVFVWV1hZWmNkZWZnaGlqc3R1dnd4eXqDhIWGh4iJipKTlJWWl5iZmqKjpKWmp6ipqrKztLW2t7i5usLDxMXGx8jJytLT1NXW19jZ2uHi4+Tl5ufo6erx8vP09fb3+Pn6/9oACAEBAAA/AILRpHGFDO3frVgPcMgIiPqMCmpNJJxHHuxycDNIbmQNgqoOad9rfJGFz70gunfACAnsADzS/aHUkOgUqcEHPFH2l+cKpC8nGcYpRdSyMFRNx54ApPtDqSjLgjseKa145HQZo+1ORwF/A9KQ3EowSvHTnPWpPtL+gPt605LiQsxEfA69eKcbmRJCrIFYHBBzmlFy7kKqbmPYE0ovSM/Lz9TS/anYB9vHTOTilF43TH6ml+1sD6f8CNKLxlbdj/x404Xrk5AI+jGnC9lJAyeP9s/40v21zyNw/wCBH/GnNeSDPLYP+0eP1pBfSYzlj77z/jTvtspIBLf99n/Gl+3ygEFn/wC/jf41NZSz3UpjE7oFUsWLt0/Op5I5FO37Tc5A3cbunr1rLvLu5hlCpeT4IDA+a3IPtmqekzrb58wbopOJI8Z3j+hrTi1O2G+TBTeqoUA4UBSMj1JzWfYTpZzsvmMYXXa+U/1i+mO1WxqViPICWSgIGyCu5skEDJ79QfwpLXULNYY0ntAZApDyBQeexx+eahF3D59oyQiNIWLOFA5+bIx+HFTi8sfMuneJpTNIWGVxwc4Htzg/hU813ZRyjMcTISo2KoJwGB5/Cqq3lsL4XCxsE8llZQMZYgj/AApYr+EiPz4gzebu+7n5AuAPzqZryw+yvJ5KMWkIEe0Bj8o59hnNQy39rvkMUIUlkKnYOACSf8KsNqdg0shktw5LsysyDgHoKoXbwytCYkK4XDgDAB9u9SWt2trFcAJ/rWT5TyNoOSDV641KwuZdz2gHmOfMJXLYOec1GmoWUeqW88cHkxRgmTAySxGPy6U20ksY4UgdBKwY5YpjPIOcn0GeKlkubOJsbI3OCw2KDj5MDPvnms+5aKS7keFdsbHKj0FRlcNnIpQpJ608Ke3X604LuBycY7UbcDrkUrKDxnnFIucYB/KnKjbxnJzTiMg5JPPSrNi/lvMeOYSP1FaM9/G9ibYGUN5W3zccsf7p9qwdRyZ4yRg+SuQe1avh3RbC80aOae3DybmG7ca1T4e0kj/jyHXrvP8AjSf8I9pSsCLMZPH3z/jTv+Ee0gD/AI8lyP8AbbP86QeHNIP/AC5rk9t7f40L4c0rB/0MA54+Y0Dw3phAP2QA567zSnw7pO4n7GFPux/xpraDo2P9Qn/fZ/xpG0HSAQPITHfMh/xpT4f0YEEW6En/AKaH/GhvDuj45t1x6eYf8aQ6Bo3T7OuP+uh/xp3/AAj+inpbrn03n/GhfD+kk8268/8ATQ/405vD2j5x9mBye0p4/WlHh3Sc4Nspz/00P+NL/wAI7o//AD7j/v4f8aP+Ed0hWx9nAH/XU/40p8PaRg/6OMH/AKaH/Gl/4RzSDx9m6f8ATQ/40v8Awjmk8D7L/wCRD/jSnw3pQb/j1PHQeY1J/wAIzpeTi3b/AL+GlHhnSSObduO3mGj/AIRnStx/0dsDtvNC+GtK5xA308w05fDGlHB8hgfaQ0v/AAjGlckwvj/roaB4b0vcNsUgPqJSKefD9luwftAX/ru3+Ncx4q0+1028t1t1I8yMs25icnPvWp4TQN4fiGert1q3NfLbtOrsuY3QKqkbiD14NRf2tNPZST28Cb1mjRULZ3BsZqN9chRYg0DvJKxVccYO4gA/l+lSJr8Rm2tZzbgMtgjA4yOaWTUZXeGWNWEJtzO4ADdD0z2/ChtbRZET7MzE5xiQeuOffNWmeO9sTKyBlKlgM56CsfUZcQIsarEyxRHesQyxYAkknpVywIRpVu7a0uRFEJC0aDK/MAc49uau3UllCyomlwO29lKnJJAxgjAPUHNQR6hYGFpG0qEegGfRuDkdfl96sMII7kwTaTahki81trE5HPTj274pYrnSiqPcWEMUcyq0R4JIJwc+mKhmurGBY5m0mMwydNpy2M4BI7CrRjtVtbuVNLty9uASu7g5UE8/jSyRRrMkKaPBKzIGOx/u9M59ueK0xpNhj/j0i/75o/snT8Y+yRflSf2Tp4/5dIvyqlqcFhYwGVrEOg5YImTj6VXtBC9zHNBB5KvAzYK4bqOoq4Mb+p5/SjPH3uc+lKSvuaF45pBgSEjdz1FOBw3JwKcWGABnn2pFJJI9OaTPzen1Ncj44IN3Z5AP7o/zq14TB/4R+IZGN7Z/OtZ4Rv37VLeu3NOUAfKFHB44/KkMeX3FEPPGRyKesK5yVQnHBK0qxIFwQCOmMdvT6UhiQHcFTnvjrTfJBRoxhQwPQcc1DdaNa3EEcbSyRyCNY3dOQ4AxyDxVzTrey0u0a2t4cRt94tyXPvU0YtIJlmjtwjhBGGGfujoKjeKxZVV7VSEXaoOeBzx+pqNLXT4n3LbkEjBPmMdw9Dzz1NSMlg+Q9qrKSTyD3GD+lJ5Vg90Z/IxIduTk4OOnHTinLbWCu+2AjzF2sAzYI9MVKi2kd090sZErDDEMeew46VY+2x9gaUXiHtQLxD2NU7o3EsweCeNExjDISf51XiikSczTTq58sqAqEdSP8KnHTOaU9KQ88EEU4Zx3xSKD68n2oBOeaUnHHvSk5zjOKTHBOcGuQ8cN/plmOP8AVH+dXPCg/wCJBDjH32/nVi4tL83zTQPmMup8st6Kefz4qKGLXyCZHGVB2/KoDHtmn2zawZY1uTuUFt+xVBxxjvWsVYtlQ1MVH3kHqPyp6qBxgU4jaOKQ7vlbsT6UABBnn3pTGScnimnOG29R3IpOCdoHI5PFPMZIGOBmmKpLEDIPapOS3064oPyqaVc4GAfxoDHPTFL2PuaME8Dt3xS4xgmmpyxIHf0pxAB/lR0Y96X2I60gBDdOB3pT14HPrQQTxS7cdqTIIOK5Dxoc39qowMQnr9av+E1A8Pw44y7fzov7mysrdppxM0s9y0SMJCFXGOvsM1ktO9vqMCR3xuYn+aSPeS2M9PY4rqJIdIglMc4mjzsIJlY5LAn8MYpkcmgTgeXNcMu4LkO+Mk4Faf8AYVl6Tf8Af1v8aT+wLHn/AF3P/TZv8aX+wrLj/XDH/TVqafD1icZM/wD3+b/Gk/4RzT85ImPOeZm/xpR4fsR08/pj/XN/jR/wj1j/ANN/+/zf40f8I9Ydf33/AH+b/Gj/AIR+xyDmfj/ps1RXWk2NnbSXG2dti5wJm5qu66VA8qXEk8XluwyZWIIABJ/WlhTRrl41iuJ3Mpwn7x+TjOPyqm2qeH90iGe83R53Ll84BAz9CSAPc0rX3h2K0iu2ubk28sXmiVWchEzjLEdOePrUf9reGknkgkvLmKSNDIUkZwcDAP4gsBj3qJtc8OLCXimvpirhCqbztYngE9ASMn6CpY9X0C6uVtbSS7nl8xEfazgRhjhWY9AD1HrSx6rpAe4jcXyvbztFsUO7NtJGeB32sceik1PaXWh3l4lpBPeO8hOx/wB4I269GPH8LfkajOpaCXaIS3525wQsmH5x8p78g/kagh1rQJ1WVJ7ptxYKEkZ2OCMDAHUjnHatCwfSNQieS3nuiiL5hZmdQUOcMM9Qdp59qep0iRN0d3cupAOVdznPbjv7UgXT5JlhjmuGdiw4lbC4BPP5dKpxzW00/lx3M2M9S5Ab1xWu4w21AccVyfioB9XgU9oD1+tXfCpU+H4Qc/fY/rTr+G0kg8y5uvLP2iRIoimd7HH5VQtLiLTL2D7dYRXAuGyJxwUXOOBXRtc6ELtbJlLyqwBzG7AdlJbGMHOAelLHLoP217Hywkiucl0dVLINxAY8EgHOM1ri6g2q3nR4bodwwfpUcWo2k0RlW4j2c8lsYwSOc9OQakN3bjrNHxj+Id+lPjkSZA8bq6noynINPooooqlfXdlCqwXkiqsyuQGBwQo3Nz7AZ/CqsMOj3cEbIFdXXeA7EMQ3cg88+9PSLSobiJE8vzWkymGLHdt/wHese2svChup4IlxLekxt5hcCXaSTtLcHBXqPSp73R9Bee1huXJjERt47cSMQwzuy2DzyO/HFWpdB0KWdtRltoXLP5hkL5XOCM9cc5NMg8O6GbTyooQYnKyY81s5AOD144JpIPD+hWl2kkMflyKwfiZtpKngHnBwTwDViXRtJnWXdGuZZN7lZSDv+buDx95vwJp8GmaXbGOWGNEFvyhD8J94/l87fnVefR9Bng8uZYiigf8ALXGByR3/ANo/nTbbwtoViYPItEi8lCsf7w9D178/X0pmmaPp2l3dzbpc71uFVFtycCJFJIUc+rn/AAq+mmacBhEAGd3yyn73r16+9H9n2UTF4VCOScEOeSeCcdzg1CujKNrBxhc9qdKxEh3dFxxXL66A/iBVx/y7Z5+tWPCq50CIjn52P61X1yNPsC3N0wEEVzIAoJDlzjpVvw7o1tqMjajOZRLE+wRt2GB1H41oXOjW/wBrsnTUY4lhx5YcZkwGz8r5BAPQ5yMUy50KDUpJWOqbrZrj7SscQA2yDABLZyQMdOOtQp4GtUmeYXUuW34j2/Iu8HzCBn+I4PXt9ajl8MQWgjji1CMNDcC4xcBcKGcZz6rxgA9/wqaPwRaRmMNM8qRlyokQHl1Ib2xk5HHGAK29Ht47TTUhhnE6qW+cHPU5xn/Ek1cWRGYqHBYdQD0/zikmnjgQySyKijuxwKcjq6B1IZTyCD1pQcjIINMWaNpGjWRWdeqg8j6is/XNLg1WyEU8zQLE4l81SBgDIYZPYqWB9jWZF4SgjZ5rW8YebJ5ykIGXJOc9cHjA4x75qTTPCw0+/hujeyzCFdoRkwDwRn2+8entVd/CDNdNK+o4Zn3qFhA3nnlhnBbBxkY4FMuvA0d3amCXUJNplMxdYVDbyOcHsvtWyulRw2TxvOoMk5mLMg2hjxgKeMf1qKHw3axhsSyFiwJYcHjqKbF4ctOXhnOCzdACM9Dn1NNHhmEojTTcx5xhQAB6/X3qZ9Fga0lWO4CrKYnVtoKjYQRx3Bxz7VQHhFHuxcTXzS/eyhiULz6DoMH0H19auvolrfQWuLnetvGIldcHOOM59eOaZ/YVmZXie5ZppQzHOAwz3H5VMNFtoI5kecgzoEzwuMHgj3zimw6BBaXQuo5HZlzgPzge1aoGI/XisybJmfJ71zGsDPiTk/8ALt3+oq54RXd4fhHT52/nSa5bpN4cuTJGGKXjMj7wuzkc89fpVjQPtGoQ6lcRKsDXG1I2H3QMYzwev/1qv2Wj3NhLhZLeaEAKPMUgouc8fiTSnSLhI0WNofuMjkgjgvuyP8Kgl0bVJZiyamyDc5AV2HB6ZqHWvD93q95JaiRYbWSOEySum/fs8z5cZ6hmVufSqNvo/iN1tzcSkOxkWbbdyBS3z7ZPYfdwBwe9P07wvr1lZvbtqMMmZFKSCWRdiBVBUKOPvAt+OKbaeFNfgjdf7SjQvCygrPIcSly3m9OTg4wa2rbRrqCzSJ51meOZZV812YEBACCTk8nJ/Gmf2LqD3TStfmONiD5UTlVUAdAMcc/nUUOg6nGIVOpEBFw4VyAx3FicY75q7faXcTm6a2nEDziPDKcN8pOefcVTuND1K50y7snvkb7UI0LPlwqg/Px7rxjjOarW/h/W7eFLf7bDIkMihSJZI90K9I9o4X6jPpT/AOxNeXYy38ZkTdu/fSASZBC54ONue3XvT9O8O6haX9lc3F2LjyV/eb5nPzHflhn2KjHHT2qObQdembI1NE2ZCESuQfmY5YYHYgYz2600eHNW3RiW9E0ayQviS5c7CjqzEDAB3bTweh71rpZXaX5lWb90ZS5G88A9RjvWL/wjuvQXxmtr6HyftEsnlGZ1BVySAcA8gmhfDetJGqHUVmLW7JIJLiXHmEnDj6AgY46e1X4NBuINKFkLjdtZdmZGIVQgUjJ56gnHvUqWOqxTzul9vXy2WBHbhTj5c8c8965xPDGuaalxaW12ZIEt/MhkiZosSZy4CDglsdSf4qtp4Z1n+0YL1LuMIBiW3e4kORtYBd+MkBju+uRTbjwv4hmLuupwifaRHL50n7pieSBjocDv/IVpQ6LqMV+LuW8/drIpWETOwRPnyvPXOVOT6ewrfB/dEn0rMckytxxmuY1Vv+Kl5B/49v6irfhI/wDFOxAgjDtzj3qPxBZi78OTkuwaK7Z0CrnPI4PpUul3M7aXqo0xC0m0LBGvGHIxu9AOh/A1UgPixJLKzZbuP7PMsLSeWkiNEMgylzjLYI4x74qVpfGQS6BR3ZbcOh8lR5r4+514GSff3pA/jBtT2h7iOLaybhAhQHIPAJ6gDAJyM55qO2v/ABiHnle3u2LIBAklumNwzjOMYBzye2BXY6ctythD9skMk5QGQlQvzHkjA9KtUUUUUcVXvlkawnWDPmmNgmDznHFZKvq8NkY0t3kd2JXd2Ge/ORxTLddeisbZDzKZyHZxuZEOeeuCAKr63feJYJLUadayuzRHzQsalA3PUnv0I/rUIvfEsbscXrxhwATZx5Me3IfAP3t/BHpzgUsd/wCLLrYrWr2zRxAy/uVIeXdghST93Bzn2p0qa/HZaPPHJdNJDARdr5QLMx2gkrnkgbiPpVu3n186Je3F0HW86QQxxLkAAcgc5Jyev0xxzh2l14yuHSaVLqGUQ3G9Xt02Ag/ugOeSwAz6ZIGKnml8Yj7UI42bZMiRkwr+9XkFzz2wpwMdaqPd+Oo3uHginkLgeUJYFxkcdBjg/MecHOPxt3d94k0yEzXEsq2qXDpJIsCFhF1EgBPJJ4x6Z4qzdf27fNpN1az3ESy2QklEUS7fMwDyD064AqXTrvxQ9pqLXlviZIc26+WB8/zcD1429T171Jp13rRvPLvFuXtlVjvmt1jLLgYYkH72cjGBxzWgdWUAKY8A8HnpTZWXzuABmua1UbvE2R/z6j/0IVZ8Kkjw/Cccbm/nTdeS4fwzOYJREq3hMg3YLjOMCr2hXSWltqK24M0FuQYsZJZiOV59x+tPTVNQJjWUlJApR4xHgs/OGwe2MUpvdXtmUyjfE0QbhQWUkgZOBj14qS3ury5tEf7U4l+0qjqqqcKWx6ccVJfa2+n3UimIzKJVTaONo2gk+556VDH4lllYItmpc4AUScgnPXjpx1oTxFcy3i2y2Bj+dVZ2fjqA3Hp6GrWp622nz+WtnJOPL37o+nUjB/HH51Um8Vi301bx7UNufaFSTjGzcecdh/I1BJ43t0h84W6MnkGfAm+bGQNuMff5zt9O9Lc+M47cSp9kSSVJFjQJONspO7lTjkDbycfyp+neIbu91YQSRQxx/aXt2jV9zDCFg3QcZUj8aPE3iKXRprTyY3eMbp7vbCzkQrgHp93k5yePlNJ/wmMKIT5ETBY0fCXG7duzgDjnH8Xpmkfxiol8hbNWnNwsCr5/yvkkbwccrx1xUZ8U3LaVdX4giVoJ41EIfLFSBkHjvzg4qxb+LDcW90y2S+dblAI/O4fc5TrtzgEelVbjxyI45ng09Z1gijd8XA+8+0BR8p5Bbn6U1/G0sN3cRPp2VhnihdzPhVZ3ZB/D90FcknsaW78WyhtOlhiCxPLIbvYpmVYlkMWQwGBz82T2UiqsevazcSiC3uFmnkbIEMUZABVyuCW4GV5DAMMH1q9q2vajYzx7RC8YtQZ9g3bJi4XI/wBkHIP1BqGDV9TvLaWRNQWN0uli2qsT4UylegORgetRa/4j1XS9SmslRJ0iVXLGLO5ZFCR8dP8AXZz7VdPiic2vlxWytN5DP5hfhSFcnIA4bKfd9+tRjxo4t/MGmMzBRuVpghDEHggjI6YOM4PrW/KZHufJPAa3JKg55yKy54Gi8tXG09eauSJ8xwMk1zOrnb4iXPP+jdf+BCrXhRR/wj0Of7zfzqPxDJcJ4bmaCBJB9rbzGZAfLGRzVzQ2h0nTtQcqJHtk813jABcbc4PbPBqW38URxtcx6kqQyW6K7iFi4VTt65A5yw9j1FQDx1YvGGt7O6lY4+XCDqfXdzxzxnHGcV1QAx0pvloHL7F3NjJxycdKQRIHLqih2wGYDk4pXjSRSroGVhggjqKZFbQQx+XFEiITnAHFOWGJY1RY1Cr0GOBSiOMDARQOvApdicfIvHTimG3iMqylBvQEK2OgPWqmpXxsYhIsYcsxBBz0AJ7fSq15rlrZ2ySiLc5GRHjBx3qUaxYfaEhPDsoIATO0H19OTUk2qWUN21qwZpwAdipkn6etNOqWK7mCvjJ+YRHBA6n6D1pJNW0+JCQM/JvICdu2fSqF9rdv9uFhcWDvBNaLMSFyTncSMewQn+VOg1vTrXR7a6trKdbSbd5CIigsgUuXxnpgE88n05qCTxfotoYvLjl/0lFm/dwgHDYw2OpJyOmTzU9j4lt7+3vroWk8cNmoJLbCXyCTjBI/WoofFllMoe20+7l8xxGDGifNJ12Z3YyAM56ehNNbxtpmZQsNy/lPsbEa88kE8njBUjBwScYBzWhZa3a3dkl2IpI0eRkIYKSCPXBPp9fWpbjUraEQt5TMJMgHZyuCARjr3pF1GyuZZTby7pooueCOD/8AXqlJK8xHJJHTPJq5L99sg5GK5fXjjXYwP+fbr/wKrfhVgPD0IK5+Zjn8aj1+7S28OyDy3kMt4yqobAznv61e8N26wWt9FdEtMDmaMnKldvBAx3GafBY+GAqsLa3XbsZXkOckj5VyTzgAcdBgU4w+G/s6SfZ4GUEKFxuKFvUdvr2rXfUbSIMDcR7lO3bvGcgZx9aT+07PcQbiMbQCTu4GTjr9RTZNWsk3f6TGdiszFWyAF5OapDxVpwnMUvmQKCVEsy7VZgASo5zn5h2qwPEGlGYwjUbUuDggSDg4z/KiLxDpM05gjv4WkEgjwG6sQCB/48PxOKik8S2EN1JBceZbhHZBLKuI3ZcZAPrz079s08+IdM+0rAt5EzEFjtbIUAZyT9KdH4g0uS1Fyt9AImUOCXwcHpx/T3FTObK+hRnaKaJxvjO7gjHUfgayItV8MXUMd07WsfnBmUTrsbCkg8HpyOPWr8d3otwwdZrV28oYIcZ2Dn8hjPtUIvNAvdRWJJbea6kDkFGz90AtyPqKhttS8PXdr9pR4FjYk/O2D97b0z3Pb3HFNl1bQtPvGtZoBAspWNpmT90WK71XOc5x049qlvJ/Dtxb+dcvaSxxlE3GQfL12jr6FvwzVG6uvDGu6adM+3R28ETlU2Mq9F525zgYJGcVJ5Xhq2sYLmzso7qKSXZH9mAYlgpPcjoFPB9uKfBceFIbOVEe0ghuAvnIxxu3cjcD35/Co5YPB0FuJnisQjYAI5JJbGR3zuPXr1q2LXw7c2lxMkNtLArYl2jK5HbH4/jmrkNrpVvbmCNYFQtvKburHv8AU04Ppo8uPdECgLqCeV7kn9KdDDYxs/2YRbiPmCtmrQVdmdozj0qhKf3rdBXK67vbXY+QD9m/9mq94TAHh6Dd93c386j1+5ig8OXCySgCW7YBdm4sc9B6fWrfhdZXtb6e6bLTN+8BXDJx3OfQ8Vam0zRXijdpVCIAFIYfwjHp1wajt9J0kyrE100zEN5ab8ABueMd6fc6ZpKSNHc3kiNnewaTHUY9O+KZJp2jS2kga9by3yWJcep7Y9TQ2naK0EkMN0ATbG23Bs4VgR9M81DL4V0nU0F3LOfP3tK88BA3OQuc8cgbQQD0zUf9haA9mbVL1kjBRlKyAFSjM6kcdi36Clbw5osU0F1NdyMzzb9zuMSPkEjgd2UH+VOvtD0nUGlluNSkKrOZUQSKFilPccZJ47+9PHg3SkuIWEswMagwx7wArKuA4AHJHXNNk8HRr5LW99PG0M6TLu2nYRt3EcdSFUc8Vfk0qwgsxA0rRpBbtDv3Dcqv1P1/+vWePCWlpFJLa31za20vluVjlBQGM5RgWBIweffvTm8I2czh/wC0btmbzGVgyH/WD96fu/xfp2xV+y8P2tjdQXEDS7oIzEoJGCuO/wClQReFLKK4ilEs5WGRZkjJG0OMfN0zyFAqzceH7C6upbuWFWmkdHMjKNw2gAAHqBxzWXN4H0u6AS5uLmd1j2EmQAlcALnA/hAIB/2m9akHgyxzeySXFzPNegCZ5GGSQcjoB3xU1j4c3aattq7reP8AaXuGJUFSWUryCOcA+nWoIfBOmQknzLlvkKZZsnkYPOO/WppvCdlPNLKZ7gCaXznQMNvmZJDdOwJGOlTWPhqwsLSW1QymOWRXO5uflHAz6AVIdBtjgebLgBQMgE8dOcU3/hH7Qhl8yQhht5A6ccdPYU+DRbayMckRkLRBsZxzn19fapDqkEalDkds8U2fO9iCO1cxq7Z8SKrDpa/+zCrPhRf+KchJORubjPvUuq6e9/oU1ssCSzG5MibnAK89RVvRI7rF79uiFu8oVE+YEYAx0H1py6SVjWM3MDogYoGU5LMB1we2OMVINPMTpcfaBPNEysBuwGwpGPTv1on01NTS4kusRPMiqqGTcEK5w3HB65pDpXlXTTxXaH5t6rLlvTqc5PSo5dKM6XEc13D5dzIsjbMjBBHAGcdqdPpDTuHOoKinG9UXAY4wT+K8UkmlGe+S4kuoV8iQtDtB+UY4Ujp9fWpoLSUQQwS3NuVhmEqlM5PJJBz9arXWmTTh989uWebJZeMJhgBj23fzqObQ2c7l1QqdjA/Mc5LZJBzxkYFO/sSVom26owlKgK4dvlPHv6cfjToNG8i3uIzehnmVVBZy23a2Rz170sui3MlqttFqKInVuCSTzkdenNOXRWS3tLdNQKpAGDqrEBsjg/nTrjTbmW6WYagpURhWQsQHIHfHv3pTptz82LyMnduzvbP8+3ahdJuH3+dqO4iMJHtYjB/vEZ5NPk0qQxqkN0qERqmdx7A8/XNUNQ0C+vJbby9RRYoljWQFiDIATv5HPOR37c54wweHLovDHJqIaOO48w/M2Wjz/quv3R1/+tUFp4Xvv3gm1N2WIGO33SNwCAS3B/vFsE84xVg6BqEVwJYtSjxHcmWNWdhmPtEf9kdc0620C9gs7iBtQR3lVMOzEkYYE9exGeDn8uKbFoWoxwqkt/BMylCWZnzIo2jyz6KdpPQ9aY3hy+eNlfU9zE5yrsAecgEHOQOgznj0rR0nT5tOtrlZboTlzlWySffr19s5Puapx6YI7jciEAE7d2SEB64rUl+WU4I68nrXL6md3iknP/Lr1H+8KteF2C+HYBz95ufxrU3DIJApwyG6jJ/SnZzngZpNw5CgUmW5Y4HNAJOckGgtkEZzilHAXk00NjnOe1A3HBXgEUuM9MEj0pmT36e9PBJOOAKVCcnnvUwbHI4pCfl+6Mml7ZwCRSKPm7c0uCc9Kdgj0+lBb5ffHSkxyBxilIwc8UckgnFMfg8AcelKvOSRmnfhTCq7eOD9aUdQDyD79KQ9Qfwrm79s+K22nH+ij+YqTwwf+JBCByMt/Otjgpz/ACpFHGOw7UoHzfU4qfbEhKh2yOuFqP8AdFc72AJ7rQPLAyshx/u0oEfLFj/3xUL3EYuRboGZtm/pgAZxTyNpo7Dnt2pF5HykjFG3KZ/KlHpgk0DPmHH5HtUoIHUU8hAmSxGecYoATH3j78UvybsB/wBKVdmT8/6ULh85Y/gtQ28y3EYdQdu5hz7HFTBAAGLgbunFAxn/AFmfwoIXGd3f0NINpc5f9KCY1U/Nk54B4pSR6/lTeOvpSZOSQRSYwcA+/Sucvhu8WPgjH2QfzFO8Mf8AIAtwR1Zv51s7gBgLQGAyTnB9KcuC2ME8inyLid+D1qCRHZQBgKuW5HOe3FM8qZkOTgsOfm6VM2WGNuPeqY41b73/AC7/APs1XC2MAmk5BAxjigHaDzkH9KOoB4Oe1OxgHIpEALcipsAHFLOhkhC8jcMUwwzc7HJySWyfwpGt3EiEEllBHXpnvSqkvlkM5bPpxip0BDD5eAKp6fxaIFz95uPTk1eYZjRcZzkViJa6nCka26pEBKS2SvzDjGcduvTmiOHWlLNIx+9woZc457/XH4VasYbuCLy5VaXgEHcPl9R/KprlCRBkYzNGSOuOasYweB04pDu5OP0o2c+9BJCn3rm707PFLHH/AC6AfqKl8LhT4dtzkZBbP51rkEEZApNoY8cD0pwUbR2GarNptq0jnM2Sck+a1R/2bb5IzNg/9NW/xpf7MtyBxN7nzW/xpf7OtwuA02fTzW/xp0FhFAxkVWDkbSWctxn3qYIAQRTivOM9RSMAOxx34pmMhTnqcdKeeO+c8YoAO7kDIp5PqeahntIpnLO0pP8AsyFRSCwt+m+f3xM1ILKAAfvLj/v81OWyhAwJJ/YecaBZR/35x/21NWoYo7eIImQAODnNRTW8c7hmkmB6ALIVA/KkNsnTzp8jj/WmgWi8ZnuP+/ppTaAPzPcEf9dTQtsquGE05wc4MhI/GrHGetO3Dp/WkO0nPfNBIYnB49q5jVgR4n64/wBFH48ipvCef7AhYdct/OtSSFGbJXHfO40LbRqxYDr/ALRp3kxfdI+Y9PmP+NO8mPcMgnH+0aPJjz9zJB4+Y0G3hIbKkZP9880pgjGSEOMY+8aQwxkY8sn33Gj7KhIOw5A6bj/jStbRsoLIeenzGkNsp6ocY7MaaLVM5wcY/vnin/ZYyCcHOePnNRrbKWYbWI92P+NSGFBkbSB6bjSiBP7h4/2jSeSoHyof++jTfIAP3T+LH/GneQpHKnr03GjylBHy5H+8aDGoIG0/99GgQguW2nnp8x4oEKlslTn/AHz/AI0NGp6q3XP3jSGLB/i65A3GnFBjkEZ/2j/jQFUE8Nz6uf8AGl2L/tZz/fNNVAD1fjvuP+NPLYPOM9a5zUyp8Tk7v+XUf+hCrHhQ/wDEgg2/3m/nWg2o2am43yhTA22Qsen0pp1O0WGSRZAyxoHfaMlQT0PvUq39owJM6KFYrljjOOSR6jmnC+s2Ab7VDhs4+Yc49KjnVpryzgE0gjlkIYxtjI2k9av/ANh25/5eLvr/AM9zS/2HDjH2i7x/13NJ/YUHa5ux/wBtjR/YcP8Az9Xf/f6j+woT/wAvV3/3+pTocR/5e7z/AL/f/Wpp0OLJYXV506ed1/SgaHCeftV2D7y//Wpw0SEHIubrJ/6a07+xoh/y9XX/AH9oOjxH/l6uv+/v/wBaj+x4+11dD/trQNGjBz9ruv8Av5/9ak/sZOn2u6/7+f8A1qX+yE/5+rrP/XT/AOtR/ZCf8/Vz/wB/P/rUf2Qv/P3df99j/Ck/sZM5+13X/fY/woOjg9Ly6B/3x/hR/ZA73lyf+BD/AApf7HX/AJ/Lr/vsf4Un9jr/AM/lyf8AgY/wpP7GHX7Zc/8AfQ/wpDp4tVZzcSysenmHOPpxUWVydw78DFc5qZz4oIGW/wBFH8xUvhYkaOIsjbDMyKe+M1ZbR7XIdPMWTJJcNksTnrn6mnW+l20ULxgsyOoXDHkAHP8AMmmS6JYuVOJDtYt97jJOfwpf7EsPNEqhwykFWznGKvPHme3mWQIYJAx9xjB/StYahAehP5Ug1GDP3v0pf7Qt/wC/+lKL+3P8f6Ufb4MA7uDR9vt/736Un2+AqW3Uov4D/H2oN9FnjJ/Cj7dDgcnn2pftsPqfypPt0GcZP5GnLeQt0Yn8KPtcPPzdPagXcJ6N+lKLqInAb9KPtUQON3NBuoh1b9KPtUX979KPtUP98Ufaov736UC6hJxvFL9piH8YqC4liljwHGRVUABsY6etcl4mnaz1mOeP7zwbT6dateFHB02dS2P37dq2cnpnAHemgYyD1FLvz0xzSnJb8OtJzk5OfpR0frSjkfc70pVtoGOlIoYnA4HpUjRjaAQDTNpwB6GkGcYY49sUpAGBnNCNsc5OKf8AMfl3duwoB65bH4UoAyBvIH0oUjPJHPTin/X8KVeme/Sl+v4UitzgZ9OaN2WIxijOW+lDD5s7e1Ny1KRjqaUgk0hPoKcpxnORntXHeNjjUoAOnlf1NX/Cy/8AEtlIAz9oetkqMc8/jRtIH3frSrgDOOlP+Y87ePSowoyee9KV5H86rLD9qu7nzJJx5ZRVVJCoA29cVL/Z8Paa6Oe/nGs5ri0iwW+3rubap87O/krx+Iq79jQgHzboccgzHIqtqCfZIbeSG4nDNcRq26UkEE8itFkO77uMdKVBhm4zgd+aZNdC3Xc0QJZgigKOSTgUp1K3QgTvHC+MlJAAR6Uj6naIvzXFuOQMnHU9KliuVmiSZUXa4yMqKgsZjJYxSSMWdtxJP1NXBg4OOKezbXKgLx7VRvNWtrBil06IRE0q5AGQvUD1PPSozr2li5ELXlqpKb8sy469M561oEjdnCDPbANV4pGe+mRgMIq7VxjrmpwCAScj2pCARx2pV4FDYDHK00cHOMe9OJycDJrjvGhA1GDP/PL+pq94TJ/syTkn9++a2gPl5NKHByMc+ooyCgwAeeaePU+nHtUeRuOD37U4HLE8Y7VSk1CG0vLlJUmJfYVMcZYEBcdRTRrlqORFdY/64HrVNZ9LbBa2vZADlVaNiBznA9smrEesWqIEZLvC8DMTE49Peq97fRXv2eKGCcMLiNstCQMA81tksfp9aQzJFE7uSFxgBQSf0qpNcWVwmyRpxghgyxsCCOnaoTbaW1ylyTctIpDAsrHJ9+KabHS/K8ofadituVSjYB79u9XYrm0it1hTzAqLtGY24H5U7S48abCCrZAPUY7mrajDen1qGS9tfNb5m69o2/wqlfwaVqLbroO/7loRmInAYgkjI4PHWsk+HNLS5hltrm5jCxGBz5PLR7SoXO3nqeTk10CXlrGiqN4CgADy26Dt0pbWVZLy4dQwVlTaWUjOOtWWyT60ijGTgml2gHdS7c5xwaAONvtmkDbXziuL8cgf2lAQCcxD+Zp+hazYadZSQ3XmrIZmbCxk8Vpf8JRpJH3pf+/RoTxTpIBy02e37o0g8UaWD/rJsenlNTh4o0onJkmB/wCuTGmjxPpWTl5ee/ktSr4q0kZIeX2/dGj/AISzTOB5suP+uR/wobxTpJOfOlDf9cmp6+LNJ6GaTA9ImpsnirSmIIklI/65GhfFmmbSPPlI9PKakHijSABiaQf9sjxSnxRpJH+uf6eUf8KP+Ep0oNkTSHP/AEyaph4q0naP30mf+uRpf+Er0kjBmlP/AGyNJ/wlGkngTyAe8ZpD4n0kFdtw49R5Z/wp58U6Qf8Al4cH/rmf8KU+KNIOB9pYY/6Zmm/8JPpGP+PliP8Armad/wAJTpI/5enxjp5Z/wAKavijSc/Nct7fIf8ACnHxPpBI/wBJbP8A1zP+FDeJ9II/4+Wzj+4aRfFGjjg3D/8Afs0q+J9H73Lf9+z/AIUp8TaOMn7WxJ/6Zn/ChPE+kgHF2ef9g0g8T6QxObogf7h/wrmfE9/aahfRSW0pdFjwTtxzmu7/AI2+tKegoPWjv+FFIeh+lM/xFL3/ABoNN70vpTewo7Uppy9fwpr9aaf60xe/1p5+/wDhTB/WnJ3pw+7+NKf6VH6fWn/xUj9RTT94U2L7zfWnHofrQO/0o7ikP3RX/9k=" /> </div> <p class="paragraph"> РИС. 11.3. Выбор учетного имени пользователя </p> <p class="paragraph"> 4. Прокрутите список всех учетных записей для поиска учетной записи ASPNET и щелкните дважды на ней. Затем щелкните на кнопке OK для закрытия данного диалогового окна. </p> <p class="paragraph"> 5. В нижней части вкладки General выберите в списке Database используемую базу данных Novelty (рис. 11.4). </p> <div> <img src="data:image/jpg;base64,/9j/4AAQSkZJRgABAQEAYABgAAD/2wBDAAoHBwgHBgoICAgLCgoLDhgQDg0NDh0VFhEYIx8lJCIfIiEmKzcvJik0KSEiMEExNDk7Pj4+JS5ESUM8SDc9Pjv/wAALCAERAPQBAREA/8QAHwAAAQUBAQEBAQEAAAAAAAAAAAECAwQFBgcICQoL/8QAtRAAAgEDAwIEAwUFBAQAAAF9AQIDAAQRBRIhMUEGE1FhByJxFDKBkaEII0KxwRVS0fAkM2JyggkKFhcYGRolJicoKSo0NTY3ODk6Q0RFRkdISUpTVFVWV1hZWmNkZWZnaGlqc3R1dnd4eXqDhIWGh4iJipKTlJWWl5iZmqKjpKWmp6ipqrKztLW2t7i5usLDxMXGx8jJytLT1NXW19jZ2uHi4+Tl5ufo6erx8vP09fb3+Pn6/9oACAEBAAA/AIxq2os7L9uumOScec3H61J/a1+cYubo/wDbZ+f1po1e+Y8XNyT6CZv8aausXhH/AB9XH/f9v8aVdZvMn/Srj/v+3+NL/bF5/wA/Nz/3/b/Gl/te9/5+J/8Av+2f50LrN7zm5uP+/wC3H60p1i7x/wAfNx/3/b/Gj+2r5V2/ap+f+mzf40n9r3g/5eLg/wDbdv8AGgazejP+lXH089v8aUaxeH/l4nz0/wBe3+NH9sXmBi6ucf8AXdv8aT+171Tj7Vc8/wDTdv8AGgazec5urg/9t24/WlGs3ucC6uf+/wC3+NINZveP9Kuf+/7f4046ze4H+lXH/f5v8aRdZvcnN1ccA8+c3+NINZvCP+Pu4/7/ADf40n9tXuMfabj6+c3+NKdXvQv/AB9XPP8A02b/ABpsmo3EqBZJpXx2eRiP51F9rk3fT1zR9qc4zjPsTTvtUmAMZ/Gl+1Pjp+GTWnp9mby184u5diwWOM84HXrTGtFdEMbXI84lY2YjaWHaslZpcf6yT/vo1a0i5htbl2nGYpF2uR94DPYjvWna6hYowc/LGIkQRt1UjO5vcnj86zNJljtLomYq0TptdhnOOCcY5Bq0LjRVaPbbMwET7mk5LNtOMgf7WKW2uNFEMZntczGP5wQdoYEAfmM1C0lj9psWgjWNUIabIJ53Z59eMVZgi02Z0RUhLMB5Y+fcW2nIk9s+lJeQ6fZsU2IZREHMQLFN5X88Z7Gq8U1tBqM8sYKxGEhFTqGIHAznHOak+0WNxJ5jwQJK4Zv3pYqGGNudvqMnp1xUzw6KhiL7FhcBiULmQHdjjttxn3oMmjQ3MJijgkBfEhO7Yo55A/L1pCNFa1G8qZMAHG7OeMYP9371Z+pLbfbcWhTy9ozsBAz+NWLOayXTpLW6QMZZwSyj54xt+8D9e3etC4k8PM8sp2T5LEqAylj/AA7fQHH86oXcejx28n2WRpZVG1M5G8k53ewUZXHc04HTZLeMv5JYRhZC24PwgA244zuBzmrD2ljFYi4dY4wdnlMrNuYFDnd2Jzjp61nXZsyh+zRqhWQgFScsmBgnPfOaplABTdhPJ4FP28YHNAUnnPFLty3BpShAHI57UHAwMjrQQDgVr6XdRW0No0hk2JI7N5R+YHIwParF1qMeoXtrcFJIZEchk/5ZKvYr6H1rnFPX611Wg+G9P1DSkuJllMrMw+V+ODWofBGmdSs+7/foHgnTCeEm9P8AW0f8IVpvI2TD6yUHwZpSggrMP+2lIPB2lluY5gOx8w04eDdJC8rNzx/rDSN4P0kNgRz9c/6ym/8ACH6Vg/u5/wDvs0v/AAhulEAeXPzznzDTf+EP0ojPlz/9/KZ/wh2lkkIk2P8AroaQ+D9LGBtn/wC/hpD4R0vss3/fw0p8JaYP4J/++6avhDTdpyJ8jp89OHhDTNwOJ8H0ekPhLS1JBWYD/rpzSf8ACI6UAD+9yf8Ab6Uq+E9MyP8AXc9fnpD4U0wfwzH/AIHTv+EU0rbjbKOeP3lPXwjpJXO2U5/6aUsXhXSoz/qHlB4+aQ8VMfDujZI+xLweu9v8ad/wjWjYBNkp/wCBt/jTf+Ec0XtZJk/7bf40Hw1o4GTZqBn++3+NA8M6QDkWYxjn52/xoHhzRyBuswc9i7f41wmsQw22rXMMKlY0kIUc8CvQPB8Y/sCJvUv/ADp+oyzxX0QjEzLhcKmcM27nOB6etQx6rqUhkf8As5QEz8o3ZbkDHsfemHVdTSxadrAFgQFUBjnr/wDqq7avMLfTvNLrJIP3mepO0nB/Gqp154EkM7NK6yhQqYAUc98+31qSXxF5EIb7LOSyq2A3AB6En3PH4UravdT2sUlokkZkmMeDhmwFJOATjtVebxO0UcIMTsxK7ipzu4547dRz7GpH8Q+ZBMUjlUxoj8sOdzhT/OodU1q5sdWmjF7HshaICz2DdIrAliD1GBznGODmqZ8aFX8zyF8vYcR+b85Yc8cdMc/jTm8XGKOVpIllAZ2j8uXnaCcAgDg4HHryacfFjGVlWzd+4xOMMB6E8ZPpn16Yq2+ttHeXELqdqkLESdoYg4bk8Y5/Smv4iWNP9RI25scSDPHXPp7etSWmuJd3scCrIpcuudw4wM/rUmn7n09GZmdiWySferJGCQcgYpAcc9acOTz0oHC7h+FOHKnHHqKfjIGBg+1NYZIAJ56kU4Lz1xkYprHoB1HWkGSp3HjPpS5OaUAN8uMV5rrq/wDE8vMH/lqa7zweSfD8Xpl/51rKSrBR16nmlJJ3ADrUab93LHj60hUGRHdcuhJGOME8fyp+yAZBhXls9OM+tKfLBKtGGB4x2pVELdI1AB4570jCEE/uExjHTt2qvcW9pcxeRNbqyAqwXp905HTsD26VI7I3zeSMnqe9NXycf6heBSkoRxAvbPamoE/559O3QUjLE42yW6N1wG5ApRHAwO6CMk8n8OlNjWLeW8lQxJ5HFJDHBbwrFHGSEznLHuc1IWUr/qhg+5pCqYyY8AdeTSDy+QEPHuacojGf3ZA/3qenl7STHjJ/vGnKRgnyxuPTJpmQH2+WpPtRuRRkxj2HNLlRGP3S8d8U0uuzARAc85FAkGQPLH4VFLMRdwRooVWVy3vjFec65zrd4en7013fhBgPDsOTjDP/ADrVCl2BGOvXNYWo6oVJ+z63p8OMjlm4P/fJq5puoobQte6hZSMDgSQFsNj6gVeVw+HByrDIK9D704gsBjP1A4oBwMk4Pam7zjA59sUE9cg00jlCB0PP0prPtRmOflBJwOwFVYryaSJZI7K5OVDA4HQ/jT/tM2NzafcgeuAM/rSfaJgxA0+6OOuFB/rQLi5wSdOu+Dwdg/xpRc3Awf7PuiD1wg/xoM0+QP7PuQcZHyDJ/WkFzccH+zrsg8cIP8aXzp066fdjjPKj/GkFzcfe/s266f3Bz+tL9qnYZ/s+5PYfKOf1pRLc9f7Mu8/7o/xp/n3CoQNMvOf9kf41NGruE3qYmI6OOR9aeUjU587nP92ormRLdYiWLl3CDA6Zpe+D0pM7lIAzzzQoIcnmoJFzqlpnusn8hXnmuEf23eZI/wBaa7jweR/wj8Qxzl/51sRsElBxgCuG1HwnrEj7IdPLhCcOrKAwznPWtfStI1I6c9tqGmPEVDLG8LLvwxye/FaWl2k1nZiGUkNkts6+WP7v4UuowXs11HLaOTEIUV49+AfnyfxxVZT4i8yQkog3ErgKcg9vwqxp/wDahlkN+yLzuRVAwPbOeat+YfmOMn37Um5W2qFCDPU+tMm2i2l7nY+fpg1TtNAkurKO4MgVpHjZVCgjZhc59eh4PFTw6PdxJH5tulyI3/1TOAGGGAPpxkGo00W9K7PKWI/aTKWDDDr82E45I5A5qwNO1IzLE3lrZFsmLcSQM7iM/Ubfoagi0i+857j7OsRKEG38z5MnjK49B69TmraWFxMbKaayRZLaF4yGcHcdoA5HbOarLpN+LMpBEtu118twhf5YxnPy4/Efjmkl0fUJQ6lEZ5Igjylwc4wOPTpkjpT30C6hmka2mLRuy5RiAMAHoO3OPzqay0p1j0/zbREa3kYvnb/dIB4464rcpaz52IvCB0wc4qlIzpJtEZf/AIEBiq14522vmLgmdCc+tWgzALjt1FG4kEdjQd2Rg596ryFjqFoeOjj9BXneunOuXh2j/Wnqa7nwh/yL8Y9HetYLvUnp/Onq8i4CuQPTNVbxb6Vg1vqUkADDcoAIx3/Gp9zNz1PqaXKjoQPUUBgMKD9DTQPmPIANI3BwMYpCcZC8U1lzGQe4wQfT0pYLmWOOOJMKqjaF9AOgqZr+bghv8KRr6bccNR/aEufvcUC/m4ywyaR9QnB++Bzih9QnHO4dOtINSmPRx+NKNSm3/fFL/aMijJYdaBqE2TlgBTv7Ql2n5gahkb7SpEnG7g7Tg1WNjB53Lyn/ALbNxQLC33IcSEody7pCQDU+R3FO3ArjP4U0cZHQ/nUEpP8AaVou7jDnP4CvPdbUnW7zI/5amu48IH/iRKc8eZJ1+tau4BWYnA7npiq6anaSWv2oy7Y8EkPwQAcdP89abBq+nywrILhEVmK4c4I69acdW09XCrOjZHVW4A6HmnS6jYxKu6ddzjKjPUHpTF1GyZVxdxAscY3VYZ1TLOeB39aaZ4fvCRcHgUv2iAgEuu6o5JoAhxMN3tTI54u8gJ6U4XMYxlhgnHSnedbnOXGfSmrcRbmG4E/XpQZIQvEi8GmebGz4EinPU0pmhII3LnPWo/NjUncwI7UpkjOMEe+RTt6cjcMfSgsmDlwaessezhwM0+ORcYDbiMngU0v+8ztb1+6aVpCYxhHBHqhoDgYIR8np8poDBlPyvu9NhpBnn5Tx7YqGVW/tC0J/uycfgK8+10ldcvBtz+9Nd14Rx/Yaj0lk7VqSRCeJ4pM7JBtbB5qlNoljvcASIjDmNW+U/wCSAaYdDs2CMwchARnIzgkk9u+aDoNiWBxIMBQCG/u9KdJotrK4nkeeSUfxFu/r0oi0OyiQhQ/MRhTLfdQ9hV7OAADweMUEMFxnjPrSgttOXIPpmmtkKRuNNXoBuJ5qR8BRgsR2pnzKD19aTqDlzn60oDheCQO/NB5OdxIx60hbO0bj+tG48DJ9eKTc+cNmje3B3n6E0b33E7jnHPNOEjeWeT+dIXOOuePWhSC+MY9/Wl3HZg/hmgZKcnkelOUAAtu5pDkc44qtLzf2pGQcP/IV55r4xrt4DyfNNdz4QONFxu/5bSfzrWGDx6c0gbLcDn3pN3XIOPSkDnBYDOBVaKG8kvlkZJEgJYO/mYCAfdAXvn1rE8Qa7qmk6mY4Y/MgES3J/d7j5YyjL9d7Ifpmi28R3kaRxXlrGzrN5DzM5UB+MsQF4XmoYfF9zHYpcPYi5fzHjcRyEEYOFbGPuklQDVyw8UNqDSH7B5UYjaSIliWfHqMcc5HNPm1ueGyKvAxu1IXBQgMc4Jx9OaP7cmhWES2ZkZxncrYGMn268dKWXXLqO6VHsiqbFO0EnJPPXHQAjNLc6++9IIrYHcAWdSSuO+CR0x3oj1xyBiy3fJub5jlcdjx19q2SPlK85NNOVHBH0FN5GKXBznoabkqSeSKUjIwpPrTQp57VLtIgyT9c0kaLjGfrS4+b1xQxYqOKcAQB3puAOTj6UJ1bOaryKX1K0xnlX/kK878QHGvXg5P7012/hLnRicD/AFsg4+tauSu7Pek3EH5W6+1BfPHrxQNwBU56UGR8KCTjv7017qGF1jedI5G5VWOM9qmdX3cgDnBA7UvmKTtbO45249qad245HPSlYtgN0b8xTAcDk9+tPMhLc9uab5u48DHHH0qo+ouZnjSFT5bBMtKqZOM9/rQlxcyFgtsj7TglblDg+lN+1zM42W8TbwcYuU5x+NPV9QfKx6eHZT82J0yKTzLppNgsVZwPu/aEz1x0z60NLdpvlNkgiXq32hMD60kct677YrJXYqDgXCk4Pf6VLt1PnOlnHYCZads1Lbj+zG5/6bLTki1RuE09EK9DLMMH8qPs2tbgfs1oOecSt/hTJE1RXKmC1HGcea3+FJbSzvPPFcJEpiVSPLYkc59fpUjM55BHp0pVbAO4cZ/Oq8jf8TG02jHD/wAhXneu/wDIcvMjJ80813Hg/jRjx/y2kx+danOSM/SkCMGppBOSevanqCBg/jSFScqOo6Zqpe2D3cpKTIiSR+U4K7iRnPFVH0OSScs13wScDB556nnrjim/2FO92s0160iKQXQZG/H4/hWpaQm2tUiZg+3qwHX61LJgqOu3tUShl5PIz2pdzNkbhnvTuBzkD0qraaaL/Ubh5H2xxsQwHBbKr0Ppwaf/AMI7KlukUcyD5SG3np97ge3zVJ/Zd41485htYkktzDtjk+715PHPXtig6HdxQRpa3EUTRgL5mP8AWAcrn33Zz7U248Py3DJb4iW3iChJVbD9fmJ45z+VTjTb1re9t5I7bbcjhgxwCFCj5ccDirUNpMurPcPHCIlTbEUOD2zkY56etaO5emRRkeooyB1NIXUdxXPa4YrqUwiW7hZGB3wK3+TSWJ3TXUiK4QLGgaQEEkZ9asLgAkjkmmhN2c/XBqFlP9oWp4wofjPsK8815Sdcu8g/6w967nwmoOjr2YSydT71qg4OSQQDzilJJABGPc0z5M8/zp5CYOD1qMucYwMisjV9cfSbpCUjFrGivNIVLEZOMcfdzg4JGCeOKcnia0ndo2s7iPZNHCd5VSGfleM5IxzkVUfxjCZ4DFZzGCQyhjld2EXLMOecZ/LNaLa3bR2EN2VcxXBOwAZO3pu+nQ/QimvrMKod0EuETceV4Xt371GuvW6rloJUwoJBwMZOPWtJX3KOCCRknjimgHOe1OEr7TtLYHYUolkI+8fzpTPIG5dsds0onYr/AK0g49acJpNv+sP55oM74P7w/nSrNIGOHbGfWhp3wTuPB9aBNKEJVyQfelErEDLMR701ZMMwGTShyBje3B6A00ybiMsSPc0mcZ7nPApEk2tgjJqKU41G1cDPEnJPsK888QMf7du+f+WhruPCeP7EHPSWTn8a0+M8nvSkfM2eh75ppUMPmYcDNOXB4HT2pB98jH41XnsrW4uI55raKWWLhHdQSv0pp0ywy2bK1HHUxL0/KlbTdOng8pLa2KKpA2Kvy5GDgjpx6U9LS2EMVv5EflwgKi4yFAGAB9MUjWdvtGIIsKTgbBxnrUX2aDyx/o8JwMDEY6A1KCo5UbQOmKARwB+NIwxkgEY60owR+HFCjGML+dGAAOVINKWXpkDihSD8uABS5BcgHjHrScEYzk98U7DeVxwSfWhVI75OKU/M+B8uetKSdvUfl1pMkAZ6+npSKQDjgEnPNOK7j/d56VXlDDUbXnqHP6CvOtf51289pSK7vwmS2jEHj97J/OtZeh4PFBxyPQU3oobHH1pw+6TnnrTdwyME9eTQNvPfPeobi3aeIKHGAwyGPBGeRTre3FtamJpxNKWJMoTaTnoMD0rKtotRtIf3UaxnHOWB3HaefzpFXW5Fg+0yfdlBdeB8oxz+POahuZteTVXEUbmxLEZjK7sYG3GfU/1qGT/hJWjAUGOXa3mH5GAkz8u0cZXHXOKm04a6t9F9ucmHB3Y2jnB5/PHH64rW3HJHXjrSqxxjjIHX0pxyR1GCMUhX5AFJ49aXjOBj60E7WGTz3oZ8njCnuKTIHIwafvBTnt0zQG+Qk+lGQHJJ6GhnBA2njH5UgJ2g5wR60oclc5/HFIHJ9ahlZhf2pwcgPx+ArzvX2Y67dnAGZD1rvPCfGkcn/lrIP1rVAOcgHBpSOOmTTSflII5FCjjnPOMUjfexnge1Owu3B5/TNQzTtH5axoHeVwiIxxz9akdJbaF3uVClAW+Q5BAGayo/ENkQFu82DGNZUW4YfPG3RgRkYzxz0NSxavp10QkF7HIxKgKCcnd04PrTjqmnqWRryHKHDAk8fX29+lMfWNLjO576FBjgsSvuOvrg49akt9QtLuYpbXCyug5VQePr+lShTvzgkdvrSBT1Ckeoo2uo5GM0oGQOoOaULwCeTik8s55HSkMRznbzSiL5SM8/WmmJ9nTNO2EKOv0J6U8qSxJ6jsKQxE8L2HTFHlnGCMAUbGKjBHJpwjOCc1BJHjULUYyMP+HArzzXgw1y76f6w13fhTnRS/8A01kOPxrUXqfejnPFBGecgetKG3L1wAKGjBwR17801QSMjBI6A0bdxUkhtpBGR0NPuS9whSRsh1IwvoRisf8A4RjTOS32iSTy/JMkku5jGMYT2XjPHenjQrWHULW/QsrWwIVSd2SVVQSfYL+tV/8AhGLEyyyE3AMyskmycjcrEkg/nUzeH7FmYSGeRmVVYvIWLADC5+mT0qW00W00+bzrcOr7dvzNkEcf4D6dsVeCY+YHihVIyOx6Gk2bm+YZxTSgxnkUqIxOdw/KnCMbuuT0wO1KQoHUjnFNHJPHTqaXJ28AEDpQOVBHfNNGd555NSYwBg9upo52jk+9NAIyRjaT60uCw5I4PWopOdQteOz459hXnWvqP7du+c/vD0rufCO0aEvUkvIRn61qgYjJxg0hHJNNK7uvTvxSqhGV7HueKcV2sMZx7UBcYGO/NKApJwnPtR14ZefXNNABJyMYPpSSKoQ4zSLu9RzSADd8xwfX1p5wDzgjtQAN2MAD1o2g5AIA9cUgBLjHIpjYCkBcH1xSK65GDjHXinZyowOD1pu1d3rinLg/wgDpn0pwAWPntSAHGMcdqGjCt15IpwGNvuKVcYGTSbFMZ+tII8EZPWoJlB1G0wM4D9foK878QR/8T287fvD0rtvCOf7DQ8/fk/nWuoOKD0xkk0qcdaACcjAPoDVezvEvRI1skpSNipd4yqsQSDgnryD0pr38KSukhb90PmIUkZ9M+vNSQXUNyxSItuX7wZcFecc/iKIbqCVpEUnMZwzMNq5zjqalDRlWHmR5Bxww4pk80FvbSTyOoSJcswOaie6gtkEs0qBW569eM/yqYyRNtYSRncu4DeOnrTTPbs7RrKhK8sdwwPTmkeaCJljeRSzHAUcnI609WjKhRIhLfdww5oIxxnHpTXwBhh0pCoJ4GAfSl24OARSYAB7mlC54XjuDinYyuzigA7Rntn8aVgA2eM0oOcDIpDkdyfYUuAq+uKAG7nv1qGbP9p2eOfv9/YV5z4gLLr14CcHzTXb+DiP7BQbSPnfFaw4bofegKPvDpSeoNPUKf4c46YqKyT7BZLaRksoZm3N1+Zix/nUE+mRTXRma4dMjACAdeOvr070lppz2Uxc3jStISZCyA7sknr261Hc6NDcmbzZmPmODtCgAc559frUR8PWvk+XvcjDKSMc5Ockeo5H0NOj0e3isjbeY4QzCRsYBOB0+nFQvoELlSbiUqhJVSAeox+PAFI/hu0luGl81huwNu0YXjGB6U5/D9uJnmSZkJkL7SqsvPGMentTW8NW8rvL9pctIfm2qM/X+XNWoNEjtZfPyWfcrZ2AYxngenvUjahah8tdQj23Dimtf2ZwBdwnB67xTUv7QEk3UX0DCni/tN3zXEPr98Uf2lZk5+1RA+ocUv9oWuc/aoTn/AGhSrqNnt/4+4vxYUf2haDpcK3+4cn9KT+1LYn75xnpsP+FIdStiOGwTx90/4VLbXMUyHY7Nt68EfzqYN+74PT1oV1RQOT3zUMhzqlpzwA/P4CvOPERB8QXp6/vTXceEfl0fbgECWQfrWsHIUgikGQR82R6UEgg5GT7HijcATzgGkztwaiZnad8MQgUYI7c80nnyO2dhPXkA8+lKssqMf3e1R/ERSNcTFlBG3JzkIc4zT3chCckn3piOUUDFODZOefenFlzwMgdq4H4ms51HwzbiSSOK4vSkqxyFN6kpwcEeproT4K8ODd/okx9P9Nn/APi60tO0qx0u3+y2cGyHcWw7NJyfdiTVlkT+6hOf7opNgG4YT2G2nBVGF2pjHApwRNowqjJ5GKNqYJ2qOMCgquzJAz24p0aqCDgLx2p75YgbjimYJwAxNOAJgKnkAgjioycKRgDjHSlU/LkN9ahlb/T7PkEgPn8hXnPiLP8Ab95kkfvDXb+E+NLfB4E0vH41qfeJJOBUVreQ3aE27lgDzkbevTrT45Flj3RsGHIGO+Dio4rhJvNSORWMbbWGeh9KkyR+fFN3BeNwz6UbwHzvX6Z5pdyk5LDnnrSGRGONw9uetRyyDZ98fnTVdSoIYH6GniVSSAw/OlLAfextPvyaxPEHhuDxFeaVcSXjwHTbjzwAobfyDj2+7XQiS3JLFiN3TkUO8THG4kjvnimNLDt+UkH6impJCcHkkj+8OafujXnDfgRT8w9ixzz1HFORoeQCTn3zT3MBXOTgdOaaHiAHp06il86IP90Z/wB6kaaMKPlHPvQ0sfk/LgfU1GG+X7wP40JtYEgc9+9QyEfb7UkAFg4/SvPPEAxr15zn94a7TwoQdMPqJpf51qrwSM8HqcVlNoazQxrLcsxj2qrBcfKM4BAPXnrmlGhBZYpReSKYFwnyZ7/r1pLXQEtcOty7ESiTlB83qPbrV1LyCUuA+NrbcsCAT04Pfmn74lG/zIx82MnGc+lRm+tDDLO0sYjiBMjkABMdadFe2dwhaOaF8MY92R1BII/MGlkuLOCWOGSaJJnJCqcDtnn0pi3dpc+akc0LGJ9h6fexzj169ajW7slu5bMTx+fFH5joFGQvrUkdzaPHHIs0G2VQV5UE5Gf5U7z4XXcJrdkHcMpAP1pwmtw2TNByMEblyKJHhQfvHiQgZIYgEfnTFubT7QsAmgLsjSbRg/KMZJ9PvComvtOEEspuIBHG5Vm4wCP5/WpGubWGWONpIEMhKqBjBIGTz68VJ50I+9LDydv3h19PrTvtUChP3kfzttBXBBPXHHtTbjUbSzh86aeJFOQOh5wT29gafFd206qsU8RYgEYK/Nn09aYmpWjRed9qijUZGWYKeuOnXrSw6naXb7YLmN3xkKHBJHrwelTs7D5ixAAo3tsGCeaN7kDJ4pMtj73eoJlxqVoQRzv4/AV5z4iBOv3h3f8ALQ123hXK6awA6Ty/zrVG0DJbGTk1DJcpgeWjS/3dqHn8aie7KW5nYwCNSdw3kEVahIkjEi52uAw981nT6OsspPnEB3LMPLHTBHHvz1psPh22ib93MwBJzuUNkfj39+tMTw/EEmhWQ+VLC8WcAtlsgse3Gagl8J2ssolkmLtsdHJiADb3LE4HfJwPSpdS8OQ6hei4e4ZNswnVPLU/MFCgFupX5QcVUbwdaCERx3bxIrltoiXGTnP8z1qzYaClpf3F6108klyjpJuiUfeOcj0xVCLwRbJaSQC9lkJt0hDNGoIKkEHPbO0AinJ4Pkmkkku75Y3luluHjt4QFO1NgGeMZBPSo7fwRiaL7VdxyQW0UsMX7r53Dtk7+mSB05OK1bnw/Beaql9LcOApU+UYwQwXHH5qOcVDaeFbeC3aFbyQo0Eka/ulDgOVYknvgp0PbiopfCUUkzStfMGeUyFVt12gnOcAcfxd/SlbwrETI7X7nzM7v3CnGVZSQD0OHOMegpYvCVtE+Teyt8wOSgDdADz7gD246elu18P20Fp5HmHDEEEIAchAg/QfjSTeHYJrJ7QTsu+bzS/lqedpBAHbg0y18K21prDapFO4fcD5YRQoxnjPplv8MVG/hQRlJ7a63Tw3L3MXmoPlZhhgSOox0B6dafovheHRYbTy7p2ltzuZtqjeSu0j2Het9gGAP8qbwF9MdOKQkFRilUqBjkZqF+dStjgdH/kK828RKf7fvP8Aroa7bwrltPlA6C4l/nWjMAbaXBGdjfhxWcNSuodOsJC6sWj+YEDnBxWDdNd30t5cGaEqEKRo2BuA9K6nSp/P0S1kyCxiG7Hr3FWief8AGlzwDjNIcA5AP5Ucf3e+aaVy2ATx0zTZDjjNNGc5/LFSZ4KgYA6CkMrbMY5zSqS4KnAanY2rntSBhk+1NJUgggjmmrySSRingoDyeBz7U7IB4wQe9Krps4GDSlhj19TilEm0buhwcD1oZ0z0HPJxTTIBJgZ6UbgzAHgDpTkbKnJHqaRXXkHqehqGUr/aFrz2cfoK8619iNdvML/y1PfNdt4ROdGU9C0kjfrWjPG0trLHGB5kiEDJ4FZMpCaf9m+zTpKiBQPLLAfQio7OOWytoSmnTSSlVV1eBCoAPOD64rV0q3eLTo0eMxHczbGxxliccfWnx3Vvcs6pLyhO7II6HBOT1Gac9xbJDJMZhsjJ3EHpjrxTgyZ+8vK7h83UetLj5sBhnHQEU1TjvSPjb07UKQyqCMcY4powG4/OszVdWksZ0jjiDZGehJNZn/CXEMS0SL77TzUieK2f5Y7fewycBDnFR/8ACXbsny1+mDzTW8VnIOxeT/dNOPiv5cbU+mw/40g8U8EEJjHPyHn9aRfFeWPCnHQ7D/jTv+Ep68AHH9w/40o8VYQ/d5/2D/jTJPFbhVCgZ9Qnb8619NvLjU7H7SLlIFDbcNHnP61YieRLuJHulmV1fO2PbggZ65qyrDBJ6npShxz0BxSK47k471Azj7daMMj7/wDKvPPEOG1+8PrIa7vwmf8AiUHnGJZAPzrUGOmM+9BHoxGO1JhugJwenNOQkt0OaoSaUZIZIXujh9wQbPuhm3EHnmqh8ND7OsK3jYTODsyTnrzn+eac+gJMSz3RHByBGMDPoM8D2qxZaUtjcvPFKXLcNuXn881cLFWwF601kA3HnJHemYJwQSKcpK9PzFZGtWd9dXUT2ULO8anOWAGc+prOXRdWQkrpajgYUyKR26/r+dSQ6VrERTytLjQq5IxIo4PvVa/8OavNKjRWa/KvLBwMnvxVT/hF9ZB4tR9PMWn/APCM62GGLYAj/bWkHhnWQx3WgPXo4o/4RfWhwbQYx/fFIPC+tYx9kHr98Uo8L60yk/ZQOP74p0XhTV5Mh4UjA6MzjFdBYaZc2GkfYLi2W53uxYJIAMH61NZ2UkE9qiWX2eCFHHLg9Rgd+TV3aQMgg+maUJhTk9TRjd2AFV5h/p9oo6nfzn2rz3Xs/wBt3QPaQ13fhQ40yVc4C3Mg/WtRTuOM5Gcmn8bjjjimHA9OBxShiO3bpUYuIiCzSFVVzHlhtG4HBFDXFuc5uYhg4++MZ9KcssIYYmjB7ZYemab9ogcgJLG2c4w45p3DNk8ZpHVm/i6+9MRs4U8gdacOwU455J7UNbPLKiJerE77iqmPdkDqf1qJYBJdGAashl/64cHjOAc4JxzUiWjl2gXVYi+ASPK6A9O9JLbNBMsMmsRI7DcAYhyPzqc6Pdtz9vX/AL8//XpP7FvP+giv/fn/AOvR/Y12BzqAz/1x/wDr0f2Ld9RqC8/9Mf8A69L/AGNeYA/tBf8Avz/9elGjXgzjUR/35H+NINEuGyJdQYj/AGIgDUNzpj2q7jqM20DJyi/n0qos6IYnhv8A7WrSqjDK4Ge/FXFQFSD26ZpCCFxgcn1o5XOcH3qvKf8AT7U46b8flXA69tGu3mcf6z+ldt4V4spyO91J/OtbGTwOccU0rjr0PWjHPGenSlUnB+bnpVKfSIbpHilupjE0hk2cYDHr296rXHhuKVUWK58pQixSBlyWUHOB7+9LN4et5GLvczOeNu7GBgYH6AU+00WO3uDdvO0l0SSzBAFJPp6cVobmPbBFJJgoc8GmhQFwDj6UrcqgPGPQUG3Etxbby3l+VKrurY27tuP5Un9krJujkvP3TAcIgUhgu0HP07VUXwzCLQ26XrAMwJIX0z05z3qRPD0SXYuDqG51QRoGjBCgAj8Tg1t2xgtbeOBHJWNQoLHJOPWpftEf96g3EXPzdKQXURON4pftMWcbhS+fH/eFNN1EP4h+dU9SnZoB9nWOVycFXfAxWOthKkccUVnbW8SziVvLkBz+laBBI3YyD1pChzwAM+tGGPBA69hmopR/xMrMEZ+/+HFed+IEzr15/wBdDXaeGJETTrlnKoouZMseg5rQF/ZBBi8hP/AhmlN/Zf8AP3CCR0DikXUrJuBdQge70i31jtbbdQDj+9SrqFkTxdw4xz89O+2WWMC7i4P96mJfWgY/6XET7sKcb2yPJu4sem+kW/ss8XMX/fVJLeWjKyi4hJ/3qZHeWvG64hOe+6ni8sw3N1CM/wC1Sm9sdvy3MWc4+/Qb2y73UOcdd1AvLM5zdxdMn5xxSfarMHLXEeD6tTDfWYyRcxEH0YUG+sR/y9RD0BcUC+sGb/j6h/B6cL+wX/l6hYdvnpn26ww5+1w5PT5qeuo2KoSbqEMOOWFJ/aViF5u4z7L82Kb/AGtYgj98SMY+4eaDqenqMCfGPRDT/wC17HaQZzx6IetNOrWBBBnPBBAKGk/tbTyF/fse33DSR3cNzqFsIGZwpbcdpGOK4HxC2NfvOcfvDXaeHIll0y4RgCPtUnBHvWqtvbbhiGLB7bBTvIiU5FvF9fLFM8iFh/qI/wDv2KclrDtLCCLtxsFK1tAefKiXjsgpfJhPHkxn/gApn2eLf/qoh9IxTvJhKYEUfXugpRbw7T+4jyOvyCmNDAV4hjH0QUsdtExB8mMgf7AqX7PAuVMMXvlBSiC3OQIIRn/YFNKWSSCMrbK2OhVQaUW1s5O2OFtvXAFH2S26eTD6/dHFN+xW7kBYo8dPuCmtaWinHkxk5/55igWlv0WFR/wAUNZ2mPmhUY5x5Ypfs1scgQKcj/nmOKVba0UbTCOO3linpFDEMQogz/sAE05kjVslWzxnkUERYHyNz70gmtpDjjduKgZ/iA5H5UDyiXVRkocEZ6H0puEB+ZDntzUc86wvAsafNLKEOTnAIP8AhXmfiUEeILv5f4+1dv4a+bTZznH+lSfzrVXgEntS53nG44+lAxnrj6UocHv1oyN39KOAeOd1DDBGBmnE9icY9KQ4LE56dqaSGQ4POahvm/4lF4qlixhkAxz/AAmn6aYRp9t9mUCLylCgDHGOeKnLMCDtPXiqN7p091LIy+VtlKHLn5l2gjH45qxp9q9lai3cq4TgNjk/X1NWAmM8nB9qcvysmDjnqaZIoLkqu4561V1KO4n0m5gtiVmkQhMttye4z2z0z71z5g1qKeRdI06XTrN2XbG7qWBK4ZguSF5A479e5qVY/FOSiu5xLN8+5DmP/ljgdz/eyR0rb0u3uLbRreG6P+kRpiQZzzknrTbx2F7pqKG+eVy4C5wojbr6clauOcv74GOaFYkAg856Gsu40mGdpj9u8qSR3PD/AN4AYxnjp1qC30kWl4JPtkckaBSp3EtxkFevTp+VapuId3+uTnHG8cVDcyxPNZlZFP78cBh6GvOvEmf+EgvMj/lp3rqdE1nTbG0ngurnypBcyHGCeM1of8JHohBBvxz32mm/8JNogPF9/wCOGg+JdFzkXo/74NC+KNGAH+mcf7hpT4o0Y/8AL3+SGgeJ9GA/4/c9+UNM/wCEo0jP/H5/443Sn/8ACT6LjAvCPpGab/wk+kdftXXqdh/wpp8T6Rgj7V/44aQeJdFZNpu26EH5W6VD/anho5/0iXH+9J/jR/afhjP/AB8y/nJ/jR/anhkDi4lJ/wB6Snpqnhcqd1xKD7NIaQ6l4YxkXEp/4FJUsGveH7fPl3DrvGGyHbj8ab/bHh3P/HzIQfUPQmseHsn/AEmQj6PQ2t+Gw2RM4H+69Kut+HMY86TgcZV6cNb8N7PmlfJ6/K9CeItGgbdaLPK54ISNicfjTW8QaWzEnT7sknJPkGnDxBpPH/Euu+n/ADwNMOvaRn/kF3XP/TvSLr+lDrpdz7fuDzSDX9M3Z/su5GPS3p6eI9MjJKaXdKw7i3rjtaE97q1xcwWcxjlbI3RsD0rp5/8Aj4l/3z/M1GOo+lL/ABn6Uq/e/Cnr1/Cjt+NKP4qd2NOXofpTT1pX+6KaafHR/B/wKkHRqWPoaev3KU96kX7o/Cnd6aetTDp+FTL1FaGnf69v92tKiiiiimnrX//Z" /> </div> <p class="paragraph"> РИС. 11.4. Выбор используемой базы данных Novelty в списке Database вкладки General </p> <p class="paragraph"> 6. Далее выберите вкладку Database Access (Доступ к базе данных). Установите флажок только возле базы данных Novelty. Затем в списке Database Roles for 'Novelty' (Роли базы данных 'Novelty') установите флажок роли public (рис. 11.5). </p> <div> <img src="data:image/jpg;base64,/9j/4AAQSkZJRgABAQEAYABgAAD/2wBDAAoHBwgHBgoICAgLCgoLDhgQDg0NDh0VFhEYIx8lJCIfIiEmKzcvJik0KSEiMEExNDk7Pj4+JS5ESUM8SDc9Pjv/wAALCAEOAPUBAREA/8QAHwAAAQUBAQEBAQEAAAAAAAAAAAECAwQFBgcICQoL/8QAtRAAAgEDAwIEAwUFBAQAAAF9AQIDAAQRBRIhMUEGE1FhByJxFDKBkaEII0KxwRVS0fAkM2JyggkKFhcYGRolJicoKSo0NTY3ODk6Q0RFRkdISUpTVFVWV1hZWmNkZWZnaGlqc3R1dnd4eXqDhIWGh4iJipKTlJWWl5iZmqKjpKWmp6ipqrKztLW2t7i5usLDxMXGx8jJytLT1NXW19jZ2uHi4+Tl5ufo6erx8vP09fb3+Pn6/9oACAEBAAA/ANzxno9lo01r9jiKiYOz7mLcgj1+prC8i6IUC3PzDI4HTGc/So3+0QqDJEFByBuXrjrTWlkEYdogFPRtnBpPtDYxhf8AvkUouDjkJkf7Ip6tM0MkwjBjRgHfYMAnpTTP8xOF/wC+aV5XUAMijIyPlHSnolw0PnLADGM5bZ6daZ5xLfdT/vkUqy8Y2p+K05WkYMBGPl5YhOlK0mCVZEBXg8Cl804wUXH+6KmVJ9hItvlEfmE7P4fX6VF53UhV/wC+aVZO+1MepWjzxvAAj5/2RThJhtpRQfdaUyYwAif980CQhz8i/wDfIpS7DHyLn/dFIHOein/gIpzPgfdXP+6KQS8f6tP++aUSHONqj/gIoaUknCIf+AirFhEl9M6yOFVUzlVAJ5xViawjiEu+KceSPn+6AP05o06AJdXcRbOwqOPxrQ+IssUs1h5civhXztbOOlc8mrp9lNtLHvLQmEynG/YcYHuBim6rfpeRwInSLOCT2IAA/TrVqHU7HyIluGeUKFGwKQVwDyedrYPI4zUbX2nvOY2gAglY+aVQb8bQAVPY5BP41LLqWmssbR2aqy87dgIU4I/HOR19KoQ3Ua6fc20qkmeRJNy4GNuf8a0otXtZpcGGOHC4Ut0AyOOO2B075qH+1oVUx+QHGwIScDfhSv8AMg/hVWO98rT47WMAOrOTIT2YAED8qtvq8D/aAbdcTH5QcYA24GfoeanuNYthczeXCki8hZMDkcHGPTrUC6wFjdAmFMEcQAI4KkEn8cVM+txNKhjtEUByzKVBzkk8ehwcfhWYJFDynYpDk7dxOV5rRh1rygitBvjW2EO1m6HOSfoelOj1qF2czWaSrn5VOAQO/wCPSqaywTJ/pbEFbgzFFXIdcD5c9uhq7bTWM5IdolKtueSSBV8xOflC9seo5qGW6tvIeNIhhl4wgyWyMHPXoD+dVF5b0HvQXAO0DcfyoY7ckjJHbPWnKUyAeC3T2pZMgZGG5pi79ny7VBPI9PentgL1yfSo3d052ZBHABq1YSfPMAhU7FwB1Pzc4rVvb37XZNai2mUR4MGGyf8AgXr/AEqOy2nUL1gQwJTkHjoan8OadZXOkvJPZxSN57jcyAmtRtC08gY0+3PP9wUp0LTyAP7Otz9FHFNOhWH3Rp9uDj+6KP7C04SBWsbYORkLtGSKT+wbEZ/4l0HPoopw0HTwvOmwf98jij+wrAtxp8H/AHwKDoFgxwdPgx/uUn9hafnB02D/AL5pf7B004/0K3GO2ykGg6Zk/wCiW59gtOXQdNwc2ltg+q0DQ9OLH/Q7bP8Au08aBp2M/ZLbn1WhtE0zGPslvn/cpP7B0wLg2lvn/dqM6Jpw/wCXGAj2WhtH0zA/0GHj/ZpToumk5+ww8/7NSpommbebGL/vmnrommYJNhD+K0f2JpfH+gw/980n9haZn/jyh6f3aQ6HpnX7FF+VB0TTP+fKI/hSnRNMAyLCIn/do/sTTM/8eMOPpStoek5z9hjz9OKF0HSzj/QYsfSsXyIrXW7+CGIJGnl4C9Ohqbwlgaa68n/SGqxqclyl2hijlZFXgITy27nOPb14qGC81R2kP2KMCPLY2nLYP3fr70z+0NVWCSR7RQV+6AhIzn/D9ansDNLLYSXCFZnhlLK3XqOPwqhp97qAW9bM87oFI81W2oS5BXaQMMB1CkrjBq8b3VDb7xZIWbcdpBG3HY9znjH40Lc39zp1yzQmGUBRGVBGc9TUT3OpW8MkKxM7qWCkqWzzgYb2HOTTrDUdTmkgWazKqZdjZU5Ax1zVnW0LxwHybiWJbgNNHbkhymD6EHrjvWIsniZEhjNvclYjuyCruQCNoY98gkHnqO3d4uPEaSSzC3mLkIgTYCjKC5LZOMEAr259KkS78TM2Wg2ruw+EGVXPUccnp+BPAxWiyalIba4/d+ZHEAydAWI+Y459u/alK6sVOzfkr8u4ocN3z+mMfjSBNa2fMxJAX+6O/I/KpmuSNb+zKQwFrvYDqMvgf1/KrQyx6U45GQcnFSR52+uTTznqPWlHy5II/EUZPqM0E4OKQgbSMEZoU9cZ9qXjgdPpTuh4z+VIp5OOormbhv8Aif6hng/u/wCRqz4Ox/ZrnGf3rk1r+a2cgLkn060CRwDhVPHPApd7hQ2Fx7ik6uHKJvAwG2jIFDXBjTc4QKO5wAKUu4OQi4IyMDqKQyKSA20emR1pwL4wQuB7U1nLMMbcnkYFI4LKG3A59KXaccZIHI6U3aDxn8KXBx93P1oCgjkbTTuSuPelIzkZ5FJnaTlR6UokPdF4/wBml3ZJOF/BaVG+UFguM9xipCwPRVHrx0oZsHogAGcHApA218kJjtx1oZ8AkhRzgcdaTzCRnav5U5Wx95V59BRu5xtUfhQWPXCn8KguJHBh2gJulAJAxxXPXmD4hv8AGD/q/wCRqz4PJ/suUY/5avV55N91HbRyrHIyFxuz0HpUNxhFWee6hlTsvK/hwetUrHVPP1WG2SEwQvGzcybtx7VuEnPQ1VvoGubYxoAXBBG5sDP61nGy1aXzdtyYgHwcSYDDj7ox8o60XGl6g6wvJOZBE5dysnL9cYGOO3FF/aeIJLe1bT70JONzTJI2FPIZV6HuNp9jVOz0fxBYzWuy8aaCON/OU3O1mkZy2QccDpmrdhpurWemfZ/tDM6+UQBN0wxMgVsfLkHj+lZq6N4lW2WNZRtjdnRPtmCCXyp3Y64J7VONN8RRvLKJ/wB67AFxccMgLdsdcMMc9utLDp/icribUDnLcrOM9CFxxjA4J7/Wr1ta6zHprQz3BnnE6Et521njGNw3YwpPtj8M1TjsfEzEie92DaxGy5yN3IUdOR0Pb6VZvtP1eTUp7ixuPJjleMsfOxuVUAKhccMT3qd7TVfsdrGt3++jH7yRmGWOe+Bg8Ups9S2ErOy/LhMzZx69uSfXtSmy1RAP9KJyF6yeh57en500WGpuuyW4MqF920yYA5Bz7jHaprm21BLt5bZyFll6BuDwB07Y5PvWXfaDq8mo6hcWM5jMyBYnM+Afu5BXBx0NX7LTtXXTI47qcPcxy7t5kySu3HXsc59u/tSPa6tLOIvNkXYdxl3/AC49Bx1HrWrbRyxwlJCWKk4YtksM8ZqbHvQDnP8AOnMcN/Kqt2B+53HP75elc3qORr96AO0f8jVzwhn+zZW7ea9SuceIbUk8fZnJz9aw7iZ4LMDaN0FwHjDfjV3ZFd6zHCIxHJHjc6k/dXBAHYZJroEOHxzx6Uc7iCSRTSr5yMn2p3PfPFCsdvGcUbiSCo+tKX6dqR2O0ZpoZyvTHNOUYx/U0u7rxilOPr6UZ4II6UuRnGacCR0oPfuadFxgYx605s5xjv1p2SD1oHXkH2pCDx6DpS8r+NJhieAcGlZfcAU5gS2SR71Vu13fZ8dplzk1zuphR4hvgyk8R9PoaseDiBpsgJ/5avV25tFneO4WZ4pYwVVlAIIPYg9apz6El5I0lxcOVYDKIgUcVYttIt7K6FxE8hUJhYychfer20qOe9Ur+RoPs5DMQGJYA43AKTj9KgXWLZUWS6jMO7BQjcQRjJ7D6Us+uWMUZYrJuHQMpGT6fXg/lWiqo6q2CAwB6881TkuxFNs8jMaqpd/MwRuYqOPwph1WwLvhmPlA+YcH5eR/jSxaxp7QGWQtEpPGQSCMkBh7cUqapp8s6wBmLyEhQVIyaszPHDCzlchQeMnsCf6VX/tGFZ2SdDGAqMG5Odwz+GMVJa39lfSMtuzOVGTlSAB2qzuU5wD+NNG09Fp4Jxk5/On5BBIzmnRgkdT/AIU5gPVjQq5JO5qApLfeb0pSpAPztn0p23PVmHFIFOOJHqlLKA9y893LGkLLjawA6Z9Km02WK4/fJNLIhU7Vds/nxUlyAzW/tOv9a5zUCo8RX+T/AM8/5VY8HK39lyDggzSda1Nvy89ucUuFBwRSZG0DORnmngDIIFUr2GWe5s4olQlnYDzM7T8pznFLd6fdM6QzJayGNMAKkhAB4xx2rO1gLp9pFPcW1nKJXxGoD5LDPr061c0mXUNUgYwLaxGLAKuWOARxyKkewnN7Gkr6cbjGFUl89cj29cZpkvh6aCN5JU05E7sWk4/H8qcvhicoAsGnFccDMnA/yakj8P3kUgkjgsFZTkEb6mfTtVIw4siOTj5vxqEeHbxU2iCwIyG5LnmnwaHqFuS0MdihYYJ3Pz6VL/Z+rE9LL83/AMKX+ztXznFn/wB9N/hR/Z+rjHFl/wB9N/hTxY6sB92yP/Am/wAKctpqox8ll/323+FL9k1XJylnz/tt/hS/ZNVHASz/AO+2/wAKT7Lq39yzH/A2/wAKPsurEcLZn/gTf4UC11fPKWn/AH8b/ClNtqvQRWmP99v8KrS2DoG+1+TvlcEKmSvyjjrUtnBGkkroRuOeBRd5HkZBY+cpGK53UsDxDfbvSPp9KseDif7NkyMDzX6VrjkZHUUDnIycjuaXnOSQc+go3D7oBx61AxxqmnnnCynP/fJrWb7QLt5bcwMsiqMOxByM+g96xvEGkz3lhaeXNBvt5Wdg77Q2ewJq9oUMtvbu0wiXKqqiOQODtB5yPr+lLPp0s1ybiK8ESFlZsLkkhSMdcEc1mt4Zdxh9UYhQQoO4hRnpjNaulWRsPM33SzbgMtyGJ9Tk/wAq0RKhxhgfxpGkQOOR0NO8xOm8fnSmVP74/OjzE/vL+dAkQnAYfnRuUdSB+NKGU9GH50bgO4oDD1H50u4eoo3DPUfnRketJvX1H50b19R+dZuqYZ4myDgGoLNgJZMA5wT09qS7bKwHv5y9q5vVsp4ivfcR9foateECRpkoxx50n4Vq/KEDGlU5z6U44PHp700rhsk9RUQX/iaWBJ6zHg9/lNXpFsmvbg3WQ2Rs5bptHpXMeMAzR6TnzCnlPnjIzxjNdF4chiis51ibfH5nB7Z2jOKZqz6olzGbMO0PkgOijuXHI9wO3pVe5v8AW5YpBHbGNVOdyxHPXlR649e9H9oa9Gnl/YFlKqB5gBGeB/U/oaj/ALR1r7IA9qYiyHDiNmZCCQAfc+vauhTbuXudvOamBAHTNKCp7UvGOQKOPSkwvfn60uB2AoXBGcUuB6UYowPSjAowPQUYHoKzNWUfu8cHnB9Kq2n/AB8SZ4XbSXfIgBxzMtc5rKY8Q3nH8KfyNXPB3/IOl4HEzmtTKnjHApcEdOnoaTO3nOTT9uc87vYnpVC7LC6sCGKE3CqCvUZBzWjd609ncyWyMjyhgI4mBLyeuPzqj4i1/UbKSxhtEhDXERd967sY7CtCwvrxtMu5ZxF5sOSuwf7OR0rmY/FOvS2ySxyWrlgTsEHIwcdc0f8ACVeJGYKq2rZOAQmQf1p0vijxDFEHf7KTuKlRHkgj8aqf8JxrXT/Rc/8AXL/69Pi8Za1NKiL9m3Ocf6n/AOvVpfFOtklS9uHDhcCA8Djk88dakPiTWyAyzWp+Ygr5ByB69fp+dRN4t1VJZI2mgBRCx/cen/Aqrr421oj/AJdh/wBs/wD69L/wmuskDJtvp5X/ANenf8JnrIHW3/79f/XpR4y1grnNt/37/wDr04+M9Y45g/79/wD16B4y1cnG63/79/8A16X/AITHWP71v/37/wDr0p8Y6vx81v8A9+//AK9B8YauP4rf/v3/APXpB4x1jB+a3OO3l/8A161bHU59UsBNc+WWDsvyrgdvertngyydckUXZA+z8j/XL1rmtXAbxFek56J39jVzwaD/AGdN7zSVpH72O+KeoA3dCfWm9/m596eTgkjjjpVK5jee7sRHtDicMu7OOAT2q9Kqyaj5TyWYvmXcYxMwfHQkD6Vma7DBPJDFcva/a7cYVEuNjKpHfdWhZQ3b6UyxLCEnBw7yFmPbORxWIngjUFjxHqSKCMYCnpnNH/CGX6lXOpxKVI2nafoP509fB+pxRlV1CHDZ/hPGeuKhHgK8P/L7Cc9PkNKvgW/jPyX8anHBAOalPgzVMg/2ohIGBlTnHpSR+CdSj5TUY15JwFPcYpT4I1JyS2ownjaTsPI96b/wgN72vocf7po/4QO+4/0yH/vk07/hBL0/8vkPA9DSx+B73H/H5Dg/7Jp3/CC3fa+h6/3TR/wgt5/z+Q/98mk/4QW9zn7ZD/3yeKD4Fvt2ReQn/gJpT4IviP8Aj7h/I0g8DX3/AD+Qj8DV620ubSLZbeSRXJdnyo47VetFzLLhSBj+lJdrnyMnB81a5zUVDeIb4k9o/wCRq34PIXT5Rkf66StM4DZ74pAuRuPWlwB3pcD/AOviox/yFLA9MSnt1+U1K+jXJ177bHJF9naYTvkHeSI9m3HT0IOeOR3qhrGjzHxH/aW+2aNwhCyyhG+UY79q6Swh8uwhRipYLyVORzzxWNqvh2TU55J1uAhKqI9xb5MKw6A+pU/hWOfBN/LbCKe9gZscHdJheQRtHbkE5/n1rZ8NaBLpD3D3V0Lh5AqrgthAM5xnjk4PA610O0YpvHmA+op/HWjAIoAAopaSjGKKKWiikrP1PJZO2DVe2QiaTGcY6n6UXY4iJGNsy1y2uMIfEV2zDh1QjH0NXPCKg2EhPOJnrU29DnIB7ilOWHC0qAleTTgMHhh+A6VCD/xNLEcHbIe3+yabdfbz4jbyft2fOi2Y3fZ/K2/vN38OevvnFY3imFJfFaeeWWLy02k/dHPPXiut0RFi0eBVyVAbaTzkZOKo6jd63Fcy/Y4laFEBTMJYu2x2POR1ZUX/AIFWRqOreKHtJhb6fKsn2ZZECW7ZM27mLOeAB/H0OT6VteHptVnvdQbUUKx/uhB+7ZFI2ktgHvk4P0Fbnbim/wAYHbFOzRRmjIpaKTNLRSZpaSlqF0V5AGUH6iklRVTgAfhWfdnMarnOJV6D3rk/Ew8zXZdvZFzjj1q54QP/ABL5c8/vn6VqKRyvakG4ED7op28ZIXg0ocheuPwqFB/xM7IZyTMc89PlNa8iTPctBFIowgYlsk8k+/tWN4h1G9sNOt2gZRLLOYi+M4AzyM/SrHhye+uYn+2Sl1KK8Z4zzn07VZuNVtLa6+zSmUOoBJVSVH4/l+dVJ/EVshtvs9vPOJnCNwRszz+J9q14BHdQrNG77HGVIOOKk8gYwZHH/AqDF+8A3v0/vU8Rf7b/APfVKI8fxN+dKUH95vzoCD1P50bf9pvzpQv+0350bec5P50uPc0Y9zRj3NGPrRj3NGPc1GxIkHcY65pJvmXAPY9KzbskJFyRulUfrXJ6+27xBck5+6nT6Vf8JL/xLn/66vWkIzjg/jTlRs9elIyZP3jT8DBDN0qHDf2nY7QpxMeTx/Ca0riOJrn5hN5oQA+UW6Z74rK199Kh0m3a8jmdTKTCEkIffzk5P49aseGZLeW3la1SVSNoIlkDcY4wRx61pNYW8zeZJbxs7YBJ6n/OKrNpGmPIIvskHmRAHbk5Azwf51fijMUSxxIioowoB4AqQCTuB+dN/eeYPu8j1p48zP3V/Oj588qMfWjL/wB1fzoJbHAH50uW9B+dGW9B+dA3Y5A/OjJ9B+dHPp+tHPoPzpeaOfQUmT6D86o6mtwYVe3jEjqcmMnqPb3qtYrcqWFwu2RhkqOcenNLdqT5WR/y2SuW17jxBcjb/Cn8qu+D+NPkJ/56vWsOACOnrQuO9JkY46CnY3EjnjnFKoAmWXGWXkcZwam+0zLIWGMkc8VFN5dyirPBFIEOQGTO0nuKWKRoQREI0AAGFXGR2odhO0bSRozxg7D6VG6o0qzGBN5XaWK8kdMVKLm4QKqEBVGBx0pWvrjjnr14pv22cZIcfTFPW8uSvLD8KFvJyP8AWD2pWvps9ccULeT5xuH5UfbJ92cgD3p322UjO4cU5byXHBHPrS/bJsHkH8KUXkmQOPc0ou5CeMYpftTnjKj8KPtUnTK5+lKLqTHVaTz3Zg2PxoMnJwB6ZqpeniHnnzk/nXLa4w/4SG7zn7qfyNaHg4Y02Tp/rn49K2eCOnWkCZ5zjjpSBMkGnKQDz16dKpahI0KQHznhRpwsjxjJC4J/niq39q3sctvbm3IZwrPIVORz6e4/WoYtbvJbuXdaYVQMIFJLdcke4HUUn9uXjISLFchcnG7bwcZ6dKlm1e4gmTNpGsZjjd5HZsIW3eg6Dbj/AIEKyrPxXqMllayT6awZxmUuCrr8obO0deu3j0PXpWtd6hd2c83lwGZABsXB54BwMDqcn8qdeT34jtJYW5KEywhcg/Lng+oqKPUroRgfZTJtRd4wQ3OOT25J/nUcur6iZYl+zJEqylZOpAGCPm44HfPvWlYTyXIMsg2JIv7tMEYA7++anZDn7oweuTTlO3p2pp6kHseKU4A579aegAA4H1FPx9cUArnFA6jGcU9sDtSdepOKTJzweaceg4p/qBkYqteHcsOcf65a5nXcHxDdYP8ACn8jV7waB/Zs3bM0lbABCjruHelXv64pAcrjP0pwUjgjioLm4+zGIKAd74yzYCgAkk/lS2dzHewtJZ3MM6A4LxtkD/OamkLIheV1VVGS2eAPWkLMyII5IzuGVO7O4f5IprzCN0ilmhV5Pugt976CnsrDABXcRwM8mmRktnDo204OCeD6Uu2TIIKY74JqvDe29xdSW1veW8s8eS8avlhg4PHtVkMJkYbkYAlWGcjjqDSAf3do9MHgUjxtkAstKI8DGRz70hTn7y0pjyedopUQgfeWnBD6jJ96NhU54/Ol2kZIA9+aVgTzwPxpCrE5BAx70AEdCPzqD7ROZZB9nB8sgEmQDryO1SwPLNKwMaoAuc78/pUd392E5OfOSuY1z5fEF1hv4U/ka0fB3/INlyP+W0n4VsBsfd9KVQTg4GOppDnOTgYoDEuThcYqjqqeZDBEWKmSQoG25xuUis658Iu6Fbe9mVpIkSV3d2YsoIyD1wRxj0Apbvw080c8cF6IXlzjBbKguxPGf7pC/hVmXQJprHSrYzKi2SBJFQMFlwFH81z+NWjpkxht4TKGCQLDI5Uljgg5Hvx3qu2hXDTTy/bW3SbguQeASD+HTHFRr4fukgdBfbWbq4DAueOSc9sVOmjTLcxzG8cqkpfb8wz09/r+dU5fDdx9tiuYrzcqSSu8Mu4owdsgD+76nHUgU2x8NXVncpL9u3okgckAqWwSSfxzg89AOtdCI+w4/CkKE8E8nrxShSDye3pSBR3IPNK2COHGKVCgXG4H3pdy9c8U7cp7/pR8hzz+GKCUwMHge1NJRuAQBR8pAUNVCdTcfaPJd0VpVUuFIP3eetT6ZBJCzpveRVBAdvT0qW8BEcOf+eq1yutZPiC6+X+FP5GtDweP+JdKuc/vpK1QQCRn8BSq5H8R5pW756kUDAbAz04zVe9Zg9qRw3mkdcA/KfSrOkm5kujLOFjRgVWFGLbcY5JPrXM7bWy1jVJZZ0e7+1q1vKSPkyc4OegHQ10HiA6pJf6ZBp7SiOXzTMY5PLHCjbltrY5/Os6XWNbstLNixEuqRbg8wt3ZGQJuD8AAk9Pc9q39LgvlaSe61AXUc2GiQRBBEMdB3P41o0UYoxRSYFLj2o4JxRjigdKKKOKKKMVn6nL5ZTr0J4qvZtmZzkng0l3nMABz+9WuZ1VDJ4ivT1AEePyNaPg/H9my4xnzXyK02UFccc0o28jHGOtO4ZAcc9KXAOBVHUbv7AsN2U3rAzSbc4zhGOK07HUZ7m4e1u7UW06xrKNsm9WQkjOcDnIPGKo2Wp2eo6tJayWdspWR0VnzvYocZAK49TwTWjqeoxabbs5UyOEZ1jHcL1z6fWltdShuLI3LBolRAzqw+6MZ/kagbxFp0RKyzlHXgoyHcD6EUjeJdORtrPIG27ipjORxkZ+taw5FHNFAooopaQUtNbOOCAe2aUUtFJWbqSvJPGF7A54qK3iZPMdge+KiunwYNyn/AFwPXpwawbxwfEF/34j/AJGrXg7JsZec/vn/AArXI5HHTvS7TtwaTBx8uQPahc55z61Uvlt38lL0KLcuwl3nA2bGzk/SrukHRlkc6ZKsssqgsxkaRyq8DliTgE/Tms60v9F/tqT7Pa3LSRTsjSl2MUbsSCQC2ATz0FbeoQ2MsBe/RDFHyWfgCmR6bbKi+Q7xwMOY0I2yDHfPtUi6bYqnli1i247jJ/OkbS7BpDI1shc4BOOvGB+gq2HGcAUxbmF42kVwUUkMR2x1qQOG6UtIc9M4pQaKD0pEOVp1FFFFJUZB88YPGOlMuh8nfoayZwWeEcjMoNYd0NniC/4zkR98djVvwcf+JXKcDmaStbd8p/rTVkYKf6mkZiADTgzdMDBFUdVha/WKyUqjT70DNnglGGf1rUjtrj+3UuGT9ylp5W/PViwPT6Cufls72LUL2GCyj8q7uFdlWZc7R168gnrW3rWkPqqqiTLGuwqVYEgZIO4Y7jH60ltZXtrayWSImyTOJUbCx8YwFPPb9arxeHrmOLYbpHwONwY4Gfudfu/rQ3h2cytIt2MsynB3cAdsZ/KmyeHblljUX20K7NkA9znHXnPQ5po8MTASFbxYmdmP7sEBM9hz9fzrU0rTP7OXAlL5jVWzn5mGctz68flWiKKByOlFHagADpS0UUUUlREnzxxxikuRlPwNZd0uGh6581QM1zeqsY9fvAP7qe/Y1d8HkHTJP+u0hNapOR0zjpRjcm0gZz1pG7EdD2pyvggHB4qrdyOLm0KKdwlJGByPlNbIvUlnhSJmJJO75COMH29a4pVtbPVdTZ50ku/tqG3lOPlJOTknsOh+ldL4gm1JLXy7BHYvGcSRqSwfIwB6ZGefan2upyixZJWT7Wq/ukcFWk+X+6eeuR71Amp60zjzLLZGVU7hGxYZxzjv3GKZd3+tyRvFFZNvEbEsEIy2flAOfTBpv9r6v9nHk2fnlGWN3Cnlu/H+cGlivdbN1ORbts2qcPEcA45Uc/rVrRr3VJmQXlp5MZLDBB3LgA5JPXJJH4VtAUUtFFFFFFFFFRH/AFw+lEx+Q8djWTd8LEeg81Ofxrl9f3x+ILnHG5EP6Grvg6Q/2bKo6ebJWoJMYPGMULJgHnOf0oZwygY6H86WNlBK9f6VXnndbyzMYG7ziAW6D5TWtdXl3ZRxySpFKJJo4sISu3c2M89evSsHVbm//wCEqext1giiW385WeJTvPfk+/FbjavCml293Ij5nA2RoMs7Yzgfkai07Xre+sTdyQtAyJ5jKRn5ckAg9+lV5PFMatAv2WQF7gwuG+UR8nqfXAzipH8UWLKjxrM679khCf6s4OAfc46e9OXxNp/mhQZPmXPEZyBnqfQd62c8HjgUuaWlpMj1ozRmgUUtFFFFZetTzwQq0Kbx/EucEj296r6bcSSl2kUpuBwpbJxjjPvTrsExx8ZAlTPPvXJ+JDu1+br9xP61o+DhjTJSRx50grTK5I4xTUQAhufTilKDZwc0ixEg7etMMKGRHcbmQ5GTjBxjNWBKpXbIu4ZDYdi2CDkGmXdtb39wLi5iDv5ZjOWONp7YqR0jmt0tpYkkiTG0NnjAx169KbDDb20UkUNtEkcg2sozgj0+lRNaWKlALCE7eR1PP4n3o+xWKAMLKLcOR16/nTkgtVYsLSEMV2E47en6VdF7NnqvPpSm7nK7s8jqKaLm4I3b8Dryact7OVIzyD60fapi3Uce9L9rlONpHvk077XMATwcds1Il3KVHAzThPMSfl4pwml7qKQ3EuSAh4pPtEoPKH8KcZ5AcBaTz5R/Dmo5g05G+POPTIo2bM7YyM8ZNUr3HkxAdDMmPzrl/Eak69NtIHyJ/I1e8Ic6dKCePPk4rWHSkyMEZ4HQ0D7uADn3peUzzzj6UpyevHtSKCVGTz60DBxgHI6nNKXI5GMd6aWG7IPWl35UDPWkzjtTsgLk96AfmyMY7k0pk9CeaUN160FlAPHJpQQMCnbsDsaUsM5AA7e9SREBwcj3pzMc9e570gc9D/OkkeQSKobHy5PtTDcNu2gZ3cYLUG4f+FHAzgE9Kat4zL8qMffOOas7nGev50jSFYTy3Q96oKy/2fZdeWQ5Nc7rYaXxDdgfwrH0+hq94O5sphg5E0nStcg54HPTmmck9OlP5H3c/WkIPXB6+lBywwTkZ9KVV7frQeM4pCAAq9QeTQQuQMjim8AgYHXrSkjbwOc0hyAMYNL69gaXBOMjoKMMOn1pRn+LPPencbTg/iaUdPX6U4k4yVp0R5GBTZnud+I44yv+2SDnvTN96TxFDx/tn/ClLXp/5Zwc9fmNIHvBgGODdnIO4/4Upe97pD/30aFa9Ax5cOf98/4UgkvyMeXB/wB9H/ClP2w5TZAAcjO48fpULxOlvaRHko6g7Tx0rGvY8+IdQ7/6v/0Gn+F5zBpU7rGZGEzgKvU1dN3dcZ06QfRxT1ubpkGNOk9iXXNI11dKPl02X0P7xaPtN3wDpsnP/TRaT7VeAf8AIOkAHfzFoF3eFSW06UDt8604XNyCB/Z8mP8AfWg3F1t3DT5M54y6/wCNRm5uwQfsEuT6uv8AjTjcXRXJ0+UY/wBtf8aBcXXX7BKPpIv+NKJbrdkWEoB4++tO865XP/EvlIA4+df8aRp7rp/Z8uMZ++v+NIbm64C2Ev03inLNe8k6fJ9N4oE90P8AmHyA+7r0pPtdyuA1hIB2wwqQXVw3SxlH/AhSpcXJH/HhL17OKc13cA4/s+Ugf7YpPtNxu/48Jv8AvsUpvLjBBsJfxZad9pnwf9Ak4/2hTjdT+WcWMuR/tD/Go/tNwBkWEp/4EKd9qn4/0GU++4f405rqckgWMvH+0v8AjUTPcTSRAWjx4kDMWI4ArFu22eIdQ+bH+r/lT/C6f8S2Zg3AuX+vWtsqBkDoe3rTlIReRxSnGM4yKASZDzzTTyeRxSnuCee1APzdMA+tDY2rjNMbqBg5HSlLcY/CkwwB7EDiqFnZxSWNtNI05kkQMx85uSfxqz9gt+APtHP/AE3b/Gqd81tZytFHa3tw6RGaXy5yPLTOM8nk9eB6Go9NutP1d5DZ/aWSHiSTzjhWyRt69cDP0I71oGxiHRpsf9d2/wAalgtIo28xWmyvZpSwP51O7AbSApGO4qO5u0tbWa4lUBIULthcnA9B61Vj1yGAEajA2nuOQsuGDDGcgrkeo+oNSf2/p0gJSdSAwU/u24bOAp44Y+nWpdO1G31OGSa2KPEkpjD+pAB/rUt1MsKxs20BpFQHpyxwP51MzBQPlXkA8ijzBjO1R+FZV74j07Tbp7e5dI3RoxzgZ39CPYUW/iXTbm8ks45V81XVPuHGTxj2OQRg9xWqz8nCqRj0qvdSsqxhcLukAPHauZvyF8QX2e4j/lVrwsCdNn44+0P/ADrZI3AkcAHFKgyCSM44oXdtOce1KM7gQATjtSlTvz0IprcFdwH0pWGcnijacZNDKOBuyTQVBAx2Gc0eWWU4yeKybbVI4LSCFre63RRhGAhPUVKNahGT9mux2/1DVDcNp+oHzZUvoXKGJzHG6+YhOSrYHT8j70+2/suzcPbQzxtsMZ2wuAy7i3Ixzgk4+tWv7Qtc5Hn/APfh/wDCpoL2GeTyUEoZuhaJlH5kUS3UMb7MsSoAJEbH+lRTTWlxDJbzxySRSoUZTE3IPXtWZ/Yujzv5tw17cSkAGWVnLYXgDOOOOOOvfNWm0vRmeVilwfOlEzqA2DIOj4x1HarNmLLToDDbLKqs5kOUY5Y4yefoKW5K35giR3Qx3CSkmEndtOcZ7cjrVqa6ijfadxKjB2oSP5VEb2HdgiQn/rk3+FU76003UUmS5heRZyhcbGGSn3e3GDVeDSNNttSa9U3OXCFowGIZ1YsGP4np04rVbUYCSNs3HpEainuVneERLIf3qk5QgAfWsLUFz4gvsk9I/wCRrKsvE8+jpLapbRSqZWbLE561P/wnN3sA+xW+OvU0o8c3i4xZwdfU0p8b3rjH2O3AHuaF8b3YwFs4Bj3NIPGl3/z5wdfU0v8Awm95z/ocA/E0v/Ca3jnItIF/E0Hxpe4H+iQfmaRfGl4pBNpAefU0p8aXg4FpBj6mnJ43vVA/0WDOPek/4TW/J4toMfU0v/CZX6t/x7Qce5oPje/zj7LB09TR/wAJnfjC/Z4PzNKvjS/A/wCPeDn60v8AwmN+Tj7NB+ZpB4wvNxH2WDP1NP8A+ExvT/y6wfmaVfGV8vH2aD8zTv8AhM7zGTawfmaF8ZXrjItYMfU0g8Y3oYj7LB+ZoPjG9Jz9lgGPTNH/AAl96F/49oBj3NMHjG8z/wAe0P5mn/8ACX3p5+zQfmaG8X3isT9lg/M07/hLrwjP2WDGfU1DayPqt7dXcgCM+z5VPHQ1/9k=" /> </div> <p class="paragraph"> РИС. 11.5. Выбор базы данных и роли пользователя </p> <p class="paragraph"> 7. Выберите роль public и щелкните на кнопке Properties, чтобы открыть диалоговое окно, показанное на рис. 11.6.  </p> <div> <img src="data:image/jpg;base64,/9j/4AAQSkZJRgABAQEAYABgAAD//gAcU29mdHdhcmU6IE1pY3Jvc29mdCBPZmZpY2X/2wBDAAoHBwgHBgoICAgLCgoLDhgQDg0NDh0VFhEYIx8lJCIfIiEmKzcvJik0KSEiMEExNDk7Pj4+JS5ESUM8SDc9Pjv/wAALCAERAPYBAREA/8QAGwAAAgMBAQEAAAAAAAAAAAAAAAIBAwUEBgf/xABJEAABAwIEAgYECQkIAwADAAABAAIRAwQFEiExQVEGExQiYXEygZHRFSMkM1JikqGxFkJDRFNylLLBNDVUY4KDk+Elc3QmZKL/3QAEACj/2gAIAQEAAD8A0quK3wva4N3XgVXADrCIEpvhe7y616x/3Xe9IcaugRFevrt8a5R8MXUia9c/7pQ/FLh7RNatoeNVyBf3DGjN1gaToS92v3qDiNWCR1m8A9Y73qO23BBdNWBoTnd70nbq/wBOoP8Acd71JxCsCB1lT/ld70OxCqGHv1P+R3vSHEbhsguqxy6x3vS/CNfIYq1df8wqLe/uA0g1ap/3CrG4jXgfGVP+Q+9M/Ea8/O1Nf8w+9BxGvlkPq+fWO96rF/cb9bUP+45BxCvlPxlT/kKUYjX1+MqT++UfCFxqetqf8hVgxG4B+cqR41CqziNeda1Ty6wqG4jch2tWp5dYU5xG4/aVf+QodiNzECtU326wpRiVxPztX1VCj4SuJHxtWefWH3q+1rXV69zG3FRmUZiTUdt7Vc9lw1xabuvmAkjXb2pLO4umYg9naqpb1cjvnmFbY1222K3r6lXqcwqtY8tJyuJ0K0mXWCG6F09gLxUBM0zrqATG0ESVVQrYLStaje5176WQ9x8EmCZ9hUf/AI7BOQkAktzZgTqdD4RlXLiAwnsmWypu60PkEyDueHKI4qxt5ZPpUaVXNDaTGulpIJGbT2kIbdYb1XVmmcoqZmgt02aD94K5KV0ylZGk1svNRxA4QWga81f1uGuNYdUIIaGd2PzPxzar/9DduDhVK4dTdRbLRu0SNm6efpLmp17RlJ7eqYS62LQSyYqEp3V8Nc7N1LS4uBMyOA+7dZzxa9pqyHupa5MsN14bzotDDqOHMwvrr1jSTVc2BOYjLpHr4rtZcYCy1qUGQWvrB5GV05RmgDxghF/d4PdMME9Y0QM7XQBpwHHRefyk6DZQ1hgk7KHMlpMJQzQ6oDBMJywQdePJKWS4RqgsObYyFKgs04pA3QhSGagldVm5tLr3g/o9B6wtStiNB9k63FV2bq9asau+r5LgtwG38/5A/otrDsEtcQ7TWrdZm694GUwN13/ktZtbvWPk5KOitm79sI+sh3ROxABBrT+8g9GMPa2HmqZ4Fyg9GsOy6U6k/vlR+TOHRPV1NPrlSejWHEg9W/7ZQejOHfQqH/WUfkvh30Kn21Z+TGHQPi6mh/aFI7ovh0ghj/tlDei2GvI0qDX6SG9FsMEy2p9sqB0Yw2QMjzr9Mpn9GMPzOlj9D9MpHdGcNL4yVPtlKejOGhvo1NfrnRf/0fY/kzh2gLH/AGyoPRrDturf9sqW9GMNnvMf55yn/JnDM8ZH/bKT8l8ML3dx5H75R+TGHSe5U0+uUHoxhpAOSp9soPRjDCIyP+2Up6L4cBAY/wC2Ufkvhv0HjT6ZR+TlkxwLBUbB3DzKuOB2rtM9xv8AtSsfEMPo4firGUM0PokkuMycy9B0Y+buQdflD4VmKVa9B7TTLw0NJAaPSdIgbHgT7FU3Eb01aoFnIZmO51A4bbqoYreGi97rPJl2Ekz5/eradxUr2NpWrNc1z6pkEQRqY/otHTcbIgcDujIAfJMBwB2Q5oEeKYNI14JdDAClshwEDRQ1pIMhKBqAN5TVmnMfxSOEuEHdLGmqBx5c1EEzOyZoiQI1CnIC6BwPBBA6wn2pQNyeJ5Idp6Oil0HhrzSuLAdCv//S+k5W5m6qNBvv5JjAGwkrz2OgfDVIDcW50P7y0ujILhdQdrl61SQ2mTrIOyZjnEzz3UO4kExKqq0W1urLiTkdmCsHV6jII81Ic1onJ/8A0pztmQyJ8UFzIPc+9Tmbl1pj2qWvaRAYDpzUZm5R3APWmY5p3YNTzUNczvdwH1lKCyR3InxTPc2XfFgj95LmbnkUhp4lJmAE5AR5qS9mb5sa+JQXskjqht9JQ17SHDJw5qWuaHQGR60S1r4FMH1qOtYB8196JEZsgnzKh9RsT1Q35pXPZl9Aa76qCWAfNx61Hc+h95VV1WLLd72sbmERJWLjABxymSY+TH+YLQ6MaNvCONy9arjLTpK8/fdLbezualCnTdVczTMCIlZ1HpDjl1XbTpUmNL5c3NTgR5lensbqteWVKrWoinUcNQDofEL/0/plSs23YatWoGsG5PBDarKkuDtASPWN073RBa4etSCQDooLiI03TgyJ5pQNZIMJmEg6bKBx8fFLT9LwBVjyAXxzSTqQFWI0aVJmdttkrjBO6lnemNNFIzBxBPhCjvGpoSg+f3qS4gTuEpkjYpRmByhqVzSCYnTVSJXPfh5s3mNTHFZWLE/DzMw/Vj/MF3dGiMl2OPaXrVa/umTvuvCYHh1CrjFW3xGg8ljSY2AI+l4L0LqtFlwWd6rSqNawiA4Dk0QtCwzW9hRa8w4CS0iMs6x6tk11TZe0DQLhlc4E8dAQf6LhrYKHZWm7JAc46t1IJJj2GPUhuCNpvY8VszWmQ1wMba6StYGBryQO9qfYmzAaAbIc8mANFLScwEpWxJX/1Pp1N0kCdSeCep6ZgSR96WRJnTyVQ1BPEFPw9E+tVVHhjS4kNA1JJ0VTb61APyuj9sJxe2ucRc0iCfphQb21zH5TS/5Ak7bajTtVI/7gVnbbPLBuaW37QIN5bZdLqj6nhKL6137TSP8ArCk3tnEi4pE8s4UC9tSQG3FMuJgDOEuIGLR3PT8Vj4y7/wA5T1/Vj/MF19GiflmsfKXrTGxkrEdaYzSxCtWpVLaoysCC140jkq7To5VZRIr3b2F78xZROgW+1ncykk+a5r+6bh1q64DGOAqMZ3n5R3nhskwYGsrEb0u699p1VKm01alQVW1K+ga1hO8cTBBhPgPSh+MVa9J9JrHU7h9OHPDXRLssNjXQQTPNegGcjjomMwDsShriAROmyBJh0yAENLi7RTTMEg7QoYe+AJ30V7pY4iTKR05zMHwVZAyaHVAzHiqLvW2qifzDorzTaMx6tp9SgMaSSGt04ZQsZuJVKLG1bq2zNqAZCymPXx22X//V9i/GqApF/Zi3bUtHh4+KZ2OWwaPiIJmTlaeMc0wxq2yVC63IDHZS6G7xMfcV20atKtTa4BneEgQFYMsiKbRrrLVwYzDbJjmta345mzfrLoxEDsVU6k5eKxsYOTGKR525/mC7ejc57yNB2p8hakAEy2USJkfgoGuycnJHNJWpUqrA2oA8Zmug8CCCD6iAmOWPRE8ClMbkAFO0ENgHyUSSdeHJTpBMb+CNMokRpshp1HBRTHpGSVNKXOGwMq1x7zjrEpYJeT9yWBA0iEbcJVFyx9S3qspgFxaYB2lc4r4tubW3M6a1f+lIqYpm0s7fU/tf+lW84gYBsLYhu01Jj7lAGIkZfg+2AOkZ/wDpMfhDKQMPtY29P/pLGIBmUYfagcRn/wClIOJB0ixtpHHrNfwQa2KE62dD/l/6VV3SxK9pto1LehTAqNcS2pJABXZiQAsK0g6t3WJj5DcUobH5OfxWj0baHOvDJ/tT1//W+l9XOYAlVTRLS7tDYaYOo0PJNlkmKmg0Omyg0yQDm08ITGkY1eT5wo6ogQHOnnolNIj88n1BMKcnLnJPkEMpwYLjrzATGm5pLTUcI4QFBboBmcfUEzWAmM51PglADQ+XkCIkwla0sqBoeQTrsFc5pbmJqSJ30UkcMx01nRU66APJjfQJ3NJ2eZ5aJCO7o4xx2QKcggOcR6lOQB/pkaxqAFBblcRnMDXYInNqKh57BHVSPTcZ46KXNMZS93sCrgZZ60u0mdDpzUtYXAEPdHkEFuXd58tFRf8A9irfurF6QNJxShx+IP8AMtPo0MrrwnjcvWrLRuIB3JXkrfA8QtnVHHD7e5ptaQ23fUZ33EO1mNQJ0zS7vHUrUwrD7y1sK1lcsa7MwHrBV7xdka0jw1HirHW2ImlTZRrNotAcYaRrrx/6RXs8RHzN4W6g78N9ZHP8FY+nfZLcNrasbFTM703exUOo4o6o5zqhANXUNqwC0xAHKOaDZ4pVaWPuQcw7zs/pHh5DZLiGHX9zZsa24La9O461jxVLcoykDUbwSNF//9f1Nth/SFjqL692KkVO+G1iAwZmu2iDpnbHkuutRvm3D6dKo7q31M8ZoLgXkkD1FO2zxYEudeCCW/nAAR6vNc95hN/iGJsc6qDZNrNqR17gC0ZIaGjSZDjPiuu6sr2pcur07kMaAQ1xdGVvd24cDqq6mGYm6mWG5GWSXgOPeJdPLyhS+yxVznO7aAMpABdoBw4bqy3tb2n15rXQdmILYMZNfLkud+H4s+rnbeAEDLo7U6+WmvBdNO3veyXFKpWd1tRrgxwftO3DRYNTBcea3rLeuOuLWhzhd1AJaXRz4OHuVtXA8bcGDtBqkPpvGa6cMrgaZc7YzJa6BwlLQwbHOoqdpruqFtQdXSF49oy96ZMTOYtPH0Y2JWx2K9p2VtTpVcppUGMcA6JIEHh5exU0rDF2MLBeafVMDeTw802M2mMXPUOw27bQLZFVpfEkEFv9R61iU+jmM29MUe09Zbi0p0w3tTmkVAwhzttWzw212XosKtKtlamhVqufD+5meXQIHE+Mru2iHSVz4hBsKx+qVi9IdMUoQdOoP8y0ujIbN5PG5etQgDcaLLdbYn1YDa5a+CJ63SecR56JKtriLRUNK4zOc1oDnP1Eb8OZTmyxN1lcs7V8dVpVGsOaA1xHdI00grhr4Xjrbz4m9caBDxldUJcCXywgnk3SDI12KpqYLjJbaZ7p9YUi11QG4I1FMCQf3s3q9ik4V0hqAB+JOBaSXFlXLmPey6eEtB2/quu4oYzXwtlG3cyldNLmuLqjod3SAZmdyOJ/1LjZguNmlTp3F0awNOjmDq50qAtLydNQYMD3rSrWmKOvS5lcGjUJgCoQG6aGP6Kn4OxOo+nW7Q1jmtLTLySdd9tJgJ62G4lcVGltyGNZBDTUJ1BnkpoYZiTHd662aQAHmHOnQn3J7uwvq9SsadzDakhsuMAEDhx4qaVjiVs5pfd9blfJbn9IRtt9y4sewvHb25e2yvm0beqzK+mXcSMrgOWke0rmfhGNCtc0e0Crb1bZtKk11cjK4EyTxIgxH4brtfh2Kttm06N44FjnlpNQy4QIBPt8pX//0PSm2x6jcUC64q1AbzMSK0tFGJyHTfQ6kncalFvhuPsp1H1L3vEyGNqnaHcdNZLdfDjsdIW2LDFqTjWa63AAeM5l3cjbb0oO06b8Aps8UcKZ6/JBGZuck7a6x9yG2OIua1huyO6JOcniZ+4phZYiXNDrvSZcQ86+Eea6rK3ubelUFbLL35pDi4nQDWfJdIBjXfzSwdBBlADwfEKi/eRYVgRu0rC6QScTt+7HxB4/WWr0b0feN4i5etU7HRQJLp5KSQQBBRBBGpUZiNZ1RJ1J0UOAII1hSAARrwQ2DPHzUgw3UEpTIgASCEzAQ4ifFFMHvJREgGZCsc0l5Og1UEHMddfNUuLgBpHigTmlDnmSdyj80wN1IMukaBQ4niDupmdtExdBQ5xJ2+9LMeKJ57r/0fpJIjxXNiBJw+rto0+tYvSARidvr+gP8wWn0ck1b0T+tPWuRMtlc9O6oVC7K8tDRqXjLOsTqmdcW7W9Ya7cgJG/IwnfWogT19PLEzmEQuaviFpbAGtdUwDUFOS7Zx2B5KoY9hNR5YMRtnOAaZ6wRqSBrO/dKc4rYZ7hjrylTdakCrmcBlkAj1d4e1DMRw+s9rad9bvc4SA2oJPDaeei6iwakE6KRB0zSlfs0g6pmOHjuim0S7yVUnO0ZtJVz/ScQJg7KGyXS4GfBLEnw4yoggGSlLQTom0k8EbP01SuJkzzUCZ3CYOOvBQe8dzCXWmRBPkpIlSW92QdlRiGthW1/MPqWF0kP/kbcg70T+K2ejTJddugf2l5lbBaIIP3LhfgzKls+k6u8yMoIAGVszHjquepgVIimW3NQClOWQDuh+BUnHO6vUJy5YEaapa3Ruzr29WiTUDazgXRE7zy8Sv/0vZV+iFrcPe+tdV3Va0Cq85e/ALeUbOI9SMZ6LNxCqatGv1BcXOJOsHI1gA027rTrxb4qy06M21niIvad1WfVLnOcXBpBc4y4xGk7aQtotmZKGtbrp7UsCNENBDgYgSpaCA4T7FWymM4zDjxVrxDnHYSoIg6KsEAKHbiVBb3pCYiHamdkAA1NvaljMTEaFEA6cVJa4jbRQ5sga6Ao1J222SuzcyJQ0GI2VGIf3fXmPQKwekwJv7aDHxJ/ELc6MH4u6JH6w9bOkaBLqdNlJDY1O45KBERELnuWVn27mUdHnxiBOqLe07PRdnADnHQNJISFtUMgBxE7lDGVzTzEDyjUJmtrOG0ACSSENbV6sZvS1PeETyUAVw4AjuGeGoVgBzAHnwQ3Qu3gKGHvzlMeK//0/qTzFQiN0rjB2KqB7u0xyRHCPUj7zCNZJ8FIcC7WVWSA86HdSCJEBO3MWmTCggkGOagAbnko3I0kFBMTpxVGIAHDqwjXIVg9Jf7wt9J+JP4hbHRlzgLoD/EvkralzWaJeMgjZL48UTDRJHtUS7caeKmXDjuFnNu61Xd1Bp4tLjIkwOHgrybxoiKLTzDj7kwdetETR+0fcgdtIBPUmPrH3Im9bHzGn1j7lA7WXzFHXhmPuU0xd5nfM6eJUTdFwGWj5SU7+2F5nqT4SVWe15v0HtKSLojejqeZR8qBjLR85KjLdET8R7SpPa9z1MRzKD2ov8A0P3pPlYk/EmTzKC26cZmj96//9T6HF2RvR9pTHteUwaBM8yktq9SuyoXtDXMqmmQ3bQA/wBVfx1UyDx0K578RY1vFhWD0kn4Stx/kH8Qtno1Abdf/U9a5IghKIk6qCO76QE8kamAB5KSTlUBxI3hYjQ41usFOuWudJ+TudOV5IgjzVIw92dri28OUR/Z6nOVrdrJP9lugB/+u/3JxeSNba78uzv9yHXgMfJ7v+Hf7kdrE6293/Dv9yineRmi3u/4d/uUi7GcHs93/Dv9ysqXoJPye7/h3e5VuupJ+S3Xn2d/uVYuYgdmvI/+d3uTG5E6Wt3/AA7vclFxDjNtd/w7/cp7Q2D8mu/4d/uQLkB89lu/4d/uS9ogk9muzr/h3+5T2o6fJbr+Hd7kC411trv+Hf7lLrkRpbXW/wCwd7lVYNeKNZ1Sm+mH13uAe0tMQOBV5PA66qJInWVz3zj2Gtp+YsXpDHwnQJ1+IP4ha3Rt+UXnGLp61RUIJnYr/9X6d1nJqgvBIkfehzwIj7lOfRKXQJ13Xm6tGj8JCpe3BNF1oSwCSaZ229cr0F7c37sFo9kBz1aRl1NuYgwIAjbjqizvMWHUUqlJz290Oe6mQXaCZ10jXXit0bIhEIhEIQpUIhEIhEIQhcGIek0+a4jIOijWZM7rmxGexVo4tWJ0j/vKhpr1B/mWt0cI629B1+VPWoY10nVAHP7kQJA008E2UaKMglBHdgJ7HDrO5w+3fXtadRwZu9srRp0mUmBjGBrQIDQNAmDQDMKV/9b7MhCEIQhCEIQhQs/EfSZA5riPJEuABnRc2IOJsak6d06ysTpG4fCduY/QH8Qtbo2QKl7J/WnrTNQSZ5oDgfWEd2J5Ji8CNPUgvPKVLX5gQPwXXhn93UP3V1oQhCEIQhCF/9f7MhCEKFwYgYc31yuA6OE8lM92I3XNfZew1gR+YVh9JnDt9tpp1J/ELU6OtJq3sf4p8rWLdNVAaCfHwUkaCSpcAQHQoETupIAdImOcLtwsRh1H91daEIQhCEIQhCEIQoXBiRyuZzXCBpxClo7sEBf/0PoGID/x9bSO6fUsHpPHbbYRtSO/mFs9Gdal/r+tPWsW6bpQzXcoyQecqXCY0gKTT0BOiggwQSNF1YVHwbRgz3V2IQhCEIQhCEIUFShQuO+bmIM+S4iwxruiBljkue+b8grH6hlef6WgdutjzpH8Qtbo0MtW/BI/tTuC2CNCCOKUF2gUySAIUO7x1G+yjOeOqZpHAwV//9H6vY1G29oyk8jM0awr+104mUdrpzCbtVLmo7XS+kpbc0nbOR2qlJE7JRe0S6M3FMbmmJg6hBuqQMSfYlF5SjdSLukeKO10pifuQbqkBoZU9qp5olQbqmOKXttH6SkXtEn0kG8o/SXJd3FOrEGVSXNgDj4oaconQrmxAjsNaD+adlh9JspxC2nfqT+IWlgBDbm/gfrTlqlx3ncpQ7vepMHd3Ugckrj6PNGg8VLSZ9aZzu+RAgeCjrNIhvsVVe/pUrilRcBNSdY0aPHlyVQxe2c97Ww4tqNYAG75o18tV1F5+i32J2HvDujfgFz3NSoyn3SGzUaJHLMFcCWlsxrzCZ1SC7QHxhf/0vp3ag2vkhpAP/eyjtFNzJAbzmFDbqnB1YI+5P10gObHgY3SVaxbTqEBs5TGii0e99Ck5x7xaJPPRO8zInRViQICZwg6kzCHzuDx9qrG+qktnvZtkHkFRiH9irCPzSVidJSfhS3/APQf5lpdHz8pvyf8U5ap57+tA0dz0UEnhCCNBAhBMt5EIYY1Gqoq37DVdFKu4Twou9yVt6z9jcCOHUu9y567rK4qGpVtq73EAT1T5Hlol6iypuzCjehxILjldrG3DhC6BdsZ+juXEj86mTCuF8wETSrj/aOqofdC5AZTo15NRp71MgASD/RXV7ltF7KZbVJ+rTJHtUVL1gc4ClXOv7IqDfUXnvUa5O5ApO8krry3gNFGvp/lO9yjtNGBmt686jWi7b2KRfU4DRQrgf8Aqd7klW9a6k9jaNcktP6Mrotg6lQpMIghgEHyTl01DOqBo4+Kk76yV//T+lnUeIKXYepBJjnrqiYjdUYk49hqkCO6Vh9JnEYlbECZoHh4rT6PaV7/AP8AqctZ2xMJWkclOm4+9QSSIjZJUqspUy+psBKijUdVDj1VSnEekN05cwuMO1nVTPjJ8FHdAJLuOyYOA0za+ah74E+EeSanJA1nVDTDj5a6JGmag5+StIHWukpXGH8dkjR3fR15pgQDBdPmlJ1mVMGC6dEAgugHilMSdeKC05gZEKTJ4oc05TBG6VrTEaagqIcHRtCMjt58lRiAPYKrp0DCsHpQfl9sTp8SfxC1ej2lzfjlduWs4kTolG5ME6L/1Ppu4UOnTRV1GMrUiyqyWnxVrjLMokTuVU+h32vzHu8SAUvUNc0iddtBsrDRzkOc6T5KDbsJhwmGkAxqPFO6lTeZkjSNkzKbGuJpggudJJ4qGy6RlSNBDxGyuqHvOPFE/GGdBCqkg6BD45JSddDoEzXGCDshsZ+HmozDPqOM6Js4kEbKXEEe5DnDbxSSM3IKSQYiJ/FAPMbKi+g2FaGggsP4LznSx/yu1junqjM+YW1gOlziH/1u1C0iNDrxQAS47woLDprohzdAZ2QG6lAaC3U6hUmo9hJcJYdgQExqkzDJUdcWg9zUcOfkrKTy5xDjAHCVIdA2C//V+nNAzjhrzUMkFwlKHDOAqsQptqVqDXwQamomJ0KipZWpd8yCY5lJ2O2J+abPmUCxtjPxLd+ZR2G2aT8UPaVDbO2kzTmfEpuxWwcT1Y0PMpTaW7jpSHtKkYfbjakJ8CUxsbcSMm/iUPsbfL83x07xSdhtzJyeqSrKNlQbWYRTEgjUkq2oDnc0c+C571pNjV1/MOnqXnumEdqtZAE0j+K3cEZkxHEqYEht0deK0SA2deKgEAz9yAARCDlyxyQYhRpEwPWmGUgnhyURqSHRI5pYMiSjJEjTdQA4AAAeSmmCaglvFAZ8a4zoEuWHCI1RcUDUuqTw4NDHSZ4iI/qrXt1HfbqkytAmRugsAk5mhKKbTMvEoDAQRnav/9b6X1bM3pt1UdWGknM2QURrOZqscG/SajSIzN80hY0T3gSUzMoc05xoUlRxzkgbndUXpmyqiNMh19S830y7r7Oq0nvUz/Rb+CmMUxRxjW6O/BaLn0jPxjZn6QStfRmDUZ7QoNWiNetZ7Qh1aiN6tMDkXBL2ih+3pj/UEC5tyY6+mf8AUFPabcaGtT0+sFAubUfrFL7QUi4t51rU9/pBMbq1gu66lP7wSdrty35+n9oIbcWwIPXU4B3zBKLu3cXRXpA6/nBI25t3VB8dT0+uF01Lu1Dj8dT0+sFX2m3e75+mBHBwSm4twSOvpkD6wSG4oO2rUvtBAubeYNenp9cINe3me0M8O8E3X0M09fS+0FD7mgXmK9P7QSG5ocK9OePeCc3NuW/P05/eCk3FvlMVqfDdwSdooH9PT+0EdpobGtT+0FPaqBgdfTHiHBU3NxQNpVDa1Myw/nDkv//X3ul5PVWBB3pn+i3cJj4SxZh1HajvxWh2S1H6vSg/VCgWlq3Ts9Pb6IUGztf2FP7AU9kt2hsUWA/uBAtqBIHVMGv0QrH2tpmc00myPqhIba0G1Fsn6oQaNi1+UtpNdEgEAEpqdKzOraTHcyGgqRb2fCk37IVFYWlKpRpi3YTVcWyWjTRXC1s5aOpYCQD6AUNtrMF2anTAEmS1oVbaFlUcCymxwB3DQVfUtbSTNBn2AlNGzdEUmctGhc9dlpRY1woMcXVA2Mo4lW9mtW5c1FuvJgUuo2gOlEfYCg0LPLJotJj6A0UC3tM4PUtifoBDra0zn4hpjjlCpuBaUKefqGnUD0RzXR2S1LBmpN1MaMCg2tqNOqb55Gpez2YPzTJ/daoNvZuPzbARwyhP2e0ayTSaTyyhV1WWlGi+r1LTkaTGULzHTN/WGydESwmB6lvYVlOIYqTv2o6rUkOaUsEmBsEFwGmZKYjSfNA0jX1BW1BFRxOmqriT5L//0PoV1YVq73PaWQ7L3idW5SdvOVZh9q6zthQkO6sABwEE6cV0gGYI4rkvG/KrQzBDz/KV3BgzNMcuK57iia9GpSb3XEGJ2WfcWOIV7ikadZtvTB7zaTokceG6mph+IvbVYbxwJPdcKpBy8vPxXXZW1a0t2061UPfmc4kHeSSlvO9Tp8uuYT7V0kgtbBPFVnV3q4KqnRqQ8F+ruIMQmaKgMB+sQDyTlx6zLBC5r4/JeMBzfxXY4zQYdYk6pTnImSRK4Lmwq3Fy6sytlB6uGk6d1xJn2rhGHYlTq0ybl1QwQ53WHTlPMeC2zPViRLoVV1As6wIGtM/gvNdL2t6mwdBnIf6LTs8Ts7HEcTp3VUUy+5cRoSuw9IsKDY7UAeeUqB0iwrNJu+H0Sm/KPCsv9qHraUv5SYS1gPXl3gGFL+VGFNPzrv8AiK5/hrAyS4uqGfByj4YwLNM1I8nJjjOAcDUP+lyUYvgJJk1Brvlep+GsBB/Sa/VcobjWCMeyozOHNmCWO0Uux3BatQuqGo488rgkp4vgIcSTU3+i9MMZwIcakfuuVj8a6PmQOsnnlf70nwxgMic5HHuu96//0fYDGsCY4OAfIMjuu0RUx3Bqpl7qjoGndck+GcBJBAqbfRchuL4GJMVPsu96Di2BlxMVPsuUfC+BFx0qD/S5KcXwUOBAqQD9Fytq47g9ZwNR1QwIHccldi+CfXA/cd70DGMDHGp491yh2M4ESPnPsOU/DGAxJ6w/6XJji/R479ZB09Fyxuk2I22IC2baEuFMEEFhEbRutO+/vW7/APYVz8fUmdsEjvm/YuzC/SetF3oqxCVu5TcQodw80x4eagekUg9Jyml6AToQjiUDZSVA3KV26D6IUjZBX//S+gqCp4KOCOPqX//Z" /> </div> <p class="paragraph"> РИС. 11.6. Свойства роли public </p> <p class="paragraph"> 8. Щелкните на кнопке Permissions (Разрешения), чтобы открыть диалоговое окно, предназначенное для низкоуровневого указания разрешений пользователя (рис. 11.7). </p> <div> <img src="data:image/jpg;base64,/9j/4AAQSkZJRgABAQEAYABgAAD//gAcU29mdHdhcmU6IE1pY3Jvc29mdCBPZmZpY2X/2wBDAAoHBwgHBgoICAgLCgoLDhgQDg0NDh0VFhEYIx8lJCIfIiEmKzcvJik0KSEiMEExNDk7Pj4+JS5ESUM8SDc9Pjv/wAALCAEPAVQBAREA/8QAGwAAAgMBAQEAAAAAAAAAAAAAAQIAAwUEBgf/xABMEAABAwIDBAUHBwkHBAIDAAABAgMRAAQSITEFE0FRBhQiYZEVMlJxgaHRIzRCcpKxwRYkM0NEYmOC4TVTVIOT0vBFZHN0orIlJqP/3QAEACj/2gAIAQEAAD8A7N24u7uAkpGFalKKlBIAxRqe8ihguA7gwqxgxFBJuFBakhRCUycuEx+I8aULfAJTi8Kjjz5IlRz0mmure7YOF1BxTGRnPXh3VSpN0htCylQStOJJjhMT7qs3N4q3D6UkoIJyOcTBMeuqCp7EZC9YMpOVRYeCzIWkjM5aU3V7twKWEuFKYBMHKdKQpuwcMOHUZA5xVYccH0j410Ktb1KErUDCmw6DzSTFVFu5BzQ4DywnlP3Va3aX72LC2vGkgFMQc9MqrUp8JJIUANTFVhThBJVQcccKSJOopsSwnU07a3ACQo1N49piJpFOLUIKzUxOYSAqlCnNQo5UCtwgmTRSpeXaMCmxOEGF1WFLSSMWlEOOcFGiHHCBJNBa1zGIj20uJyZxGmCnCfONSXMpVRDjqTKVe+jvXJOZ0pN44NFGotS8oUTTBaxqo55eqv/Q1dn2TFxZoUuC85JAUoiYJyqq6sEtJQly3S2p1JKRjOIDmRNen6DpnYKsv16vuFeWLiW7m6StGJLilJUkKwx2gdfZV/lNcBIaRAgDM6DQeGVKvaRjAGwAAUyFkHMpOsfuDxphtdwAQ0jWTnka5ri4U/hQpKAEkHs6ZCK7XNt4nlOqt0klRIE6DL4e+ql7ZWbfc7ltJKSCR61GNNO1VA2ipFvbspACWvOPFYxYo9VdCNsBS1Y2wA47iUZ0BUk+6Kl1tsOrfQ20ClZISs6kSrWR3+6q3NrKL7zoR+kW2qJOWDSidtuLWhSmwAkyUgkA+uuAPENraCUYVqnNAJHqJzFdTe2Hm92lKEQhtKIUJnCqZpvLT2JRS2gAhIEiYj8SMqfy291hTxbSCpSVQTpBJ/E1RcXwc2ezapJOFUrURmeQ9kmuROHQyPZSuQESAdRwp5SUgwaZsIlUcqGRHd6qBCSmAD4VBEHI5amKXs9/hQhPHT1UAkAzHCn7ISToaQpE5jXuopj/AIKMAZRSuYSTl7qAwA6URBOXCjCco+6iAMWlQQZA5HQV/9GsEE6DwqEpyMe6mGE8DM1q2V22y00obtZbChhcVEHFIPfRub3rLjbz5bLiAQpxKpKgdMq9F0IWBsJWcfLK+4VZsC1Zft3sbSFKL681JnjWkq2skEBSGEzwKBnU6namZZZH+WPhR6laFOTTEj9wVE2VmSTu2CZjzAaVVnagK+RZAGfmCqkWtq6hDibdvCsAiUDSrDY23G3a+wKibC3jK3aPLsCh1G3CvmzUcewKY2jGiWkCOSRRFsyEk7tE/VFQ2zOu6bH8oodWZ/ukD+UUU2zQV+iTpl2BU6uzqWkH1pFTctlMBpEz6IoG3Zn9E3IPoiiWGFoWCy3GX0RS9WaLU7pJj90UzNq2MSt2mI9EVOqtHMIRp6IorZZwfokZR9EVWWW8Khu0Z8MIpdwyQPkka+iKItmYJ3SPsipuGuLKNPRFEWzGElTTf2RSblrL5JBj90VNw0TBZRHPCKPVmpndoP8AKKC2GeLTcfVFKphv+6Rn+6KHVmBnu0Ak5dmv/9L6KGGho0j7NWNsM67tJI4YRSrYbVI3aAY9EVE2zSUj5NEkeiKY2rJQkFpE/VFA27QGbSCPq0Rbsx+iR7Uiim2aJhLLY/lFcHRcHqFwABAunPwqzo0qGH+e/X99dF3ZG8ukLUpSUJQpJAOsx3Vyo2dtUNlK70nIgdrT3d1A2G08SsN3kcWHtRw7PCiLHaQcAN1AKwSUr+jxGmvfV7VteMuPquHt42UEIBVJ9vsir7JRFmwIEBA4VYSTnrRQVRlrNEYyTPOphJzymfdQUCJNApBAGZoGcWWlEGSJBFHI6CmUYTmJ9VIdYAgTrTxCFGOVBc7vI0rRhKgDTDEBmdaVZ7J7qSFHl6qiUxAAoFZBgaTnTGYnuoE9g6UucSDHPKgkwrWRzp4Uo6Aiv//T+lkHHmOFSFDLjSgT51NhEExpUAM5actKXFCzA1GVOFaVFFRIgZUc4GQ76BVAipjhJVpXH0NSFbIeVEzdOfhS9Hf0L0CPl1z41qYlcAPXNEHLMx3moR6vXNSE7ydRUWJKshB1mkSAEJAEJGgHCjmVZaVAF86P0hmaIJSqOFAmTkRS4iONLiJIzimxFStT3UQSBJNIorJSQeyNaJUc4iJqFXyas+WVQqOHJUVGSZVJ4VAVZEnIUFKVhJI1PCkntHnGlRKlcTSlWuZk1AonUnSiFYUmSK//1Po8lSRNPoYBy50cREgGcqKiMiSO8GlViSdRBpYOfEUUqIUZOVFJUCUkzNHtAxI8KVOIrmRTSoHM6d1FRVwNRJJSMwAK51JPXiCswWDl7anQzLYrmf7Qv8Kr6Nki2fni+v767nnN00twnzASa8XtTbFy+6hKUltShmONaGyrvaNlaBy4cDrUglKwZSDOh/CvTtqQ4lLiFhSVZgiluH2mBLq8IJgTxoJUFYTjGFWhnWpjCnFNhYKkgEidAabMDM0EkLORiDrQDgWApCkqBzBB1qEmZkT31DIVA4ioUiZGXrphoADnRkp14moCNIn8KpuXAyy44lMlAKo51jOdJrdsKQvBIIB7Ry91T8p2MHZ3ZjXtH4UW+k9uAoy3mPSP+2p+U1rAkt6ekf8AbSnpNblJzaE81HL/AOND8o7cmQtvL94/7aB6SW4PnNZ/vn/bX//V9d+UVsROJr7R/wBtKOktsOLRy9I/7af8pLbdmd39o/CkT0jt0kytqPrn/bRHSO3x+cjTgo/Cj+UttpKPtH4UV9Jrb+H9o/7arPSa3yEtnuxH4Ufymt5w/Jj+Y/Cp+UTECVNE8e2f9tdtltJd/j6shpzBAUcZEeIq9Tt20U71hASpQTIck5mOVdPZSTBqHgYyog92fOiFdqNeNc2IjaCiT+oP303QuPIrmnzhf4UnRpJ6q9I1fX99aDrO9Qps+asQa8TtXYW1xd5MKuIMpcTmT6+VdrC7202Ipi9axLb7SUrE4eR8a9PbsC3YbabT2QOPfmaqu7Z54t7pQSpC57WY0IrhOw3etNLTcdlsCEnu09+dIjYNy0tajcplQhKhMjXL1Z0vkG4KAk3R4cTlmcte+r3tkOOulSLgjIeyBr66NhshVi7jLm9JgEkaR7a7oIygHOm1zBGdCDqfZJppy80esGlziJ191MBoJzqi9+aPQJOEwK8q9sxwqVi2a+5iJzDWhkmZ45URYvpRhVsu4UkhMw1GQ4VwHY+0VOLUiweSDybI91AbD2nMmxe+wa//1u9WxNpwT1B8/wAhpRsbaiZ/MH/sGonYu0zP5g9P1DU8hbUIH5hcfYNBOw9pkfMH5H7hpk7F2qEqPk97T+7NJ5F2odbF6PqGiNjbT/wD/wDpmiNibUJjqL/+maC9ibVxGLF6PqGgNhbUGtg/9g0fIu1M/wAwfj6hoHY+05+YPx9Q1v8ARy3e2czdKu2XGAuAMSSJrpQhLbe7Tc3Fw4p5JTvAeyMUxWvooyPZRPdpQnNJokzwzJqhQPlJGmbCvvFUdEVqRst9IVpdOcPVV3Rop3VygjNNwutQ6jMVJBBrmubK1uwQ6ntREgwSOXvroxQQAMhQUe0TIFDEmcROZ76BUCBB99DEMOR1PhShPakqpifSNLqDGdLgUFDLKmOsd9ApwgaTRKhlBzGtGIOY1NAwVEQIp1KVgIC+I1r/1/qOJRTmr30UFQKs+HOgFmR2lHLnUK1bs9o+NKSoZlZiKAWo6T65qYyBks+NHEojzjpzqBawgkqJnvpQpWeZHtopUcWSjlwmiVLxZE6c6iiTBxHTnSFxXpE+2oVKAMqOnOgVkicWnfRQ5Ocn1A1CslcYjA76BkEa+ujhynlRJlPqNRJmQYEVRmNqoM5bhX/2FcXRhQFjcgnPrTn4V0bAV8pemSPzpVahJGYOulIUdrN5fqyoBM5FxR5aVMKkkEOrjlAoqTkSHFk+yq8MRLivdSrR2hDqx6oqJyM41n1x8KbjIWr3Uim5Vk4skd9HdhKZxrHqNLh/iuQdBP8ASnUhIAhxR9v9KXdTmXHMstf6UdyqIDrgHr/pX//Q+mhrOC6s5zrp7qKm4OSlnjrRdT2OypYzGhoGMEYl+NRlOa5cWfbTFvPJxeeetAs4hONftNDAIIK15d9KpGgxry5GkUyTBxLEd9MhGEEhxzTn/SmwASd454/0pcCSSAtzPXOoGgB568u+nCAc94uY50ikQYxLy76XAkjz3PH+lTd55rX40N0Nca/GmDWQhxwH11C3AJxrmOdDACBLi8+H/BR3WFIAccniZqBBKZC11ZhiYJM8+Fc5J8pogfqF5e1NZnR1UWt1P+Kc/Cuno8sld7OX5yqtMqUT5wyrlF06b1LWFQStWEQidBJk8NatXcFtxYMdltS5nlVCNqIddUmFBKEY1KOXHSq7fbLd07cBI+TaTOKM54iKrVtlpC14yUpQsJBKT7Qe/Wj5YaW0XGkLVkJGGIkxXXb3KblrG3OEEgyI0q1S4IgZcahPaEKB51BqRNQKBP8ASv/R+mlUE50CrMU2ImTMRRKgFae6hiEkzlUI+TOZ4VCYb51GlBQUTxHCnnQTpzpJhJz45VMWROtLmNRUBkxTHQAZZUAqEkGgCYPZ9tQAnSiAcUZZjhUVKjA1pQCMuNBajIByzzoEwY1JpknPMgZ1FdkkzRTBAIIpoOETnQAiTimnxZma5kz5WQT/AHKvvTWX0eT+a3Wnztz8K6NgoM3cmfzldaRQrFMSKAfeONttlxxKTC1IiBVN4m3ShLtygGFpQDEwVKCR7yK503WykvNtJWyHLhRRgkFROHFBHqFXJYsWg4lAYRjkKgjP11T1GxjHgaCREqyjxohvZyz8mhkYSpB0y1mrWlWtsA2gtok6JPE5/hTOXDbSQpbzaEq80qWBNf/S901tvZrt71VN03vSCYxCMjhyPHOuly8tWlKQ9dsIUIlKnACOX31Wdq7NSTiv7c4RJG9T8aJ2pYAFXW2TJAjepkSY5/8AIqeVLBBSFX1vPLejOn69bQ4N+kYVEHEQJIE0L/aVnYBg3L6WusKCG50J/wCGizf2bqVYLpkkAmQsHIHXXTKnVeW+BUvt5HPtCrcR3YgCDRZghUTpTAwdeFLojtTM8DQEhRjSoSSMvYaHAamjkQO1A5UQOyY9lDFAiBH40wUAclTlpRUoEykaChjGgAmlKj3STrQgDMqkHuoAZglVMhPaPKlOoGeQ51IggaCmmBwNQKIkHKe6nEKMamqgANpoM/qFf/YVkbAVDF3l+1ufhXbsASbyTpcrrSkSZ4caLNy0yhQQpAKzJOIVyX7bN7bFnrYZONCwtJBIKVBQ1y1SKzbXo7YW121cIv1421YjmAFnCUkkaaHXWrl7Isl7xCrgdpIbByEARHty1oIsrduz6uLhHnBUiCBGgj1V/9P2y9jWiw2OtDCknIgZjX2506Nl2jbeAXAwpnCDE5iDnSXuybHaNixZu3JSlhQUlSVAEkf8n2Vx2+wNk2R3aLwkBstwpaeK8c+uTVlzs2zur565d2gEzcJfaCFDIhsIz/8All3iqk9HtkCwNom4hs26mBCk5JKVJn1ws1U50U2Q6kNqvVtpxIMIWkearEBGkTw0989DuwdmOt9u8JcNwq4xhSZxqEGOWprrdsdnOtlBujhV53bBJ9vrqzaLFlfqtC5dhJtng4MKhmRwPdpXDa7C2ZZlW6vFQ5jxdoCcSiozziave2Xst5tRXdTER2k5CdK0UPW6LZCBcIISIHaGlO1dW4Coeb00xDOgLu3n9KgZZdoUDeW5TBfQM5yIoC7tpkOoMccQqdctwAd83n+8KAu2AI3qDn6QopuWlAy63ABPnCoLq3wn5ZED94Z0BdW0Eb1GvpCj1q213yAfWKCbpjM79EfWFRVywM983HDtCoLpg579v7Qodatymd8iQfSFL1q3JJ36PVIqxFyxP6dH2hQN2wkyXkT3kUTdsFMF9uPrCgLpjKXkT9YUwu2AY3zf2hVqXEr7SVpVGpSZqpUnarccGFH3isnYKcTF2cWt25+Fd/RxGd8P+6VWm4AEuJjKDWLvA0zKQ0VJQPkygRAROKYnXKlO1EJeWnyeheEkEpAgwPo5Z1//1Podm62+6sG3ZwgDDhTM68Y7q7FMsJUfkGifqCkUwz5xZbz4YBRLDI1Zb5+YKQssH9Q39kUu5Yn9A37ECipCAkpS0mI9EVnuvOtXGEDGUxDQSIKcMk6c6rO0rgqURYABIBIOp9WVdFhdLu1q3rCGgkTlx91duBJjspHLKju0GZQk/wAtVuIQcPZTM+jMVktXLinW0qWQO0CogCSI0y0p13i3OrgLSIQcYwjNQ4aU6FF5lgodWVFwBxO7ACcsxpWg2hoYuwgg9wrIS/el3CUjAVwDu9Mic8tMqZFytS2kqUQg4pMCFERHCiz1tbCQtRSVFBkJByJM8K1XG2whUoRpyrJvLh1GJpkJLgdMAIGSYEHSoHri3dKXVBaxBDYSDKc5zinYVcPllDid2oLIWN2BIiRwqzZyi7blS4UsHMEDL3U97hSnEIQCpIKgkEpE51wpuHQ64XIAQgFIwgYu+IrkVevXi7hTF0lvd3TbQQhtsnCpaUzmCdFceI5ZV1bJuFXF9dNvupXuluJDZLcgJUQDhAxaDiYrVS20XCS0gynLIV5a32tdKsLV7fNuOPRvxhbXukkCV9kCIJiDOvdRttsPLaZL980zjZU5jKG3O2IhEJTlqctTGRr1YbaUtMtIz4FIrMu3XW7l5LWAlKRhb3Y0gyfEU1mp5V0lm4QiClSlShPJPEDvNXX24tLF11DTZ3SCUpyGIxkPaau2VdC62dvN2hlYVC0IMwcxy9vtqySNqon+4V96a5OjLAcsblROt05+FXdHQQb4f90qv//V+ouk4F8cjVVrs9tOzrd1V3cJBbSfOEDId1YBvLyLh5tSt23JxKcAKoMaRyrt6Ri42awwu0u3sbi8JBIM+6sS52lti1Shbt452xIiD+FVpvtuK1fdEjFmBn7qd282yjB+cOKxpkDKRVar3bQAJeeHdAqs7W2qjCVXTiUqEgkDOq3NqbRJJN67JHA5Vfbv7VuW1LRfugBBIlUAxwqlV/tZojeXTyT3kUPKu0dDeuz66PlPaMwb14+2p5U2iNL53xoDau0YBN67rxIqDam0JjrzvjUXtfaCUGL10GRxpvKm0cPz12NdaDO1NokKV11zL1URtTaJM9ddg99BW1NoxHXHT7aUbV2gCYvHfGlO1doq869dg94onau0DmbxylRtXaR/bXYPfrVg2ptHCfzx3xpTtbaMZ3rvsIoI2rtDEfzxzMd1MNp3+L546R3mlXtO/ElN2568qXynfgz1tYJ1OVdFntC/ddUlV47hAnKK6S6+iAbt44hpkJ91G1fuLgnDdPJSk5KJGZ8Klzc3jDKnUXz0jnHwrPG19pkfPXPdRVtfaMD88cIOR0r2aG0Ls28hIQkEnOcqtaIFtCEYc/Gv/9b6ESs7TbOvyKp8U1y9GFqFjcZftTn4V1dHpxX3LrSq0XQQhYA50Qyp/YbLSAkqU0gQrTQViuuWnW2re96qE26jiQnEYABkaf8AIrv27s+42qxaOWKkDArGCswCIyrFX0b2m9CXEsK3chOBeHD7qh2Bt2EFTlt2MkyrSfZUHR7bJcnFbHDwByHuoDo5t0GQtidJKvUOXGKR3ortl4pC+rFKfNE6DwqtXQraihixsJPLEcvdVjfRfa9q3h6zagL7MKUc+7Sg50R2y+Rjetz34jn7qX8itqzO9Y+2fhRPQravB1j7Z+FL+RW1SIx24/nPwo/kVtQZF231y7SvhU/Ijan97bn+dXwpVdB9qqRBdt54do/Cm/IramCN4xPcs/Co30K2oiYdYGXpH4U35FbU/vbf7SvhSK6E7Vw5Os/bPwofkVtbPtsfbPwpT0H2scy4x9o/CiehG1QmA4x9o/CoOhO1Y/SMT9Y/Cn/IragSQHGc/wB4/CkHQjao+mwfWo/CoOhW1QvNbH2j8KH5E7WxasR9Y/CoehO1j9JgD6x+FD8iNqzIUx9o/CrrboltW2eKiGjIgAL/AKU9z0dvYG+DSRwlyixsq5Du4ZWwtQHmh3OKa56ObTeti0G2gTxKz8K4R0K2vyZH+YfhX//X9Eehe19BuY5Y/wClemTZ3O6Q0BiKQAe1lpVqLddsypLo7SlTEzFcyf7TbEkQyr701x9Gx+Z3OY+dua+yuno7OO9E/tKsq0nSYXrEGnbWU7DQpCu0LcQRzw1ibttQm3cO/fOFxSkFUgmDkeX4V6Asqbs027ToC0t4ErPAgQDWfZW91s5951xtbvWCMkLxYY9dUL2ftNxSwq4BGPEkb0wnMGYjPTSg3sq/aLi0PJStwgxvlciJOXqq1VhtQgxd5yYUXTl7Izn3V1WSL5l91b6kLDhySHCQgctK0ErlAxwFEZgGsnaeyn795CkuowoKSApahEHMZc6u2fY3Vo9jff3gKYPbJnSMjyg+NaWJPMVMafSHjUxp9IeNKtQGGVACedNiSOIqY0zAInlNDeI4rHjQ3qOCgaYrSNVAe2piSeIqYk8xQK0we0KgWmPOGlHEmPOFTEmYxCpKQJJFKVJC/OGlPI5jxoFSeKhUxp9IeNLjQVJIUDrxrM26zdvNNKsVjeoXMQCD3Gv/0PpewtnmxU6p0EuukKWtUSTnMRwrZJHMUZHMeNSRzHjVDQ+VNVXuWcHUVlqE7SbyiW1feKydhOKQxdJHC6X+FaPR0n885dZXWm4QlClyBkadp7q+x2HEoxHdpgewV524s7nC4tSbhTtyCG0IV5hMxNeruFlplTiW8akoJCeJymKztmbQfuLi46wEJbBG6MEevWuVzbz6lLDdqUFKwBIMqEjIDnBNRnbb0u47cLOPsQCBhj1cI99MNvXO+LYsMgJxSfRnl7KrVty5Q66erhYkYUp19YJGlOdsXzzKt1ahpRQSiUlUnPSOUU+0r6+aWyi3TAlClENqMg6+z311WF/c3Vxgeti0nCTmkiNOfPPwrTEHhUgcqlKoSU+umipA1qQOVAgRpRgVIERUigoApMjhUSBhEaUcI5VIFSBFLAx6DSmgcqBSDwr/0fsmFPIUikpDiMhx4Vi9K9qO7GsLa6acDaVXbTThKArsKVBgc+VUbE2ntG96S39rdpS0yyy06y1hGMBeIdvv7MwNJ416RQAAy40YHKpA5VUyAVKVVN3oqdMqzFCdosyQAGlevUVibGgIvByu1/hWp0eUZu8shcr0rScPya582DV1u0h3ZDKHCcBaTMZcKwluuI2qluzaCkNmQ464qBl3+2t6wuF3VixcukJLjYUoDQVQ1d2O0rt22wB1TQCgVoBEHiJpn9p2dvvAXiVtZKQBn92nfUZ2naPLdSHSA1hlRyBnQ++ona2z1FIF2mVAECNZyoI2lZvXQYCpJAglORM6V3YOOM84yrhv9qM2K0Nq3q1KUAcKZif+aVda3ttdLwMvFRiYjKuvCfSNDCfTNHCY840CnTtGmg+kahBP0jQgjiTUIMamjB51IPOhB9I1CDB7RoQYEKI8KMH0jUgx5x8KkH0jX//S+x4Ti846UYPpHwqQfSPhUg+kaRYONHaOpzrk2qzZqtQ5fsNXDbagQHUJIBnI51w2lxanbi2rWwbFxEv3CQkGOAJAk+qtspUfpnwFTCrP5Q+AqYVemfAVVbmFFPHj31VeqwnmJEis1agNoMxnLavvFYex3CEXn/tr/Ctbo5A66cp6yutF3Du3CY0NX2YKtlMpSNWQBJ7qwbh9pkqsbjcAAyUiT3zpXorbcuWrRZQkNKQMIAgQa5WtmMtOqctHVNL81RkKyGQGfKkOxLJTqyd5vFjtQ5GXHLkabyPZN9ohYEpGbhjLQa6aUE7FsgoKShRKCPpzmOdBOy7RD2PE5jSoAy7x4eE5V2oBZCiVEg+mrSua7sbN9SHLkEEkBJ3hTJ4cdasttn29o5vGWSkxHnSBpP3V1yr0D41JV6PvqYlegfEUFFXZhPHnTyY0oYj6B8RQxH0D4iooqjJJ8RRxH0T41JPo++piPo++gpRwnsnTnQQTgHZOnOv/0/sYUT9A+NEE+iamI+ifGlKiF+adOdNiPoHxFTEY80+NDEr0D4ikUpW8T2DAniKo2i2zc2qmLmEoX6RHDPjXDsm1srFxLNs8lakg9kEYs+J8K2CqBoaOI+iakn0aqZAkqjOqr1AUJwycvxrKUnFftQASG1fhWDsqB1wcrpf4Vu9HxCrwf9yqtFxIKXJ5casYJTslkpJBDIiPq1hlowXGXFdZcVCllomQSBEH41ui2W1s5Nqy7C0N4Er0ziJrksbV/Z6nypClm4cK5QcQR65pPJt5gKhcFt7BhCgskTxOf3Uqtm362N0p8lRAhZdJwwZiIg+unVY7RUtxYuQgkphIUYiM/HLOudWzNpIUtTbwQVrxSFlUZAAZ8o1qzyVeLbKHrgLkDtKWSUwZjKJGlWbT2Y9evoWlbeFCkqAUtQ0OmX31dYWlzbXGJ+5DicMecc9OHdBrSkc6BI5ipiRzHjQKhzGtNI5ihI5ipI7qkg8qM99AqA1I8a//1Psm8R6Q8aBUgg5iiIwjPhRy7qggcaEidRUlJWcxpRy7qkjnQkTqKrcI3rZkQJ41n7bbunmWlWLoS62qeBB7jJpdiWPUt6XO046QpbhjtKzn2VrFaR9IeNTGn0h41MafSHjSoiTVF4DhyOkfjWYufKDMCPk16cdKwtkzF5l+1r/Ctro72uu6/OlVoveYvunWnac6vshpYTiKWkwOeQrBubW5Ul25d6wVP4g02055qjpI8K9C44q2tA5uytSUgECuXZt+++xcruUplDqg2AIxJGkc6pO1bnCt0W6XEBAyQTqcXMdwmgva1ytCSi3SFSmUpJKjnmRlp30fLDyVLi1CkBzAFkkayZ00EU9jtNx66cbfSgJk4SJ7Iga5cZyrUCkrbxJgjOvKu9Jbzyo02kW7TJ85DpIKf0o7WWROBPj46mxNtr2sGyuyXb7xreYFec0cUYVjgrj7Dyz2IqQKkDkKBAyyGtGBUgVIFf/V+ykDlUipA5VIHIUIHIUQMqkVKkDlS5b2I4U0VIFSBypVAEjIVwbYfVZ2iXm2lKhYxbsCYgyc65Njrub68XdPLcSxhllpUCRzUOdbZSmNB4VMCfRHhUwp1geFKgDESPVVF2SJju/Gs5SsV+1PoKjP1VgbJUEi8AP7Uv8ACtro4ZN7/wC0qtJ0/JuaaHhRb3Z2UyHj2C2kHMjh3VgNXD6R1hDDeBpQKSt5cnONCa9StxDKCtxYSkZknQVyW11Z7QcdUlsFVuspKlo07xRO1bMOFBeSkYcWI5ClXtWzQ1vEvBwSNNMzGtXC9tse7LyQrkfGnt7hq6a3rRlBJAMawYq6uC+2kxaOIbLalqWsJISk5T7KvYu7Z9ZQy4FKichrXRUg86EHnQIMjM61/9b7JhPpGiQSMjFAgn6RFAg4fOM0cJ9I0SCRrUoEGNagB50SDzqQedCD6Rpc94B3U8GNakHnFSDzpFA4k5nWue+uG7ZtBewqC1YQFkATXJs3aKby+fZt2AlpnsqdBEFXIRrWoUn0iKMK9L3VIVHnZ+qlQCCRVN35hJjKPxrNVPlC3IIgoVPurzNmsJevhP7Wv8K9B0bn8+PDrS61Xwd2qORmqwwbjY7LYCZLaPPGVZAurB65Z6ybci3PmBBPdxy1zr0TrKLhtTTiZSoQe+uVFghlxYt3igLOJ1J7RWTzmmOzbTd7laFLSpOGFLnIcBSnZVngKVIVggYklZgwZk0fJVquVFLiicwd4csokeyrWbFphCUNFxKU6JC8q6CSBkJriurS0ecS7cCFKIA+UKc+EZ61bb2Fvarxst4TERiyHs9ldEnlX//X+yz3VJPKlKjl2ePOjJ5UZ7qGI+jUknhRnuoEkcKGNXBE+2piVBlMe2oFGPNNNJjShiPo++gVqH0CfbS4jvASmMuYpgoz5vvo4j6PvqYjMYffSLUZHZ0POuTaloxf2wTdJCW0mZVGXDjVdj1GxW3bsuoxLSEoQmNB6vXWitRAySTRCjGaYoFZBPYJpW/OMgiqLw6iJGVZzhjaFv2Y7KvwrzNmgF29n/FL/CvQ9G5i8/8AaVWo/myr1GqnCvyGzuyoHAjNIJPurOTZtrLdsw662hZh0qbJxRnMnTMV6FQJBAMEjI8qx7axurG7XduBVypbYQQhWZI+lmQM+XCmVs27eeLpdKT2lJO8MyZiRplkMtYpU7M2huyh243uLECS4RE8Yj3aU3k7aASlKXxKEwF7wjnw78vCumytry3U8t1SHFPLxecYSOQyruB7OcTGdf/Q+nbS2U9fXCHEuN4ElJAUVZQdMufPWrtn2FzavYnrnejDGpk6c+UVo1JHOpI50CYijUqTQKhGtGakjnUmoaCYAEGjNSRUkc6EidRRkVJFTEOYpVEYk5jWuTazTtxYLaYXhcJEKEZZ99cOxrC4Zu1Xd4mblxJC1yIjKAINbSiIzNGakisXam1zY3BTiKctcEieU1bb3SruzStzIkiSRHOqF/2gxJOSFcPVXmbHN2+IB+dufhXoejUEXv8A7K603TCF5Tkaqa2gxb2dshfnKbSAOJyrO8ktkLeVdPY3PM4BGc6Vsi9RA7KjHvqtq7U2twvLKwVSgBMYRy1oJvA2+talrUhUYURknKp14JeLhKigpACY0Ocn7q//0frPlFkRkc6HlJrEBhV4VDtJEiG1EHjlXPcXpeW1gW4yltYKoA7Y5GrhtRuP0Sh4UBtZBE7pXu+NE7VbBjdqn2VDtVuJ3SvdU8poIzbUI9VHymiM2yM+YoeVEYSd2cvVR8poI/RK91BG021EjdkQKKtqND9Won2UqtrNpTO7PuoeVkSZbV7qJ2s1gkNqoDa7REhpXuqeV24ENKnllUO12ondKy9VDyw0dG1eFL5Wbx5NqHqim8sNgZtK91Q7XbCSd0fdQ8sN/wB0fAUp2u0oj5E5dwpH9pIegAOIA9ECTVFpdLZu3HX7l11ByQggAJHxrQb2ih9zAhvPvq5VwUJKlISABJrjO3bUuloTjESANK57hsPuKWooOI5AidKuaawW5B55xVJOLaTI0IaWT4isDZVu6911bcYTduan1Vs9GjhN8M560qtV3FhUkDtEc6z1bKXiYczS40kCREERmK6TbO4EJCgmOOVVm1dJkHjpX//S+mrtLgzmQO8Cp1V8iZzGmQoKs3ZAxZeofGh1Nwpz9mnxpRaPawfVUNm7IgnLnFKqydOYXB45j41OqPqIlRgjhHxphZPnLF7f+Gh1J3ismOOXxqGydicf3UepOiDinmOXvqG0czG8nPmPjQ6k7uzCznGZj41BYuFopxkT6vjUZsHWwoY8WWhj41E2T2mI5Du+NIu0fUkg/h8ahs3wRCokaGKIs3Sg55+z40gs1j6XHu+NMLR1QyXl7MvfU6k6AVY/CKr6i+BCp9Yj40Oou+lPh8aJsXQRCteYHxo9RemMWvq+NBVi5xUZ9nxodRdB8/Pll8aJs3VfSyA0y+NKLB3EO193xrssmFMPlx1Qgequ24cDrDiU6qSQCYrCRst03e+cUSqIByASK0AytKoyMcjV8FLJBMGedcRP/wCUaBEjcK+8VndHQDa3R/7tz8K7+j5hV9r86VWoSJzr/9P6wTPExUInOdKhgKAOs5GgScZmIpZiIoz36UgkpAn31FZHPSgfPEaVFGIgaipiiE8aMq55d9AqnU+ypGRjP1UZUSMiKhIAzGdSRhJz4VIyBHhRbiFKIzjnRBnPu5mlOHCY5ikVJMg6caAlPdNRRSTBqRllTEpCNTVZUFHNRoxkACY5mjEwQZ76U5KOeoioUgDXOliZJJHKoBhFScwAc6ipSsySRQxclxlpUByESZ4iiQQBBy4zrTCapz8po0HyCvvFf//U9p0cMWlzmPnTn4V3bC/T38HLrSq0yczyopMTIJoKOgHGge7Wo4Jkk6UiSUkcQeFFaoVqe+hj7Iz40MRkyTHKgsyRqKVUjSchUSSSKaJHqqADDCTHfRg55gQNedOZIAAGRpSASYzNMcQbOcZjhQgkCKjf045UeMARzpTmKGmQ99AlUZxlSFPKKaQAR76SOwqNTwNQGMokc6IMpyohUCDNBRz04UCrsnDnSKOetMTkIPhQSAVYtc85oq7SiZjupYEka0yEhIPaJ76//9X6Yc00SIMZeuqD/aTWkblQ96ayNhj5G7yPztz8K09gEJcvhnJulVpYhvCFDjRU5hWYPupd+okwfdSquVY8IjQSSKBuCowM+Pm8KAu+ziGfIYanWMZ7JB59moXlSBI8Km9JMDQ5xFcxWVbRIJMBsQOGtdAVMiokwYw+qoJkzpUJGEjOmBHt4UUk4QCmoYBolRKFE90CgFHCTH9KZgSlR4Z0SQB66rWITHfQiRGtKSJ4yO6pJiQM6JzTPGKX6JIHjSZgH7qgVOWhqyQCBxqpSiFGUmhikGBAoKPGfZREEGPuqJEEE1//1vpIhRmBkKAI0z5RRBCRGvdRGQpwZ1GVc6jO0m0iSQyqfFNZWwVgMXQP+Kc/CtHZEC72iB/ilZ12qJKye+qF3iVKJFtcfYNKLw67m4H+XQN0iZLFwe/dmg7doJgW9wI/hmom7TpuHx/lUDdoBhNtcSf4Zot3ggyxcR/4jTG6ThBLD4/yzSslTl4twIWlAQB20xJzrpmDmMjRJgae+jrqfZTZYc86hBkZRTGQNNeVQyJgU0goJgcKH0Mo1pmjOKNIoGCQTFBxJwkiMiKQiDIAn1VBCh2hnSjLKIFGBgMZ5UYBQRAyGdVlMiYmiEiO6mMKgkaUi4OfA60mHuNf/9f6UUhQk+6glIFEnQRqaOHP8KRUzIGvOmBzyEUwzEmjnECaoP8AaTR47pY94rE2MYReCNLtz8K1NlrUm72kpKcRTcqgDjXSp+4Kvmup9MUN+/OHqpA5YxQL1x/hdP4gpVXD8wLY/bFRT1wFT1Yz9dNAPvxnaK9e8FQ3Nwr9kOX8RNRNxcyYtVa+mKnWbkfsZP8AOmhv7nGYtonm4Khfuo+aj1b0VA/dCAbUSf4goh27SSOqT/mCaIfuwB+af/1FQXF3Mi00/iCiLi9xSLT1/KCmF1dyYszr/eCnFxdltQ6mco/WClNxdJRnZK1zOMUzL90QoiyUZn9YKIfuJzslf6iaCn7ot52ahnxcTS9afRkbJWnpigLm5AKupq+2KU3FyQYslnP000etPj9hXEemn40xu392QLJf2k/Gqhcv69SXlwxp+NQXT5VAsXAB+8n41//Q+iC7uM/zNwSPST8aXrD+IzZOxGmJPxqG5fMHqTscsSfjQ6y8SU9Td+0n41OsO4gerO+rEn40esuGPzN3WMin41BdPT80dPtT8aguXTkbN3PvT8aHWXNBZPGO9PxputuZfmbsfy/Gm624cuqPT6x8aDanHrxtw27jaUoIKlRzFYeyuz10Z/O3PwrY2R852lI/alVoKB5E9wodrWDHKaBBGoMmlJ7QGCTPGirFKipFInkU6a1IEHIiaYSU6GkE4pg1FlRnsyTQIVwmQKYEzOZMaVJJJOFRIppUoElJ0jWoCr6QPsoxAGFJ9Rqu4G93KFYglTonCYnI1BZW2FUoXnH61XxqCyt8BKkuiM43qvjXA3d2spT1e4CnQChIdJJkEjj3VpmytxGTun96r40irJsj9bH/AJVfGqdjrUoXSVlagi5WhOIzAAGWdd+8PBtJ/lqly+wP7htgrVAKiABhBMfgarTtixUmU3DKsuBr/9H6T5ZtQ6GQtLi1kQgRInjVy3cjDY8Kotn1O3j6VaJUAARplXTvOTafCkduN2cSkD2Ch11s9mESDGlMh7HmEDwpcYxABpPhVTbilbRU2pMICEkAcyT8K6FEBahuk5Gl3yUoJLSchyrnb2vZraKyppIwpMqgedMD15Gntr61uOy0GysZlPEV0b1IBO6APqrnW+RdstgABaVGANcxXm9nLhd6Mvnbn4Vv7GA6ztOdesqrSUE4tTlrQ7OI8j3UCJGIClIBIjWitPHvypQnDBPtqFMnIZGhgV6hTAGTMVIOgNIUyCTlNHAUnMAZUu7gyDE86fCRkBFESk6a0FgxOGBNUXalNpacS2tYS4CQgSeIqpO1BhUDZXWuu6NMNpJAA6rde1o1yJVZITHULowkgYkKMCD8a6BtRsQOq3UAcWlGj5WGUWd0RzDRobIKmm7t5xtxAXcLWApJkggcK//S+lovE4s2noP8NXwqq46q+4VrbfBgA4ApMjPKuduw2a224kWz8OHERCtRTi3sUupf3dwpxJCgSlRzHPnXT1pvghyD/DV8KWxUEv3Ly0qCC5lKTOg4U6rxnzgHI49g0F3VssYVtukcPk1VUh+2SICXjr9BWWWg8KKLphrFk6cozQch4UwvWZ0Xp6JqWrqF3y3EhWHCkSQRpNFy9YKzmvOfomoL63UlSSHIUIIwKz91cK7XZa0oSptzsYQIQeExw76ss02disqSXVSThGAwkHXh3V3dftgM8Un+Gr4VSlwPX7ZQFFKG1TKCIzHMV5/ZgxKvSE/ta+HqrZRs/btpc3ZtE2pbfdKxjUZzoqZ6UE5N2X2jU3PSgD9HZfaNTddKNN1ZR9Y1FMdJsUpbs4+sahZ6UEQWrI8u0aQsdKMX6Gyj65olrpTl8hZZfvmhu+lEfoLP7dHB0oB+bWf26KrfpOo4gmyR3Ek0ptOlGWdkfGp1bpSTMWU+s1OrdKsMRZZd5qC36Ux5tl4mp1fpVxRY+JqG36UwJRZSP3qG46UJJO7sz/MadSOlZRG6sj/OaBa6UwPkbL7VQJ6UEZ29np6df//T96EdKZ/QWf26ZKOlI/UWf2zQUjpSSZt7Qj69TB0pH7LZn+eoE9KI+aWf+pQA6U5/mdp/q0SOk+AzZ2mnByiB0oCYFlan/NoR0on5hbGB/e/1qE9KD2js+20j9KPjSq/KY/8AT7Y/5w+NL/8Asw/6dbk/+UfGlnpPiz2fb/6o+NMXOk5P9n2+X8YfGhvOk2LF5Ot/9YfGm3vSQn+zbf8A1h8aUP8ASQGfJrB/zhR610jH/TGP9YfGoLrpBEHZrP8ArD41Ot7fEnya1lyeFHr+3RAOymZ578Vd0e2c+1Yu9abKXFvqXAUDrFf/2Q==" /> </div> <p class="paragraph"> РИС. 11.7. Диалоговое окно для низкоуровневого указания разрешений пользователя </p> <p class="paragraph"> 9. Убедитесь в том, что выбран переключатель List all objects (Перечислить все объекты), и прокрутите список до конца, чтобы увидеть все таблицы из базы данных Novelty. Установите флажки всех таблиц в столбце SELECT (рис. 11.8). Флажок означает разрешение на выборку данных из данной таблицы, а крестик — запрет на выборку данных.  </p> <div> <img src="data:image/jpg;base64,/9j/4AAQSkZJRgABAQEAYABgAAD//gAcU29mdHdhcmU6IE1pY3Jvc29mdCBPZmZpY2X/2wBDAAoHBwgHBgoICAgLCgoLDhgQDg0NDh0VFhEYIx8lJCIfIiEmKzcvJik0KSEiMEExNDk7Pj4+JS5ESUM8SDc9Pjv/wAALCAEPAVIBAREA/8QAGwAAAgMBAQEAAAAAAAAAAAAAAQIAAwUEBgf/xABMEAABAwIEAgUHCQQIBQQDAAABAgMRAAQFEiExE0EGFCJRYRUycYGRobEjNEJScpKT0eEkM2LBNURTVGNzgvAWJUODokVVlKNkhPH/3QAEACj/2gAIAQEAAD8A3+lCirpJdAADKE6/6RWbxVAQIn0VOK4SdvYKgeI3CT4ZaPGieyn2UxeUMsJT7KPHJ+iPZTNrdfcCG2syjOgFArcaPDcbAI5EVWXSsHsiOelMHSIgJn0UeKtsZiiAeah3UFvqUADlHoFLxVJAlI08KKXijUJA9VMi6WJIA18KhdzJgpGmu1Wm4MCEp27hQKgZMATuKU5CBIHqqslMgAe+j2anZ7qWBUgVPTUqac6mnjUqeualEZec0QUidJo5dJiB4mrA9lEQn2CkLmqjlFDiFRMBIPoqBwpJMJObea1W7JBtw5ClkIClBIAgH1V//9D0D9ulCFCFtqCM8LAOk+is9SpSYVI7oiuT1n21t4s4ze9KHS24FtOuNpzIPgAaCcNRdBKrYqQC4pshRzagjmB/EKQYcFoQ4hwFJSFK0I/l41DhiluLDTqVIEwQDyJ028N6hwZ5egWggxrBjXb4b7U9nh7VxbJKpzqUtIhwCISCIB31oN4VxAsJeQSAYyzGh7XL/c1S1OG30OAOQkjQ7hSTHxpmsRASkPIzlLoWYiMoTAHqq0YlbJaUnq8kqmDEK0A18dDSO4ilZcU2iCpaCCIBgEmPfVgxNoBYWwVLKlqCjGxIMVy3DibjghCCFhISRpBPgKDtldMILjrCkoG5NdLGHtvWaXiSFZXSpM7BIkH26H00qcJeXIDreZKoUPqnSZ9E0zeEkZVPrASQNQdjp7d6W6sSwkuBYU2YyEc9/wAq5YGo1pSdBpHjSx386kH/AGaOVXdUg1II5UImjBHKhUg8hRg91TKruNTKruqZVd1DUGnidY35UsSahB22r//R7SB30cqSIJrTtcRTbK4gSVOISEoBOkwBr37Ujrqrpx11pheV1ManNB0592lca7d5CCVNKA74rgIVO3vr23RuytHbAPKtm1vB1RCymSNa2UWVskiGWpB0GUCNZ+IoeTrNCAkWzOUCBCRp/uKAsLQuTwGu/b0/mfbQNjaQczDIEzECJ5VWjDbJCQEMNAoJUkJ7yIPuphaWwP7hAKpnsjnvVa8KsFkKctGZP8IFVnCsOAjqjMnaU1DhWHzBtGvUkUpwnDo+aNH1UThGGgAmyak+FWt4RYQR1JneR2aBwvDiqOpM+PZroRZ2jYypYaAylMAcjuPXR6lbAk8FEkEbbzoZ9lKqwsxEsNgREwNaDmG2TzKQq3QUpJIEaAnegnC8NQD+ytSfCocLw8EE2jR0+rVDmFYeCCLRrfeKisKsAkDqjceigcKsP7o1HooHCMPV/VWvZUThFhmH7K2fVT+S8Pn5q0T9mm8mYfrNm1600BhWH7izaPfpUThOGklXUmqPkjD5+aN+ygMHw2ZFo3A8KcYXYTPVWfu0DheHDa1a9lIcKw+fmjXsr//S+jnCcP8A7o3HfFDyPhyj81b9YpVYRhugFm3NEYZh5Oto190UfJVhGtq190VPJeHk62jP3RU8lYbJmya9QqKwjDMqj1RrY18/WQFqAGk17jowYslIVAKXlg11X9oq9dYAUQlObORuJiN6oQnGk5klYKQYBATtI8e6arR5YRcBWhBEE9nXQ/zoZcZhZyAKJBBlMbazr7Irptzeouli4jgwcqoGuum3hVuHcRdi2p4wtUkkEd/hV6hJHM+NApKTO9CCod1Ep0mKdQJSCAIqwDvFIlvtTpUyEHTXwohBBE91EoEwdYowZ7h3USgFOgn10UtyDyNVKbAUJ3JplNHLO451UtM6RpS5DHZiasykDTelQkBR0iaZbRidZopCk8pJ76ZKSPTQTG9Qge+v/9P6olG4ipw9NvbSKQeVNEiKASqQD370RITMRrrVZQSr8qISTO/rqBCtTGtTISOQnnQU2Q0oQJgj3V8yWIcUJO5r3XR5fZvAP70utMuaHKfXFCVECeVOnzhtpUzAyKkpgxOnfRQUtNpbQnsp20p+MQoCBv8AVpVPHXQb91Bt/MgEJBn+GmU8YBCU+yrC4cmydR3U3E3mBHhSpdkbD2U2cjdI9lTiHkE7TtU4h00G2ulTNqNB7KhXpyEeFOFrygkDWqn3O0mAkie6m4oSD2fdSKcmD2YPhS8SdIHspuJ/CAfRQU7rEJ9SaIdKhyn0VAsxqE+yv//U+s5hH0dfChnAIECfRTBUjVKRrQDkkxHsocXvg+qgXdYgR6KgXm0hOnOKgc+z7KYKJ1hJ9VVl6NMo9lIXFEzpP2aIeMwUj7tFLwzEZR7KoW8511TcjLwgYHfJr5s8Vcdzbzj8a9z0bT8jdSNesr9daJQCoAE78hXl8Zxl9t5xDasoQoo3jUVZg2L4hw4eSH2icqTMKncgd/KvQ2zqLm3S+0rMlXuq3hkajX11IO4J37qOUyBJM0pQVGU8qBQZ3g+inhRTG5GlWGcgGtQJM/nUyaTOtMUEga68zQ4ciAaMEEU2XSaVSCoQB64o5V6JMkCud5Tiewi3dXB3SB+dEvORpaPz9kfnS8RzMJtX9P4RSla9+q3E+CP1qBbqlkdVuDP8Mfzr/9X6eFPgk9Te9g/OjxXRANm+f9I/OoXFjXqb/wB0fnQ4ixta3E/YH50OKskTbP8Aj2KcPqAANu/9ylzPZiOqPAcjA/OlJfGvVX9PAfnUlyNba4J+yPzqBbuv7K/90fnQK1zravj/AE1DccMDOy8kEgSUaTMVbwyATpRCIHqpQCVFPLnRAjugc4qmCrEFkx+5EaeJr509HHc7P0j8a9x0aINvcGIPWF61qJgqOnOvH9ILG5Q6QLdTzalFTakJnLO8xT4K/etWrzd1bq4QTIzJIJEAGPYK3cFYSzY8QT8qZykeaBoB7qfF2F3OGKQhgv8AyrSi0CAVpS4lShqQNgedYIsekDaUssNuNWqXgtNu06glCAsKygk7gAiNRrExTC36TFxbqs/GCAlolbQSJyEhW/cvluR6nQz0oK9XiEZhIWG/NmTEHU6xBgabitk298uxt0qfPGSPlDonPtpppVVrZ37T4ccuZbKpUEnfvnTXlWqoDJMk0RIO2/fS5o0PfViSAZ76kkaRUMmI1o6QNK8lhJ6RJt2ksNXAZYQ2ktLShH/TaJACgDM8SSa51YV0tz2TjZJUy8667mW3upDgBT3aqTv8Jr22GB/qY6yFhzMrzyCYzGJgRtFdcV//1vstSpUqUaEVKlSpUqVz3jiUN6qSknYkxWEVXOWLi4adJeRlyaaZhvWkVxJMEUM4yzIPrqBwaa0c6QnzqoKh11zUH5IfE185eV8suD9I/Gvc9HITbPaT+0L+NaQ56bUyjB7PrrmvbIXSQeIttURmSrx7qvSkNhKRMJESac5c0A0YG8VAgmDAmoBlASO+oRm0PupgABA28aJ80d3dRGo3k0gTqZppAkxR+FSSE77jSakkd361YHlkV//X+vpcUedJcOLSIT7qUPuRvvULzkzOlJ1h2d9KUvun6cUQ66SDn0G9Rbjg2WZnapxnNBnijx3JjPrSl5yfPqcZ361DjODZWtMXnAP3lIp9yQM1Diup0KtKVXywCXAhwDUZgDVXV2QQUssgj+AaVYUjUkz3UQgqSKnDhIFENiNfXXPli/dA5sj4mvnbqRxl/aNe46MmbR7lL6605gaGgEmSVOGD/DUleaOIAAOaP1qSojVQj7P605Omq0ieeX9amsfvf/GoFqJEOR45aBJAkuDx0/WmAUPp/wDjR1IHbHspiFhIzKAgfV/WhBzA54H2aKkEQeJp9mgUKgy5z+rRymPP9361/9D6soHSVCPs1IUYHEH3aYJVHngR4frRTm/tIH2ajmYpMrJjwpW0qKQc/uqKSoqIKx92kKYk549VQp5Zx92lCVQRxf8Ax/WgQoA/K/8Ah+tTXcuA/wCj9aAC5zB0T9n9aMLOvEH3f1oZVf2g9Sf1olJ3CzP2aEKO7kD7NRQMj5Qfd/WoR/GNu79aCU6yFj7v61IM+eJ+z+tSDvnOvhRSDBlw6fw0RJ+n7qaQkEzPqiqJBxBwx/0R8TXzx4JL7hzfSPPxr1/Rlwizd1iXlzWlnVqN+YrlVfqF0m3TEleROYntGJ7vGrri76vw86SeK4lsRyJrjYx+yurhq2YcUtxxSk9lBISQJIJiKi+kFqcVt8NaKluvhZkJgJy+nv127qiuklgi4S2HpzIzhWU5dwBy55hB2NEdJMOXb8VFxnlviAIQokp5EabeO1X4fi1viTAetllaf4kER4a+g12cVW5p0uEpExvVinFZRpp40AvXXu0r/9H6pmMQd6hV2jTZhPfS5zAJiKAc7WkVC4onQADvpg7AEa6c6UuGKDb8CNKKnieQml4msGCahc8NaUOawainYTtvS8UjkIFTiKkxQD80C8eRHpqIuDqDpQDxMgGoXDAJqcRQ3HKilwzoBFDiwrYCm4vZn3UQ4YkioFmAYGtQLUUHWKoDpF472deEP5187cVLqzH0jXtujiZTeEf3ldaWVOsT3VWl5tDjiUoKlaZlIbzZTyk1Xds2103wHnSlSFJc7DmVSTOh8Na5bbA8Pt7tDjCVB5gblwkwe/vnxot4BhdpiTd6lGW4JUluXNyZJ05nf2VXc9HcNTbqVPAIbDYcWskJAjKCJEgECNaNt0cw1hpDDaTDTYaISsjs6EJIB20Gn8q6LDDrWwLiLbNJypWVKzK0Bifbz5V2uLbabLjq0IQN1KMAV//S+mNqQ4jMhSVAKKZSZ1Bgj2girp7EGiChJSlRSCrzRO9JnSpxQzCYmJ5VaE699VtvMvoK2XErSCUykyJBgj20C+wHOCXm88E5M2sc9PWPbRSAoApKYI5UCUpISSATJA9G9MEwnWgoJSkRIpITvSlPpqSQaZPhtzqECTAmlIMGZ9VBQyiY3oEEjlQSANNYpSkAn00UozE6c6U6EiJogDNpU112oZfbTHTxqRm3pp+jvUmJ1pkDSucj9vWSdmht6TXz14/LufaPxr3HRpClMPrTsq4Wa1FMqk7GedPbhNq24ltYPEVmVJ51j4thF1fKdDNy02l9lLSySrMmFFUiD41RaYDcW6bj9pbJcLZJKYJCVE5SREggxoB6Kzr7opiKEt3NpfKVdsOrcbg8zlyDUgZUwdJ2J51pYh0dcfb4DV6ENhCEpLhJVCUkZTrqCSCeciv/0/UM9GcRVfXqlXymG3DlYg6N+cZTBmO1GsebXQ30ceaxPrYuGGyXg4UtA6DSU676DfTc8tDzYj0Quru5ec8rKSw6pR4KpIAIVA311Wuf9PdXT5CfZw+7Tbrb4twhXYQSlOZTil9/IGPVSDopdw5xL/MlbynAkTCEkyGx3pEaT37ClueiFw7cWzjWI8JLKiSiT2uwlI3kaKCjqOZ9NRjopfWzylHFQpCmg2lJzSg/XBnzhymTrqTvXTh/Rt6wvWnhfZ0NoQlaDJCoRlOh7zrpHjOkInos6A2gXjYaS8h0hKSJSCCW9NMpgn0mrMT6MLvr25uW7hpsuNkIUAQpCsqQDI7svvq/D8EftGLlld3xA9tJMjck+/bXbugB3MGU4pU3Qg7aHvnXWu5pKWmG28+cITlBPhTGSASRHpoaJRpBnxoAE93toFEEnNp6aYaHce2lJB1JA9dEpkTmjlvSZe9W/jS5FA+cDRCVDnProEESd9aLZJBkCDvrQgAmPjQiVbj0TRVBVAI8KgEHSJ9NEAnYj10YGgBEemplKTMgT40CDvIg+NFAVB/lVOUpv1xr8kJ9pr569PHc+0eXjXu+iiT5MWrnxVxWi/BtnCYBCSd68vf4gbFKXE2TDzXWWrUpLhDilKSlWaSYA15900U9JMLTcPMHDns7RKVDSEkJmCZg6gidOVf/1PeYV1bE3LniYeWOA6G9XArNoD9FR7671YbaDThQOUKP50fJ9qQAGUk96pPxonDrUH5u37KIw+1Ay8FABoeT7Xbq6TQOGWobJ6ukGOVYmLX7WFuvOdVbNraFpLoCjxDnMSkTEDfXeD3VQrpVgoYcfRh1w600O2shMAnQDUzvA25zWrhFxZ4wh5beHloNKyKKwB2oBIHhqNa01WFnubZBPooeT7Ua9WR7K5cQYtba3dfSw38m0tfaMJ0E6+Feet7+5uLxu1cYtkKzKDvyBlMZf8XTRUyCrl6KZWKSi0W2xbrS5ZJuXkpRnOaNUiViPYo1eF3S3LQJcwom4UgHJbqUUhSFK2zj6u/OdhW75PtFBINujxhMV5lzFgzfradsrZLHGS0hwAyCbhbZB1+omR4g+FVsYndLcZZUxbIdc7SglonKnKCI+VAI1Os+oUFYheKfum0t2qOEHlI4luuFBD3D0+U7XidI9enpWsNYS2gPNtuLiFFAUAT4Ak/Gua6bt2lqQGGR2QUync5yPgK5mwVtpW5bMpSUFYKkRmjkBPvpiplaX+HbtIKEgtlaSZ2B99X2ts07cvNLZbytKy6CJ0Gu9WXtsxbMKcbZTKUE6kxyjnXHKFXQY4DcCcyxmIVEba+NO2GXri3bSywkONBSyEg6929IlCS6w2tpiVqWCQjQBKo767V2dqgZ+roMH+RrPQ4jgIUWGlFaZiCMmu512pmMryGVFthsuAqJUCAAI038d667q2ZaZDjbCFrzoESYgqAPPuNYHlK4V1NttiyeXdNpc+Rt1KLYKSSkpz6nTeRsdK1MDeaxfBhdu27AJmOECBsO807htWmWkm3UtRbSpWVO0jUmtGzKE2YDaUhM8udAj9vWRH7kTPpNfO3gOO5t5x+Ne/6KAJw1U/2q6//V+qvR1dzl2TrWU/g7Qs03b/AfUppCDxLdBkGABr6RvXPYYMlwF63Yt3G3DGcNtLSkQEEDXQQkCB3Gu82beGuIYbv7W2LohKOChBUAI0E6xViTnccaTi1upbZhaQlJKfSJ0pEvNrhIx23zEEjLk2BgnfkdKttmVXaSu2xdLyJKSptKFCRuJHwq8Yfd/wDuB/CFQ4fdn+v/AP1Cj1C7CT+3f/UK4bnDmFXrS7m6ZNwQUpKrcEx3b7a++rRgTDiFNlduUnRSU26IPpFXMYObZGS3uQ0n6qGUgbRyHcBVpsboj5+r8NNA2N5yxA/hClVhtwo9u8CpBEFoRFUIwBlpCUtt2qUoMpCbVICT4Vxu22H2SA6tDMBUIyWYBKvCu+0whpppK2EN24WeIUJYSmFEbkDnXQbO4G13z/sxVRwtQ14ze8/uRvM9/eZrDWvBrYvtqLSG2Hsrq/JquGhfMlUZeYk++tryU4oSH2SCCJ4A2Jk8+Z1qzqNyN7tMeDX60VYc4vKTcJJTsS0NK48R4eHoYNzcEhxwNtJRalwlUEwAJOwNCxLWJ8UW90kqZVlcQu2KFIJ11SqCJ3rpGFvBwrTcNJUrdQZEn1zUVhtwsFC7lpSSNlMz/Oq3MKcSgKU6xDY0/Z/NHtrOtb3Dn1WfAdcSLwjqyzh60JXKSoQoiNQJ9VaxwpZgl9s5TIlkae+icOuCR+1JI3/dfrVaMIcbBSl9pIO4DA1HtqDBlRHEYic3zcb9+9OvDrhUA3LZEjQtaeHOqlYa1h9s5ccRplDSS4tSLcaQNTp4TXDbXVo8pizt33WespJZCrFbQWAJMSANq0WsLRkSgqJyJCe6YEU7jIYQG0jQTzr/1vo5k3zs6fIj4mvnTwPGXqPONfQOiyZwtZ7nV1ovjLauQTqk86F7hzWLYCLF5akIdbRKkiToQf5Vdh9ozYsqaaJUFLKtRtPKuPG8DRia+KFlLoZW2lOwWSDEmDEE78qzmehiGcikX7yCEBDiUoSUq2zHUbqIkn+etFroPaNXDbvW7haW1IUGyex2D2RG0QSNZ30gaVs4ThiMJYWy24taFuFYCh5ggAJEctP/AOCAO/MPH2UZoE6Vn3OGJuLgPl0ggyBkB5eirbGwbsiQhalCIEgac/XvXZNSpNA7iidqxG8DDNwXs+ZKZKUqUSEE7kVshYKRGo76hUANQfZUKpGgNeafwrGDb4rZMoswziLy1cZbqypCFoCT2MkE6fWr0VuhLNu20kkpbSEgnfQRVmbTY+ypMDY1l41Z3d2uwdtENLXa3QeKXllAUMi0xISde13UMLsbxvEbvEb/AIKXrlKG0tsKKkoQjNEkgSSVHkOQrWnSlzgHn7KV7tMrSNyCBNYdtg1y3h/R+2K2yrDCjjEEwrKypBy6d5G8VvZtNiPVUKu0N6OYePsqTzoKUNN9+6ufE2F3eFXds2QFvMrbSVaAEgjWv//X+meTHxc4O5mRFihSXNTJlGXTT8q1WxvVNwkFXr5Gs1wJF6sH+xHxNfOXUjjL284177oqsJw1yToHl1pPLJtHdPomKrxNu5e6NrbtAsvqZARkVlVMDY8q5+izV0zauouW7gQ4Mqn8wKuyJ7KlHY6SDBMkV2Yqi7U6wq3LmVJ7QRHek7HwBrlaTfocceet3VPnVvKqUp7xvFWE4s4tJKVIGbMAMu0nQ+qJpUnGTmWDoAMqVBPa339cV1Yab8qPXDoEiOyBrJnb1VoVDtXjukKMfdxq3Vaqv0WzNzmm1S0Rw+CoEnNuc52IIgAitTo0vHFMqONgh3KiQUpADnazhOXdPmwTrvW9QqVCdQKleZW3fXjptnmy00hWYrTmPFHJPh416RtCW20oQkJSkQAOVU36slo4riLbgeehGZQ9Agz7K6BsKw8VsWr3pJhwubVNxbptn54jWdAVLcb6TvHrqzoswq3wFllTRayOOgJKcsDiKjT0RWwdqnKqLz5uYBPaTIHdImq2eF1kFlKgMipJBGsjv9ddfKpzqHavC21skXjfVrR1vEfLLy3HUslPyPGWVZlxBSUbCe6K93QO4qV//9D7NQIqm+BVYXAAJJaUAAJnSvJdHrdDd5gxsLR23KLEpxAhktIUrKmAqQMys0+/vr2SdqofBzad9cCkk37h/wAIfE182eSS+4f4jz8a930aORN4iAAm6WAO6tNSkwrWQeUUhunLTo71loJW62xKQpUAmNBJIqrAsVfxJx9u4Q2lTATORKkkEqWIIVseyPzNduJXirJCFoa4hUSN9q5E4sp26cS22nhtKSlUk5jJjTloadvHLR4BQadCSfOUI7td/GlTjzC4LbDhSFZVzAI0MRr4e+mOOWoiWHySnNomYET3102N4Ltx5IbKOEQkydZjUV1lIrPvMU6tctsoaK5WEq1HdOmvjV9rfs3hhoKiJBIiRMV1QKkCpFAgEjwonQV4e26V4irFbFPFYuLS+ddbTw7VxLYSlKikodURn83WBGpit3ope4ji2CW+J4g5bzdIC0NMNlIQPElRmfVW3SFtCjMbGd6rdzJWhtvKCqTKtdqlupzO425lJTEFOm9X1IFcmLXqcNwe8v1IKxasLeKRurKkmPdWBh+K4u1iGEtYg9bXLeKtKWAw0UFhQSFb5jmTBie+O+vVDapGtKpAVuT6jVCkul4oaWlIygnNJnfx8K//0fsFspS2QVxMkGNtDVtGpQpHSUNKUncCRNVS8l1sLU2UrJGiSCNPTXQIjSqngNzXCZOIETpwRPtr5pcEC5dAH0z8a9lgBh29MTmu1VtIZza506narBbhjCuA8hDqENELREhQjasa1xq3sGiLXAnWERqEBI5k/En216BSUXDaS6hC0ETChPKuPj4YyE3AQ0MqggKSjWe4QKvQmyUUOZGkKglIUMpHfofRQQuyzFpHAB0OgEHUj+Rqwi0MZuASBptoKtQkRnQESrUkDen1jlWViuJ4PhzjRxB61bW8tKBxIJ1MAnuE8zp4112dxYPrX1N+2cUACrgrSogHaYrq7U7j2UdamvfQ1kTFQzyivMKwXo1YFm4TZqBZczW6QtwhKtdEAmBMnQaVv4fbNWdgxbWzXAZbQEob3yjuroM8oqagVyPOtLUeIHPkyRKUq+Iq5hpKO0geeASSSZ9tW9rwqdqN/dVVwtCW8rozJc7OXLMyNorNwvA8JsLou2VqWnUIyjOVnIkmYSFGEjTYd1a/a7x7K//S+ydqeVQ5vCuRxbTi+IpDkebmAI5+Brpbb4SAlEADlTdrvHsqdrwo6+FKc+kEUtwpKLZxbmqEpJUB3AV57D+k1nfXeHJTh18wMQCjbOvpTlVCCo7LJ2nlXo280a1S+SJ9NcIKuvKAI/cj4mvmtwf2l3fzzy8a9r0dGl3JmbldbrOZKSUtFQPdzq45rm0UhQLanEEQoTlkVjHoyoJKTeCSPqfr41uZQG0onQCJrIX0cbUkTckZTpDYE7b9+1O/gLdw04FPdtaAkKCIAiPy99A9Hmkq4geUXCNeyAk+zblQHRy3KRmdVmKAlRida1bW3Ta2yGEmQgQDVx2rBxjo0jFrxu6N64wW1tOZUtoUMzalFJ1GnnGaswPo4xghHCuHXQkLCQtIEZ1Z1bDWVbdw0ranwPsoZvA0ZpVKAUkeNHMDprWM3gIaui+4+XEgkoSskhBO5E1tJIIBBkd9Q1K5lNPfKJSW8qyd5nWr205G0o3ypAmmNDMB3+yv/9P68+CsoKCAUKzapOuhH86jQUHVuLIJKQISk8p/OrwZqVCYE1ylp5TfDJQEz4zE110OdSpNSkuG+NbuNTGdBTPdIrDtejgtkYCnrJV5HSpPm/vZbKPVvNbjSp0qm5nu0GtcUftKnMunDj1zXzd8HrDna+meXjXtujqQuzdUTqbhZNbTDVwH21IeQLUNkKbKO0Vzoc07ROkVTZO3L+NXC3bd1lptvhgq81Zzqgp7+zB8JisXF7TE3MauHLVq5VxElKYKglI4ZhSVBUed9EpmTM16a8S8q2IYJC8yYg8pE+6sdtvGCtlQSscNGUFcbxqSJ11rqe8slB4SkgjUdkSdYiPRr66QpxtRaJWCQSVABI5ae8mnacxQXLaXArKtUAFI0SDMkjw09da1Q7V5fHmsduLkItRcJabfQpHBywW8okkk75p07orrwp3HFXxF8khnO5llKQOHpkJjXMdZG3ordqUaRRGZNNyrzbjN7duLt328jQXnUtOaXBrCa9E2hDbaUISEpSIAHKmUYFTQ1xqSyXneMlRUSI7JPIV//9T7BaAi0aBmQgTPoq00EeaPRVF4ElLeZJUnOM0CdKW2DYul8JBSgoHIgTJrqo1W+SGF5QVHKYAME18ywhNyjHcBumsNetSp5aLwJs386AW1QHXVfvO1EmIkTMV9QqUalCsbpki4c6G4wi1S4p9Vm4G0tAlZVlMRGs1ntYQzhvTLDF2Fqtm3XY3IfUnMU5szWXNynzo9denRuRzqq5MASeRrjC0FMRE8vVXzR/Lx3PtH417bo0FmxcI0l9daay6hqQtWgOx2rzSLy8Vh4d648lQTvnNUoxHEAUziTpGmmbf31qOXNwjDb1QuXsyUApVnJjUVwpXiJW2hOKvkKEmHFSNTHwqrjYg+hLqcRfDZ5LcUVDfu9FLcnEmA455RcKUT/wBUk71yDEr/APvr33zUOKYgn+uvHT65qDFMQI+fPfiGuywexC6dhWIPJSTE5zrSuP4mholV84pMBQhwyQedc5v77levfiGmTf30D9sf++aYYjfD+uO+tw1fZXd46+A5dPK0P0zWim4uG1IVxXlAEEguGqFX9ytQS08tc75lE5fTrXSkrDaUl1ZVzOYjWv/V97blxd02niOCVgaqMV6Nxltw5lgk+mKpS2ypCl5CMpOmY8qsbt2loSuFjMJ89X50r6W7a2edAUQGyT2jsAe+vOh5iE/PDIn98PypuMwFJnrYzbfLj8qAumSSJvPx/wBK72cdbaaQ2GFqyiJUuSfdU/4ilZSGCmO8056QISkk26tNPOpfL7ZUkdXPa/i/SnGPoJjq5+9+lU3XSdu1QlZtirMYgL/Suf8A4zbI+ZL/ABB+VAdNWj/UV/iD8qdrpg066lAtFAqP9oNPdXWvHkZCerk/6qBx5sOBPAOv8W3urVZcC05oiarddbBKSnMZg61nqUDeOoRogNA5fHWvnDx+Xc7X0j8a9z0YH7C5uTx11orJLakkaAHc1nN9Hg3h4UbjiBCNQETMb1m8BpKQo2FwANcxaGnvrcTgJesnWus9i4QPoajn31nqwFsJU2caXlZ84ZdE6kd/gaLOAMXEu+VXZBBkpyxpodfCgejdo5b8Q4q4psAnUe3SojojZrkjEFESRsKdPQxlaJTfKVyByiiOhKB/XVx9gUiuj7dgpLacVW0pxUAARJroHRYOFQXiTq82qhA1PKoehrBM9bc+6KH/AAczEdccj7IoDoYyB87XPikU7XRVNu8Fou1EkEapFf/W+mjAVZu1cyO7JXO9Z4XbNKeUt6CY0B7R7h312N4Qy40lWZ1GYTCokVa3hLTTiVh1ZKTImPyruhX1qyLvEsJtnrhD9w4lTOr+VDhSjSe0QIGhmtZuOGnIZTGnopX2g+ytpRIC0lJI8az/ACDbwBxXNBEyKhwC3UAC45A21FRPR+1SNFue2p5BtwQeI57qnkG3kniOa95qLwK2yKK3V5dztWbZNYHdOtotr5xS3E52gpJGdPenMO0PRWmMCYE/KuGe+Kqf6N2lwlKVuOAJMiCKo/4PsQZ4z/tH5VB0PsI/eve0flTNdE7Jh1LiXXpB5kflVj2F2CHm7d24WHH82RBPnQJMeilXhGHsPstruFhx4lLSSfOIBJj1AmtZhKEIyp1Aqq5SCoa89aztVXjsGPkt/Wa+duyXlmT5xr3PRpeRF21rkRdLCR3VrKyqn0xVzDauoBtYyqKTIPKZrEOEslJScTZkiN/H0+Nb7MIZaSFBQCQJGx0rgfwRp59aw8pGclRASJkzz9ZpvJCCoFx9SikAJ7AEAbfCqUdHrZKwovLJ5kjf9PCrXMDt1uhwuLkb6D/fOuyzs0WSVoQolKjMHlpH8qvzVn3eFpurgPFzKQQqC2Fa/lpVljhybE9lxSxlyjMBO86nnXbNf//X+y1CYpSRmFNIrFTgpRcFZczoEltK1khBJ872RWykyAZB8RUJgVCRFYtzgjj1tjrQeSDiiClBIPY+SDevrE1qWfFTbNofSkLSIOQkjTbcDlVylQCRSMLcUwgvJSlwpGcIJIB5wTyp1EhJyiVRoD30G1qKAVgBUagbTQdUsMrLQSXAk5QowCeU0wWDVV0pardaWgkrMDtaCCdfdXn7HBL5pODM3jtsGcJQnIWgSt1QbLYmRoIJOnhXpQoKGlQkDejIqSKBIrKxSxu38Qsby0LOa0LhKXSQDmTGkA1ytYdi7+K2tzf3Fqpu1ecdQGkqzdpBSEnlpmOu50rvdvVW7qklQy5oA57VS1xnW5W4Fa/7/lSlBF8pJ1lkT7TXzl+U3DgA0Cz8a930dGY308rtcTWqnRWw3oYW24hi5KypaVvLU2SsrlJ2jXavOHC1ErUrC5MnXg7616rD21N2FuhScpS2AQeWleUxG06RZsRbteOQ/m4YziIzOnQzIOrfdp6NFYtOkmFLebaSFtltCgsSUlYCZGVSlEfSkgidPQXs7/H7t27etkuOW8BLLjjaUkq4YMH+HOSCd638F8p8FYxMlS+yUkgCOyJGnjNatA7Gv//Q95jLWNXF83wespaavEK+RygcIZCT3k+fofyrswd3HF3KBiKITlUF6Jj6OUgjme1I7x6J3qlSgdxUO1eITi7+JXnUlWrrbYckrGYcQSAE689dfQe6vatIQ22lDaQlIEACluHC2gKAB7QGpjcxTkwK+dXtosYb0obubPJeLuXF2SyZWsLMJy+HwmvdYQ87c4RZvvt8J5y3QtbZ3SopBI9tdlSsTHMPF7i2GLeaW5bMKdU4kCUklMCR6yfSKuwbDWMOuL1VtxA3cuJcyKSQEHKBCR3aT661qFVXSSu1dSCQVIIkb7V5gdHbazawVqxbeU5ZPNZ3imFuJSkglZ5zufGvW0OdGhUNU3KobjKSlRhUCSBVTSULf7CChKBoYIkmZrgvbi3RcLSpwZkbgxImuhv5skpBnntpVGVQv1TJ+RGvrr5vcqHWXdPpn417zo3IVfnWOtrrVP0jNDDnmGsNYDiwOwNzXV1ljLmzCDzmgLq3+uKHWreSc/voquraJKgfTSpurYyc0RX/0frouLcCcwo9bYjzqPWmNs4pesW5E5tKPWbefOk1OtsTGaj1lmSM21Hjs/WFTjsn6QoG4ZA84GlD1uPpRPjRF0zGhnwodct5gq2qG8YjzqUXNuoiFRTdbYSYze+oby3+tNEXTBO9DrLB1zVOtMEE5ttanW2PrUDd24O9Trdv9bep1y3k67VOvW40KqBvrefOo9et/rVOu28+dTpuGXDCTJpitKTJRpG9UC/tyvIN+6s65tE3FzxuGCZlJ0/KupsKbt0IiYMETSqeWH1MQICM0+MxXzG4Uesu7eefjXvejROS+PfdLrUjUxvWR1B59m1WQRwwCUKBg6d3fXaq3eFskAc6UW7wiBX/0vo4YeAPZ3ohh+PNFRNu9tlHqo8F+JKdjTBp0CMgmill/wCprTlp4I80egVEtPH6IA9NAtOg+YCaJadUYyxR4D2ug8Khbd0hEa1OE4AexuKUMufVJE99HgvJkBO/OaRDDwzdmZNBTLw+gD7agbeOvDFLwXionL7aPAeEdj10eA+lQ0nuMUSy/wA0gUOC+EkFIqBp6fN25zULbp1yz66Uod34Z9tQsv7lMDlvSJt3ydACKbq72kgH0VFMvZicoih1Z3Q5da7LJCm3u1tFdrxCmlhO5GlYXVXU3nWDJJTlCQDt46VoDNAGUg+inUsJa7QO9cuab5fKGRz8TXzZ9X7Q5p9I/Gvf9GvMvB/+UutOe0QfRX//0/rGYgedyopWSPOPtpM5zRmPtolSinc0QolOqj460M2w1oxpBJGtHXXX31M0J0J9tMSSnQmaIzHQn31JHhUnuOnpozI35d9Se8mlJVGhV7aKTyJMR30CSIMk+ugCe81NdyT7aUqJJIn20BM8/bRJInXXuoT3GDRUTlAk+2pqqNT7aAKjPdREmO0dOVTMZOp9tKVSDrSJncEgR31CqR5xn01CTJIM+uiFnTXX00VLWoaKg+mqlOKG5PtqBxQG59tDOoaxv40wUPpCR48q50qBxF08uCPia//UseA47naPnHn417noycyLw990utcRJnl3mpGszU1CtDU3IMUSqEc6bNppzogzuaGaJG9EGY5URttTHUVEiD30DM0wmNqh7Iog67VCTMEUsyY2FADQd00dkkRSmSNdqGWCBQ1nxqAydakEa0FSBMUUGdY1oSUz6aEnSN/RRPMncUu4nLS67SaidfGiCfNgTQOm+9MpUiqVDPqDAqBGyga//9X6blUNtaYhUGaoSIv19wZHxNfPXnPll9n6R+Ne66NwkXraRoi6Xr31q5flD6aKj24KBtzmpnGWMiRHpqp68bacQktFSlAmEJJMDc++gLu3ccLaShSoKt+6j162CR8syP8AVViblpwqDeRWXRWUzFOFJH0QPVTEpH0RXOl5RvFtmMoQCAO+TNdRIygzUEd9Q7ioQSZojtClO5I5UdT3n00CDGkGjOnjQmRrSGZMSaJMkSJpVRy3o8qhgECZpVKJ2kChmjY+mlMq5mmmFTyFQrEGaAUYOukUqVgk0SqNI37qXXMe4bVFdogzX//W+pFPKZmkygaE86KUgJidRRSgpBM0uyvTyqpJHX1CZzMj4mvnb+YXDgzbKPPxr3PR0/K4gSdOtrmtYbk6RXMcQtc5HF2/hIpVYhazIeA8Iqh+4tnn0OJvC2pIKZT3GJHuqhVph2cL68tKspQlQjRMRG3vqN22GN5crql5TIAE8o1gVbbmytpDdw5CokFPd6q7E31rEcUkgAajemGIW2o4ux5pNC3cQ7euqbOZIQBMaTJrtjs1EzGopjruNfGhy2qCdTEUOdQGdYNQHwqHbalHoNCTJoaTuaCjBGhqE1Dv/KodARp4TS91Qd9KQTMaVI00NA6AgikTMmNq/9f6jPKKUyAYEeqpCpEE0SFQCN6CUKVJJ1qFKyIBowoJpVEhREe2qWwDiJP+EI9tfPHyOsOafTPxr3fR0hNndPFJUo3CyQBJNaAuoE9VuJnbh0OuI1m2uAf8um60gf1Z8SP7Kh1lH9g9+CaKrpuAAw9PfwjQTdI1y275j/DNTrQO1s/6cm9Q3SZ+bv8A4dEXSQJ6u/8Ah0ybsAfN3/w6Y3Yygi3uPwzQF1JGVh/1txRVdGfmz+n8NHrevzZ8f6KButh1Z8j/AC6BuwB83f1/go9aEwLZ/T/DoJuSBAYfJ7slA3cn5s9P2KU3Zgnqz+n8NJ1wzHVrifsUesn+7P6/wUpuoPzd+fsUTdj+wfk8uHQ62rNrbPz9kfnS9ZURPVbj7tA3ewNu/wDcqdb0g27/ANyj1sbm3fj/AC6//9D6Uq8SDAYeP/bpVXZI0tnx3nL+tAXhnVh/f6n60RdxH7O/92lVeqH9Xej7FQXhieA8fHJTm8MfN3/w6HXF/wB2fA+z+tA3i4H7O/H2agu1mf2d8f6f1o9aUpcm2fj7FS3Upd0tzhLQnhx20xrNfOX1HrDmv0z8a+g9GNcPfUdjcLPvrYJCk6AVEwEnSaGmWl1zQaMAgg0QREUQNBUMR4+mgMpG3vogDWDypk+ZvFQbCjInfnUGmndUJ/3NAkR+tc74Ut9pAdU2FZiSkiTAqC1VpN2+fWB/KlfZQyyt5y7fQhCSpai5AAG52rGOOWKIS8/iDCzBS24IUuQSmBzmCAN50rVbtytAV1i5SSJIKxI91Q2ygYN2/wC0flVtu2Wk9pxTkSZXE+6nzbnKJrgVjNsi6WwttaUIXkU+Uw2lUTlKuR1HhOm9OMawwgpGIWZMAwHU7EAjnzBB9df/0fpaMTs3blFu26046rNo2oKiN5jausLSdkj11z2lw3dLcUiSEOKbUCnLBGhq/sjUJSJrjxHErbC2Uu3MpQ44GwUidTz9AEk+ApE4zhiVZTiFmTMZQ8mZ2jfv0q60xCzxBlDtu604laM4AUJAkjXXTUEekGr8yT9BNUh5Rvi0R2ciTHrI/lVq3QDGQflUC8ysuUCKz2ukGGOBP7QynM3xO0oDTXTffTar7PFbTEG89o8y4MoUQhYKk8oIB01B9h7q6UvSNUpqgPKVdLQAAkNAwO+a+av/ADhz7R+NfQujBIsLhPIXC/jWxEczTA6RQjfYVJ15eulUNNVa1CdBrtQkkmZj00yYiagMyeVSY5n1Udk7VBqYqaAmPbNGJokREmoRIkVxXlw1aXLDr6sqYVrBPLwpBjNhMh5RPIBtX5VXc4lYXFs4w4VqbdSULSW1agiDyrFXYYO+c95dXN0sJCUrcRCkgAhMQNCMxObeTNa7eK2SGggvOkpAGZTZlXidKJxqyzfvFRGnyavyq21xBt62U+oFpOYpE8/Gv//S+nHELSP36dKybqwtLpbs4jdNsPLDqmUCAV6cymYMajbeqUYHhLHCU1fXCVsqUpCgUyJQEfVjzUxtXRYYfhVhcJfYeIUgKCZjYmdTEn1mtPr1nnjipHtpbAsJNwponIXCsqJ3JEk+imN9akT1hNZ2KWmG4w2hu7ddKEBUJQpSQSoROngT7ay2MAtAttT2JPrhotOHKO2nPmA830zz13rQwezscJNxleBDqxlEHsoA0G3M5lHxUa0BfWyFH9oJkyJG3hTWr7bt2p4SUpATmOx50ysRtMx+UTM9xpRiFvvxBvvBrFcwbBFlvMVJLbRZkIBzJMzMpMnXfer8Es7LB21AXS3fOSnMNEoK1KAGm/a1rS6/ahccXX0H8qRp5t68cW2ZHCA0HOa+cvpPHc+0fjXtcMuMSw9p1lvD0uhTqlBRdA511eWsVG+EJ3/vCaIxvFJ/ocf/ACE1BjmJjfCB/wDITR8uYhP9Dx/+wmlOP30ZThW3+OmgnG8Scnh4UkRvmfFHyti4P9FI/HFEYti3aJwpG39uKIxfFeWEp/HTUGL4nH9EAH/PTU8tYkAR5JH46aKcWxRwgIwpAUO98UVYljA/9Lb0/wAYUFYti8/0U2f++KnlbFdP+UoH/fFQ4xiv/tSfxxQ8sYqDrhKfx003lbFF9lOFICuUviib/GueGNfjCkViGMajyY3PKHhX/9P6B5Sxcb4W3+OKhxPFiNcKQf8Avil8p4qBrhSfx00PKuJlWmFCf89NP13GswJwxsju4wqHEMZjXC2/xxSjEMXmThaPxxQ8oYvOuFI/HFTylio87CkGP8cVDi+JjTySNf8AHTR67jJSScMbI5S+KQ3uMa/8sbA8HhRGI4wD/RjZH+cKisRxfNrhbfqfFDr+KHfCUT/nin8p4mDHklP44qddxdzVGFtAbgF4VDe4ynfC2vxhU8oYvlH/ACtv8YUoxLFpzeSm5n+2FBeJYqrU4Uj8cV5dzo/iS3FL6qRmJP71P51//9k=" /> </div> <p class="paragraph"> РИС. 11.8. Диалоговое окно для установления разрешений на основные операции с таблицами </p> <p class="paragraph"> 10. На этом этапе установите также флажок в столбце INSERT для таблицы tblOrder, как показано на рис. 11.9. Это позволит покупателям создавать заказы. </p> <div> <img src="data:image/jpg;base64,/9j/4AAQSkZJRgABAQEAYABgAAD//gAcU29mdHdhcmU6IE1pY3Jvc29mdCBPZmZpY2X/2wBDAAoHBwgHBgoICAgLCgoLDhgQDg0NDh0VFhEYIx8lJCIfIiEmKzcvJik0KSEiMEExNDk7Pj4+JS5ESUM8SDc9Pjv/wAALCAEQAVMBAREA/8QAGwAAAgIDAQAAAAAAAAAAAAAAAQIAAwQFBgf/xABMEAABAwIEAgUHBwkIAgEFAQABAgMRAAQFEiExQVEGEyJhcRQygZGhsdEVIyQzUnKSFkJTYmOCk8HhByU0Q0RUc/CDsqImNUVkwtL/3QAEACj/2gAIAQEAAD8A2l1it+cQuE+WPkBwgALIjWk+V7tAM3T5/wDIqinG7yD9Jf8A4hpk45ef7p/+KaIxu8/3Vx/FNH5bvBEXdxr+1NQ43eKGtw/pzcNBOL3s/XvR/wAhphjF5r9IfEjbrD8aYYxeAf4l7+KfjU+Wr0f6l7+KaIxm+yk+VXB/8hqHGbxSRNw8qObhpfla8zaPPfxFfGm+V7sHV96P+RXxphjF0E6vvbfpVfGiMYuzvcPeHWK+NQYvd8H3vHrFUDit4sQq4fjl1hoJxC5H+c7p+0NT5TuYJ653+Iqk+VLufr3v4honE7uQeve/iK+ND5Tu50uHv4h+NMcVvP8AcPRy6w0pxG44PO7fpD8aHyldwPn3u/tq+NEYrcgaPvD/AMivjU+Vrvg+9p+0V8aPytef7l7+IfjRGL3nC6f0/aGoMSuCSeud/iK+NT5TupI612P+RXxofKd2DpcO+HWK+NN8qXZOtw9/EV8aPyrdgH6Q9/EPxqfK93uLh4cPrVfGk+U7pRzKedUf+Q1tujV46/jCG3FLUkpJhSyRTXn9mlleXj105jmNIU8srKW7spSJOwEaCv/Q5zCbG6xz+0xzAbDGcUOHNPrSpw3Sioto3M95GniK9Cxb+zWzsMMeuWcdxwrbTICr0xW56PuvDArRJuXlZUZcylSTBI1Nc2XG2ekty64QlIeXrExvTrcsFpUXIUrqsslJlSgnQjxNOV4Wbh14FCZWFIAQREFOw8Jqf3Qt91xbg1CtEpUADqQRp4es0jvyTkeLWq1DsJGbs6cD41Yi5snGuqe0CW0RmHZKtJ2Ejv151Y2rCS2gO9XmTqsJSrKROsHfb+dY9ldt2tm4AnOsvSlCtimDv66tKsLAWI1DaQIB1OUzHfmir1NYSy+A8gFQbBjWNQnfv3qhLtghBShpsksCSoGc8/Cr3DhSnZSAQXDmJKhpr3bbVq1pazuZVEgK7EDQj061sWryySxbsvAkptyhRSNZJ29VMt3CErXlZKhAKSAYJ1EeEEH0UWXsPbuXihI6hQSAFJP2wT7BSXSLcWodS0kOuLIETGWScw9YHorBKTpsJ4UUpMTpQjsjWaAgzJqZROmutQ5TMHWgEgxOk03VEDSCKUoiNZolsxO3hShBI40uWSU8aOXSONDKMu4pkpJETw3iidzJ9VQJTvJpjvQCQJqwIhEwNRX/0dll0763PRdMY02f1FVv+meNp6PdEsQxImFttFLfetWifaa88/sIwYi1xHH3gSt5fk7albkCFKPpJHqr0/HY+RLueLZrksJVGGMgSdD7zRscFtsUu791/rJFyoDKYrPPQ+yifpEn9akHRCyJ18o9dKnojadog3AHDUfCgOiNoCIVcEn/ALypj0Otft3Ajw+FBHROyjVbyp7x8Kb8lrHNp1w/eoDotYyDme/FRHRWxUoZlva/rf0op6K2I3W/P3qKOi1kU+e+CdzIp0dFbL85Tyh3mKP5K2AM/Ox9+oOi1hqZe127dFHRSyyee9m55qdXRSxA8978dL+S1kRAW9+KlHRaxnVb0Dhm3qfkth4EjrZ+/QT0YsEyczs/epfyWsZ0L0k/bo/kzYheindP1qRfRmySqAXj+9UHRe0Bgre11IzVD0asIEh2eHaono3YaAF7v7dD8m7EGJeg/rUPyYsYkqen79IejFlrC3u7tUB0ZtJ0deHpHwqwdGbMDtF0mN81BXRmyGgU9+Kh+TVmNi8f36//0u2T0bsyuCp3X9aivo1Z8FPfiojo1aBIHWPR97+lMOjlimJLpPPNvWTY4Pb4fdC5Yz5wI7SpFW43hVh0jsfIsWtRcMJUFhGdSO0NtUkVbg9haYHh7dhhtsm3tW5KWwSYJMkySSfTVmI/TrF23XIQ4mDA1rl8LSPk5qCR53DvNbjoz9VdKPG5WTWTiPlSri3btXFJz58xBgaDTWDWOnFb0LKDZAkKy5gTrwnb00EYtcl4E2ZhYTprGonlvSIxi4hS/JVHSUoM9owNBpWfb37r90q3cZyFKSSQTzjlTWQKbBnMIOXWd6yQAdRFQpgbRQWhPZIqZcw14UUgZdBrTgCBQOmkzQ0PdpFEaADSKJAA32pOdGJTpRywnbWq8upJoBPEH+lQJE0h87aoNVamiqMvOpuNRSqKTEDhUCe6plA0mOVQgJmDrX//0/UEk8aJ00MUqiSnuqab7EcaaZHeaJMp1opykCd6IIG1MYVrRGhHKgsDKobaGuPsbhLdolG+UqH/AMjW66Lmba5JP+oXW4C4A3o5zpGtDMSCToRwqZlnUK9M0yoUkzp6aqt2Rb26GB2siQJ51akQP60DB2BnxonLAGs+NAcdKZOUJ2I9NHTSBw51CRvGlQcwBrUgERHtqaJB+NKMpJ41NI0n0mpPPQUgIkgTSKUEkyPCopXIaHvqQN/51FqRplB76gUmBoY8aBUI1B1pZToYO1f/1PUA6mNQQJ50yssRr66UgZBNHQaQfGhM7VNI5T30ezRlJIj303Z5H10mQA5gnQ99GB+cNKcARIGlPkCjMGscrUbpbcdkNhQ8TXFtSEkfrK95rpeiyT5G/H+4XW3Og7R0Fc3ifSkWxi3AJMxAB9dWYT0kVcIIv7dSATCXgOzvFb+do2jhTD0wKIJOooa8xQnY7E1ASfRTJFSezE0QRImgswfdTZZG5EilExNHSDzpTE1jru7dtwoceQCNwTtQF6xlMPp7td6XytmdHk6jnSqvbcKPzwJ8CaBv7YgAux4g0qr21/TD1GoL+2Ajrh7a/9X0ny63kEOnTbsn4UflC2UPPOn6ppVXzATAd18DQTfWxBBcH4T8KJvbYf5s+g0fL7Yn64eo0ov7bMQHJn9U1De2+bRz/wCJ+FDyu3/Sew0fLWNi77DVib21EQv2GrPLbRQnrkwOdWsqQ6gKQsKTzFWluZHGN6KEZUx/00YAEg+iscCb5wR/lD3muJQFQqJ89XvNdL0UVFi/pH0hdbRaFOIUnMe0CK84xZrya56lTPVON6ZQND31vMMu2LvBXA82WigFsLRxEyfhXQ4U06zhrQcVmJEpBM5QdQPQKTGLpy1s2lIuBbBbyEKdIByJJ1Ounrrn0dM38iW1IaUUOKCnzKUuJCozAR+cCkjfcc6tb6ZOKfcK2EFoKS2EBZzJUc+pEbHKPWKdvpgp0JIsD2zpDkgdnMZMaa9nWNY51trp3ECQu2alBQCBlBMwdPdrRw5eJdZkum8raU9khOvpNbMeZQBGkVFCSBp4UduOoo5Rzpdj40ioB8a5vGEKXeKyvLbCVGcu3DU9wrDTbIynrbkqUHI88ebz346VRdt9UVLbfJSVaBK5A7qxeucES8udY7Rr/9baB96ZLzmn6xqB93brnJ+8ahuHojr3PxmoX3CZLqz+8aUPLg/Or/EahecCpDy5+8aPlDoj55frNTrnp1eXH3qJuHhs+5+I0vlDqjBec9KjULq0/wCar8Ro9c4dnVT940A66QYdXvzNZeGOunE7YFxcdYBBUa7F56+TeJQ00hbBPaWVkFPoo2ebqVak/OK95rLBMa7UwjLpUIgiqEp/vB0/sk6ek1xjJAQZJnOr/wBjW/6MmBfIB2ulRpW3OxB4Gql27Fx9cy27G2dAMViYhhKbhoBgIbyp8wJASdeNZjDQZtmmpzdWkJnnAp1pStMKAUAdjQytxq2nbfLSltsEjIjUR5tQJQZGVEEajLTKJKdtqKPNg7HWiFdg86IOkUOMe2mChO4AFKCZjcUc0CCZPfSxr2hVTtrauyXbVpZJ/OE1/9f1FNnZJECyt4H7MUptLQH/AAVvH/GKU2tnMeRsR3tip5LZgn6Gx+AUhs7Sf8GwYP2BQNpZ6fQbefuCmRaWqf8ASW4n9mKJtrQA/RGP4YoJtrMzNkxP/GKi7S0B/wAHbx/xigLOyO1mx4ZBUNjZb+QsR9wUE2lok6WbAn9QUyre2kfRLfw6sVFWtqlJItGBr+jFDqLU6GzY/hip5PbAhQs2QQdCEgEU3kzGaeq4/bV8avbCGm8jaITO1MFwrnTlW5E07apOwNY/WEYh4tbc9a89uVuC6dCSsDOrQK767Po2BN/ptdKrcGNYqsdYDGRMfe/pQlyfMTHPNUKnCdUCI+1SkuAwGx+KiCvWWxtxVSnrVCcrf4j8KPzgOiUj97+lQ9bGyO6Fb+yojrYAKUR97+lMM2U/Ngn739KKesJ+rSNPtf0qKKwIIT66gz6S2n1/0opKynzUj97+lf/Q9ZyrM9lP4qgzyTA9dSFz5qT6aQhzglHroFKiT2UT40uVYJBSmPGlKVTsn1/0oZVFfmpj71EoUdMqY+9/SgkLjZE+Jo5FnWEeuoEuDXKj8VTtKOye/Wmykfmo9dQBUGUpPppQFhWoT6zQKVZ57HrofORCgjXvqAL00QZ76KUmYISfTTBKgZCU+v8ApRhZTskemiMxmEpJ8aaXAnzU92u1WJJABMA8YrHKv7wWkbBkcO81wamlLcWrLutXvNdd0aUesv8AQz5UqtuROaRGtUKvW0PdQlKlkGDHPf0+irnHEJcQg6FcwI3iqetQcoC4KxISdDQVcteUIt8/zihIEb0qrloOFvOCoJzRvp/0UeubQMynEAD9b10Q+hyFNqChHA1M5J8KKVkESrwFOhXZVFMhRyzoK//R9YVOmYgmZpyuU6mkSdDB1FTKqN/TQJIHneyokK3miqBsfRS6wqZilM5Tr4UI9OlJqDGu9OkmCDPjS6EgRrRygbe6hOkCiSII4zUI0EaVCdBwPjUEK3oEAymPCgQSoSIAHCpG0TFGe0BTLIEDYcaQrVJnaoXDMDnRzHtdr0Ues7IEwapDk4m6rXssD3muNYaLrecTqpXHvNdN0cP0jEIP+qVW5kk8zVJZsUXKHHkt9cFZkFatQYjSnuGFPONuIe6tSJOiZkERWDZYO3aXSHUvFRCcoBSOUfypLbBG7a8Nx161EzpHMEH31Wro+hwLh+cyQNEgbbRy/nTN4FbsI7CzqSDKQZHGO/TesizsU2nWEKJzkcANhFXmSYgia//S9SKSZ9QqIOVEEyKYLOWZ2NQqKuOlFJkzyFEHMmmB30OlGZ7PGoNdzp3U4IIjakMQQaVWnCooSkcxQKde+oRrEClAAOlQxrypI0lOkb0dMoJVtTZtd9+M1Dl13miFQNDQHnSdDFSJ227qMAmBw0qABPjNFSQTqO8UhGY6ga0UojTc0pHaEiooJJiscf4t4n9En3mudsAk2aJEaq/9jW36OEly/IG90qttCsxnaOdFm3bC3nXQlzrIiUzA5Vi4kb2WjZoUsALCkoIG6Tl3jjFYGFI6QKxPNiH+GDSgnIUwVEjcanTxp7hrGVtvDMYyQEkp1USJ15QdKsZGJOYcCFkOBW47JIGk67SdfCv/0+6VZ4wjKlKykFSiTmB1JJkchrxrINtixSgurJWhWac4giCBpFU4krHmmmBh6WVrKfnS6R2VTG/HQk/uxxqnB2ekDb4N88XUSkLCyk/bkiP3Kx37jpU4H1WTLIADoQHAkHMFkI46pKI5Ge6rbodJwyE26mVOdYkmUpEDMueI2CUeOY1WhXSwXjJebbFvCgvJlzAcIExM89hNX2a+kwftPK0MQoJ8oCABlMdoA7wP+8qy1WuIJWsMrUlKlkznA0JPDwiKx8Qbx75UuHLJxXk3VJCEKywVZk5u8dnNV1orHlWDofDYuA82G1ACMmYZ9O4TxrD/APqgrStKU+YEqTKAJgSR6Zju766G3U8q2QX05XgkZwDpPGO6mzzII4VASZ5DegAo8zU7SeBM0CFE0NjoNfGoc20VBJ0JocNBpzilMiZpwmeHCoCQYj2UxngfTRBPhFBeYqABiKBkEkUVEx3RzpQDGm9GTG2tSezETVeVWbQ1jypV28k8G0//ANVz+Hf4FGnFXvNbfo3IVe8fpKq2wIKlAKBI0IB241rW7paUkqefIzZVKTlEEqITpHdTpvLY5ScTcSVAQFBIOvdFf//U9KaebffDTWIPKOUqkJTEbcqyTbOk63rxHgn4UPJ3CnW8e0+78KhYVv5Y93eb8KBtVka3j236vwpTbOAg+WPenL8KBtVjXyt6f3fhVLh8nabW5ePy8oJQEpCipW+gjkCfQaxEYtham21nGo6zzUFQCuOkRM6H1GrmrqzuXyxb4mpx2JyJWCYHHbbvrLNqpQ1uXx6R8KAtiBPlL4HiPhQLC0q/xT8cgRJ9lYqLsrU0lLrgLhMAuJERHdvqNKdLxWbYJde+kJzAFaUkDTu76XrHhbpWC5kWsBMva6mOVZarcJBJunxESc39KwHMTw9q5etl374cajMD3mNNNaFviti+htbN7cqDqilMDcgTyqN4vZuAqRd3a9UDRH21FKeHEitkbdSWyoXT+3GPhWqv8Sbw63unVquFm2ISr5wCZRn5abRWI3jhd62EOqZtwFPPNXQWkJJjMkx2gOO2x3o22NKvMvkbTrgNwpjt3ASdElYV5p0KRPsrOwe6VjFobgOLbToUhLuY6669kR6JrKu2zbNKV176oAgZhvPh31jquD1wZ6x7NBKpcSIgkHhrtTBZNy2yhbqitsLJU6RvPId1I06t51pClOJ63NoHjpBjlV98kWVhcXZffUm3ZW4UhYkgCd/RWlex7ycAOoeK1tqcbDb5KVJSCValIIIgcNZHfWTZ4lcXjmRll5aUFPWrbuAcuYwCJSCdjO0DnW6NqcwHlT8k66j4Vrl3IbCVHrsylQkl3QiSNYHdWRapF5buLQ6+2qYEuTuAZ9tI6tphgrXdPjKSiM8lRGhgVnWhQq1S4lalyT2iZNV6+V3EmD1adD+9XO4afoDf73vNbPABF5iCB5qbokCv/9X1PqiHVkE6qmDw4Vr7axffaS/1DZSSVAF5QkZiRIjhJrULxLBm7lBXcsQVBsLU84UKVMAZ8sd29b+3w+6tlZmmG5iBmfJgaabd1ZBRiBI+jMwP2p+FTq8Q2FswAObhP8qhaxHX5i1/iK+FDqcSn6m2/iq//wA0OqxM6Fq2I/5D8KJbxHLlLFsf/IfhWM9Z3RYbbfZt+woFtXXEEK5gxvv6zWEjonbpd61OF2iFEFJPWq1BSEnhyA/6ay7LA14c6p20tbVC1JykhxW0zG1ZfU4kf8q1/Gr4VCziREdVbfxFfClUxiJiWraJ/SH4VQnCroFKgyzmSSZ8oXJ27u4VSbc2+VRUwjqpgm6VoOW22m1XMWDzjQcaRbKQshQlS40MiJ21q82uIER8wPBahGvhWG90d8pW6t21tSt1aVqPWLBlJkHbTc7c4qoYG2wsEJtUONxBL6yUgCBuO+rmMDU32mba0CVdWZDq9ciipPDgSazVs4iQfmraSP0h+FYNz0dXeOqduENrK0wpHWryq7JTJG0wSJoYjgxu3A7eJYMgII61aUrEkgEDQ6660tngjTK0rs7axbLeUgNKUkCEqSNI5KUKyLLCrywR1bCW+r0hK31qCRyE7Ve9Z3r6FIcQwUkRAcUP5VQrDLhISvqWUZEwVB9Qkd+mtVM2TiXW1Nm3KwITLqzPLXjV/wAl3gU2pKbdJb82FrHGffTP2F7cW7lu6m3U28goWMytQRB1isJzowp7MXm23VEAZ3LhxSgNdATqAZMxvNRHRp1t4PCFKGXNmunCFxtmneO/ma2Xk+I6dm10j89XwrHGGPMpKyi2RBzSpajG+3drtRtm3WgW2PJQVmYlWpiP5VZ8mLVKpTnzFQngTvFWN23kzYa03J076//W9LCVfKLuYCFNAx665K3u3WWerSRCVKA07zXSYKQi/wATH/7RraFYKla1LELXhCEtlIWUEJnYHXeuBvei/STEOj4w9y0c8rQtKlLXfhNsrKsK7DaNBMaAjSvR0FbjAKobcKdRM5THOuf+RMdzlAxZwN5AQetVOYHTXlBM+inVg2OLXm+ViiEZBlWqJzLOYjnBSP3eNS2wLFmSpTmLvOKLwWkKeUQlAGqeEidf510STA1NGRzFSRG4rV4jh7128laVpKUwQFLUIInl76tsrW5YezPPhaIIHbJ5aR3c6z5HMVJHMVJHOoSCQKhrQO4VdPvFL7i3LYKLiEHL53frtW+TASBpoIokjnUkd1YuZbbjoDJUFqmcyeXjVtuMjDaDAKUAETxirCRzFEEQNawcVvbfD7ZN3dPIaZbWMylqAGug9pFU4VjOH4q88qzu2XSgJCkpcBUnfccK2kjnQkTvQdGdpaRqSkiscZ1lpJayBBBkqHKsqQKBWnTtDXvogjmKmYcxQJHMVXcArt1pRBJGgmv/1/WiXHHGszYSG1STmB4EVkoMg+NU3JAUmawMw+UF/wDENPSa4lOXtfeV7zXT4Mf75xZPK4n31tFfWKIEmmw5X90pVlggK2E8Tw4157fdJb2ywfygYoq4uFtu5V21wFKCspIzsKSC3l0mDp316PbKWuwtnDClqbSSTxMVzLPSzF3LS2UvCUh11R6wpSshsAbkRpz4yAdqz19JHmFuMpsjcrQsgKQFNhSQAZ1HeR4iq2OlF864ho4QoqcfLYOZSUhPahRlO0Aek0p6V3pdZbTgDx61xlJJXASHCNdRrlB1jaumTJAJEGKJA5CuZx7GMTtr9i3tEobbD7KVqLSllSFHtHbQDu1rKwPGbzEbpbVzZhkJCj5qgRBAB14KBkd1b2KkVIoHQgxxomuevL29Vcu2bAW07mlCyRkCOJ8e6t1ZNBm1bTnWsxJUtUkmr6hAisPsl17NcFJBgJzARoKvtznYbUoaqQCZ5xVhSOQogaCud6cZRgCVKIAF7bSTwHWprHuH7a76f4X8nuIccYtn/LFNKBCUKCcgXHNQMeBrqgABUioa89dx6++X7K4ZvX/Jn8WVZkLcQltSU5kqSG4KtCPOJHOIIr0KgQJGlGK//9D2WBQIFK7oysgwcp1rDQtv5gouCpaliR1kzprpWW0kyTMiapuk5lDaZ41gqSTfrIGzQ28TXHNIJQTH5yvea6XCEzjuLg/px/OtmvRw9xp8MEYegyd1e81q3MZxFDy0pRaZUqIGZap91bi0fU9YsvuJCVKSFKCdQD3VgflXg5tfKfK1BBiAUEEyAdo5KHrHOrzj+GNhQeuw0pKsqkujKpJOwI7+HPhRXj+FNpJVet6DYGSdCYAG50OlKjpDhLiQoXyBPBRgzMR4yCI5imGPYY5cs2zd4lx15eRCW+1Jy5jtyG/KRzrPIzJ841iXWIM2ZShWdaioAhImJq9m7YfWUNuZlROlXR3moR3moBHE0CNtYox31qLnFWGkZ0MoeUpwoShKgSVDnppW0ZzllBcASsjtAGQDTKTIiSKkEcTWOoqUtzK0hWUwSVb6eFXNK6xpC9RmSDHKmKe81Mum5rGvWGnrfqn2G30LUAW3AFJPiDSWNpb2alMsWbNqCAohlISD4wBWZl1mTRjvNK5oknUxw51w+F4vh170mZYXhOFh6+C1F63dS64lSIMLITE+CjBFf//R9ky6bmpl1Gpox3mhl13NBSZ4nekuHU2ts6+vMUtpKiBvAE1Q5fttsWzykORcLQgARKSradfdNZSOPjVL8BWvOsL/APIOwYhoe81x9uklrzh5yv8A2Nb/AAlX994tz8oH86251cMwdedTDf8A7aidPO495rROXXR1wqeXiqktqzqCzISrKJVlVEGADtO1dJbJbbtWUtStsJGVRO451rF4BgiWEocaAaRonM8QE6Aaa7wkeqjcdG8LvMrwQrrM6HOuQ4cyilWYSePH/oFO10dwhu5U43bJ67UqPWEq7QIJOvGT66ZfR3C3WUNOWgWlCsycyyYOYqnxlRNWNYDhzDjDjTBSu3KlNELOhUAD6wkVnx2Yj21jP2Vs8pK3pBMR84RqNvTT29kxbrKmkFJiPOJHD4CsjXlUqa8qmvKpryrUqsrFh52669CVEELUcug41smXQ60laBKSNDzpyVfZ9tH0VjqYVnUUvKQFmSBHhyq1tPVtpQnXKABJ5U0mNvbUExtWs6QXj1lh6HGG0reXcNNNhS8ozLWEgkwdNeVYuD4pcrxe6wzE2g3fMtJdTkcC23GySMyTlB0OhBHKt8Nq/9L1y5uixdWrQLfz6yiFKgmEqV2RxOnqk1e4gONqQrZQg1x9pguDYVjWHWi+kDyrqyzJs7VbjYypUNUkBMqkRqddBXZSeVDWRpR15VNeVAk8vbVdw0l+2cad0QtJSrXgd6xW7Ni4ZYSHy+ywpKkQsEEp21G8Vmo241TcJ0mJisFP+PdVI+pEj0muRtEzbg/rK4frGt/g8fLOLz/uBt6a2u7iiOdGwGbDAlJSVHNGbbc71xd/0Vxt7BjY4e0myUpK0vN+WFy3UCkiEIUCUSTpER313TLKkYc0wogKDQQTPGIrUHBb3qktpdQAlYUfnD2tfDSr7rDr11txTbuRZT2EhZgGB4D7XDjVYwm7bcU8m4AKkjsBZlMGd+PEa86dOGXx7Xliu0jUZyI7v61trdCm2EIWrMpKQCZmackcxWrxDD37p4KSpJSkpIlwiIO2nvq+xtrhh0l90ODLE5iZ24eus6akiJmpI50CdRrxoyDxrRHDrt65KLlfW26FFxCdB2u/uFbwQKMikdMNKIOwmvIFfLN5hTGKXNqxd3GOPMZCbdtI7bKfNcnMggjTwnjXrGGNP2+G2rN28HrhtlCHXPtqAAJ9JrJJHMVMyY3Ff//T9P6RMXFxh7XkjPXuNXbD3VhaUlQQ4lREkgbA1iYVZ4hc9I7jG8QYTZjyZNsxb9YlasubMpSiNNTEAV0IIjetZiVq6/imE3DYBRa3C1umRoC0tI9qhWyJEbiuMxDD8Wf6RB0W7q2UX7T4KHW0MqaSEiSPOUsd/Aevs8yeYqFQBGu9TMnmPXUzpJgEeuooiN+NY+Itm4w25YbAUtxlSUiYkkGK12A2btu9cvLsxZIdS2kMZkklSQcyzlJEmQN9kityCTVL5MiDWBl+nOwNepHvNcnZj6MPvK95rfYUkJx7Fk/tgqa2qgQsgcTUw4Th5B0IKxPpNcuospJBubmRO1yrurrLMqVhrKpKldWNTrJitUnE78pQnJ2i4CshPmjQwdO/2VljE7so0sjmIkAHumNuU1R8q4g40VIssqgBGhMyT3d3tq44q+hcG27A3Oo4gR46itqgkoSVCCRqORokDlXMY9j19YYgzb2qGUI8oZQtTkmUrOp7gNprKwTHXcUuS27a9ToqO1J7JAnbZUyO6t7UqUIE7VCByrRP3l666q2ZDrLgWSpZgpDfMd9btpORpKcxVA3UZJpzUICgQRINYScGw9FpaWibVAYsihVujWGykQmPCv/U9lgcqkDlVbT7L5cDTqV9UsoXlM5VDcHv1FMoiCmQFRpzrDacAYZWbhSlnLIKgZmKztKECahAjauIxvF7u26QnqLt5LbF7bMKSXUIaGfLKcsErJCiZ0j0Gu4oEaijFSBO1AgHhSPnKwsg5YSdRVAUlLjZQ8V5iQU5p4GspP8AOsd8gLE86xBlN85mkFTQ95rikXK2AWgkEJUoSfE10WHOR0jxYBM/Op91bUrPWkR6xT4VrZSDHzi/fWnfxvFGn3W0NWWRC1JTmzzAPGBW7sbhdzhzdw8EpWQSoJ2EE7eqsQ4/bBrrAFnMrKhMQTpNXKxVltlanJDiZloamRPLwNWW+I2ty4Gmn8zhnsgTFZZaSqM2sGRIG9H00SNN602J4/YYS+yxcrcU686hoJabKikrJyz3aHv02rKssTsb53Ja3CXCEz2diNNvCRPKRWf6aAB+0aPpqUCO81qrrE7a2bcWWEOFCyjKkgqJnTStjbLccYQt1AQsiSlJmK//1fZToKEHmawrnFGrVxxCymW0Z1Aq1jwqywuXbu2DzjXU5jKU5pMd/KskzzpGWEM5ihKUlZzKypAzHmY41gY/dPWGEuXNsUh4LbQkqTIGZxKTp6aqwy4uFYre4bedU4u2Q06h5CAnMlZXAIkwQUH2VtwDzNVOOqRcNtBtxQWCSsAZUxG/jPsq0iRvXHPuqN1cYw/bWTyWr8WK0qtx1nVlxKAc5PAkGI4V2UUDodzUgx5xo0D3qNI8rI0pczlBMVUlSkrQFNJGcwCD3T/KshMaieNUv7iN5rCUfp5TOvUjT01wqjDjglPnq38TXS2Ep6RYrP6VNbNSoeJO/vq3CCfIBKfz1e81q7tOAW946m7xEMOzmWlb6U5Z2nlNby3ZbZtUMtBRbGxJmR/01iKwvDgDmBIQdJdMIJ5a6cPZTt2Fi80SmXAfOWHDPGdfSatYs7S3UHmkQI0VmkAHlWWFSJGtQGeFEzB0rUYjglhe3Cbi6LiVpcbWkpdKAFoJynfftGrMPwezw10KtmlphJSApwqCZgmJ5kCa2QKo8320fRQJP2aiidIHGv/W9lkxqK1Dtnhzd65drdQ24AcxJGk/zrZsOIdYQto5kEdk7SKdUxoJ9NSVRMe2uUxXEWFX10+vBb25Rhyx1zzJaOWEBWiScxgKB0FdHh7zNxYs3FsvrGXkBxtf2grUH21kSY8320My4By+2tF0zdLPRa6dKFEpU0UhKwk5usTBkg8Y4Vh4K9c4Vj6rHF2ZvsSbLjV0HusDob3R5qcuXNIERqa6qVfZ9tUuNLcuG3A44gIBGQEZVTG/hGnjVhKuKSPTXMXdtgtpiXU3uKrCV3IujauOICA4pQKSYTPnAEAncV1BUsfme2kWV5kjLoe+nzKEdjfvoyr7PtpFKUUjscedI+Zt1BwZUkQo5ogVjNraU639IU4pJ7KSocvCslqUrIEnuqq4Pzp1rBzK8vVKdmhr6a4chKlrM7rVx7zXW2CQrpBipn/MTWyUiXVRB1p8NKvk9WXKVBS4BMCZNcvimFYtiuDuWFthi8MfunCq6CXmlW7hKu2VEfOKkTsAdq7FhpDFs2yhIShACUpHADYVpncCuVpeaRcpQhxU+cTOu0Vkqw66XmUlbbeYyW0rOU7Dh4VS1g14kJS5eEtgAZcxgwI27jFWDCbkOiLspaE9kEjjNbGyZVb24bW5nIJhRM6TWROlazEMPdvHUlK0lAggFRERPLxq2ytLhh7M89nGWPOJ5aeiKzpr/9f2WakjmKnEVCdDWhewu6uH1oedUu3Cy4hHZBKtYBM7VvU6JGmwo1K5a5RjVrdYw3ZYSLjy94KaeW+hLaZaQjtCc2hSdhW6wPDzhGCWWHKdDirVhLZXESQNaz5HOgSANTWm6W2VziXRu6tLNsOvrLZQjMEzC0q3OmwNYzNtieLdJbTEryy+T7fDm3A22p1K1vLcABJyyAABz1mujkc6kidxNBRHPXxrgr/BsZvsTdLrT5CsTbcWG3G0Mqt0KTlMecpUATP2T3V3sjnQMZkwdqYEc6mYcxSrMgQqNRSXCest1oSRJGmtUkOuONSgJCFSTmB4EfzrGubhxt5eVZGsCKDalutBa1SQde+qyib9STt1I0HjXEpR50H89XvNdXhfax3FVCPrgK2gkLVA3NNhaZsRPFSj7TXHsYcMR/tFvbBq/wATTY4faJLyU4i8Ap5wyB53BPKu2atxa2aGW8yg0mAVrK1GOZOp9NaRWJ362koQn5xSxmKU+aNNNR31kfKl1bQ24zmgKUpalbAEjgNYjWonGLksqdTbhwScmUGFx9n361tLVxx1ol1AStKikxsavipwr//Q9QxO+ft3Q20UpAIJJSTI4+gVdZX7l0+ULZCITPGeGvpms+pFSKkVCK565vbt55dpbhbawsy4Yy5OY763zDYaZSgFRgbqMk05qVzmIP4lddLkYXaYmuzZFgX1dW0hZKusy65geFZXRK+ucT6MWF7eOdZcPN5lqygSZImBpwrc1Imse6UEhsFfVgr1IMaQaFupJeWEulwQD50xvWTQ1zDSldMNLVxANYiSgraUl9SlEiUlUjblWdFSNRUipFAwImN6S4CiwsI84jSKxFOtMLTFweyTnC1zpHKqLxsBedUZV6gk607K2yzDZHZMKHI1Vr5ev/hER41xCVaqg/nq95rrcBSDf4oojXyk/wA62+QSo8aGGlKbBrXcfzrKzI3kUOsQeIMVM6J84VFFtSSFEEHcGoFNpAAIAGgAr//R9jzoH5wqdYj7QqZ0faFQKR9oUM6BuoUetbH549dTrUfbHrqdaj7Q9dTrEfbT66nWo+0PXSZWCZyomZmKfrW488euh1zR/PHrode1+kFVRadf15DfXZcueBmjlPKma8lt2w2yENoTslAAA9FP17X2x66hfaBjrB66BeYVopaSORqJdYT5qkim69o/np9dDrm5nONO+gXmiCOsEUErYSdFJTHKBUNyzP1ooeUNb9cKbyhqY6weup5Qz+kFL1zajAczHuol5ExmV6qTrmeK48YrX4qlF20lABdBE8PRVVix5NZluCO1JJ3V30Qr6erU6tD31xJOVax+ur3muywE5MSxVsiSm5nTvmtxOpHOtI4LhdqwGiciFdtKDBMGsxJc8nSMhidaqOZJnIdRyNf/0vSSVx5hnwopDsapPcIqDrJnIfVTEqPaLaj6KhzgylBqJzadhRp0nsEZPZQSOyTkJNFZVoOrUfAUIJH1ZqJSsiMnHlUCFTmyknwpwVFP1fspTn0hB07qJ6wAQ1AqpJczGWzUIVJ+b1pSFTIbIoqCzsg95ikKFAE5JNEJWUyUR41EhUkZDtvNGHAYyaUJUD5h8Yoy59gx4UxBKfqyPRSJDkypPoqFK98mnjSlK9ZT4VMrkzl91FKVblEyayLIDyiSiBtWxeCeqXBAJGlc9etvXDaUNnKoKBzg6p+NZrDakoTm5VcfM/erFSn6cCeLWnr/AK1wj7iWrl1sySlxQ08TXa4SYx3F0n9MD762x1cIEiK//9P1iANkpPHaiFEN5cognaKHZAAyJHoowOSfVUAEmUiPCkBjN2RpsIFEyDEDxyioJ3KU/hqJM8vVTpmNUjTuqJMDzR6qKxJB017qiRETHqFElMkaeqgBvpHoqCQdgR4Ud0bDxApUZojfShGhkD1Up1JAT7KB83aNfs1ATHAGeVAk5hITt9moCuRMGeQpgogn4UCSZ2HopEqKuXoFMSQrh6qcg6EAeqiAR/QUFHXXfuFJJ2PuqGREHjyoAKBHfvpTZlITvUS4VJ1UZpQpcxMjnUK3NNT30pUtQGZXhVLk/KDY4hpXvFf/1L78H5QuNP8ANV767zCwTj2LH9qmtuQS8Y2qQBA1njUIlQ7qBMGiFHnUJA0G3OoACaMCe+gUjMRUAO8aUwEjjUjTfjtUUQNt/CoBptrRAidPXUO/GagkGpE7aVI009c0p848aUnSAaUnbXagoSBrR7MRO1QEAaRUBBVr6Kk6a0wASJB1okSN4qJ0GvhQA1BKvVUUZM7eFRREUpIIgCpJTMihOYaUpGum9EaDav/V9UgGd6kwDzmqCQL9EkiGj7xXnd+UnELgz/mq99dzhEnHsXkSA8n+dbcpPWE0SEgySr0UMqQQe17KBLeZIOaTpw3okJ4FQPdUMEx2zJ7qUhAVACvQaJKNIChrTEoI1zEVX18XQZCdCiZJ76dJMqA1NSQJ01piZiN6OvOBUEcd6g76MADcnlREERFA5UoMjbhSCCAQDB1pcpG+oipHIb1FoGXwqtY7QgaVMoJGh2qKGXSN6VMSY09NEk8N6IUaYq1APPeoCE7mBNKRmUAB7aIGscPGgU6p48aHFU+iv//W9UgnRJimI7J11qoJUSZOkbUQCBz9NIQrLtBqlQPygiP0RmfEV59ekC+fEf5ivfXd4OqMexgH9MP51uCZKj7qClJzc6BUJEx66qVGZKgRpOlLlhzMVARtrRaACpK58TSAFLqj1hUDsDOlWFQjf1ml6yBGhO+9UqXGJI7WnVHj3istCoBJI34milYgmgVaztTBU78KOaNhNQOFVHN66OejOh76Qdk5Rt31CoZo3qZojTeg75vOhMjb20M0CYGvCgNT3Uh0EAUDodzRzRtUKkn0VArtyCY5VCQTvwr/1/VMw0I4UZBINQ5TtRSvXlRPAk6UNDMmoIO5qR2t6xlCcRBnTqj7xXn12gG8eP7RXvrtMNOTpBjCZiXEn2VsvLreVDr2wdtVCsdTWHFeb6OonWc41pPJ8NnzWN/t0qmMMmIZ0/XqG3w+NmoOwz/1oFjDUwrKz4FdL1eHHYW8d5FOGsN5W5/eFAt4dMRb9/aFOyuwZMtrYQs6FSVCayE3TCswNw0f3xNAXbCUqJfRvxWKCr60OvlDf4xUTe2m/lLR/eFOm9tZkXLI7s4qC9tpnyhnwzimF5bKAHlDM/fFMm9tRE3LQ/fFQXtqR/iEa/rUhvbUKINw3+Kgm9ttYfQPTRF5akCbtvTU9qiu+tZjylr8dE3toAPpLOv64pRf2kQLhvTkaXy201AuUeugb22jS4bB386lVe2gH17ZJ/WoC7thEXDZ/er/0PTTfWf6dv8AFSm+tSRDyDGpgzQN9Zzo8j10PLbTg+gTvrTC+tTMPJPpoovrYGC6iO9VP5baAD59HroHELbLHXpIHLWoi/tZ+t9hqeXWp3eSD4GmTf2g1Lyaracbevypp0LSGjMcNa4C6kXbwA/zFe+u0sEj8pMXCtDmRpzEVs12zEa27f4RU6i3EHqWiD+oKx22GFrXLLeUmB2B8KY21t+gbJ7kCobZgp0Ya/AKLdvbhMhhsHnlFDq2iD80g/uioGWAJ6tAP3aCkNFRhpsngMtBDTUR1CPwinS20B9Uj8IqBpr81pA8E0yktxAQBPNNFKGyIyJMd1MG0fo0+MVAhuT2U6d1VPENtBbTbZUVAdoaamKgaf1ARbR4GnCLvYLt9BtkPxqvrXAspL9pmTuIOntoo8rcGZK7YjuSfjTdXdcrYc+yaS1fQ7cvWriE9YyRmUhBy6iQJPGsstsZtUJMd1VvP2dqgKfdbZQo5QXFBIJOw1qwoa0IT7K//9H1dabdKcyuzBjUjjRKGuI9lJDSnCgASImpkZEggaHlUBbSRCZ9AplBAg5fdSKDYOqTNGGgTANSWitKAQCrUAxMCJ949dPDQJEQRpMVElpMASZ9FI3c2ruXqnUqK0BaYO6Txpmbhl5tDrZCm1gKSobEHamCmp4iKRTieugRJSdI3rzi6gXj4UQD1ip9Zrs7NJPSrFZEmER+EVtkoypyyeetK4YQdtOVVJSQ2JkcZpsquRjupoIA7INAJhOXkaTKoyZFAJVsQO7WhkO8euolCpkRFOBAIA40AkydNabqydxPjR6vsba02Xs7nWgEAyQYqq6T8xsB20f+wq+O1Mj0GiIO6gPCte9hy3ypK3EZJURA11UFH3VmspKUwtSZiCUiAatTEaxvzrAsgtGLX8tqCFrQpK47KuwAdeciv//S9ZCQST31rMVsrq4umLm3Ztn+rbdaW0+qBC8uux2ykRxBNaZPRrHB1n95JQcierKHFgIXnSSQnllSRrO/pq8YFiS3c7lykN9ahaWg6ohISQSnUazEzpr4V0BTOvI60jDahdOkpIByweehp1hecBKUxm7RJ4d3fUiTGvopVIQqe3qN5PjSFIKUALSNNddqofunmnoaw64uUnULaU3A7u0sH2VUw9eXOLtBVjdWzLTC8/WlBClKUjLGVR1ASr11sFISCrWRQCgN1JjvNaE9Ecptls3SkltkNrSSSFmDrBOkTIiP51Z0XwC4wa1CH3EqUlsNDLPayqUQo6nWCK3YSZ4RWMtl9WMWzoQepaacC1ZgBmJTAjfga4G/j5Qucxg9avT0muuXiVphnSrETdO5A4lEHKT+aKyvypwbX6UfwH4Uq+kuDrygXcCZPYPwqK6TYOf9WPwK+FH8pcIB/wAWPwq+FH8pcJiBdiPuq+FIrpFhYSfpQPcEGl/KXC+Dyo+4ag6S4UTo+r8BqK6SYZxfI/dNAdJcJgDyggfdNWI6R4VB+kTPNBpUdJMLBJ8p9AQaiulGFx9YufuGijpPhSt3lgfcNEdJ8K1BdV+A0T0nwr9Mr8Bql7pBg1w2W3nFqQYMZTvVPyl0fiAVj8VROK4CEx5OTpv1ZoHFMBn6hX4DX//T7Y4t0dGzB/AaAxbo7sWVD9w1c1j+CMNLbQlSUr1ICDrQ+X8DUmO1HIJNWo6R4Y0YaZdg8UtnWm/KjD5+rfH/AIzUPSfDdZQ/3dg0R0nw4JOj0/8AGag6UYaNfnfwGgelGG/tPwGgOktgrVDb6hzSgxSKxzDCqVWLpnU/M0hxzDACTZuCf2NMjpDh7f1du6id4aiah6T2eoyPD9ykTjmExJt1zzLVKMew0/V2Tqj+q1tVo6TW4/0l1/Do/lPa8bW5Hi3R/Ke0AA8mufHq6P5U2af8i51/Z1xl028/dvOtsryLWVCU6wTX/9k=" /> </div> <p class="paragraph"> РИС. 11.9. Установка разрешения на операции вставки в таблицу tblOrder </p> <p class="paragraph"> После выполнения этих действий для закрытия этого и двух других диалоговых окон щелкните на кнопке OK в каждом из них. После этого в списке учетных записей Logins в окне программы SQL Server Enterprise Manager появится пользователь ASPNEТ (рис. 11.10). </p> <div> <img src="data:image/jpg;base64,/9j/4AAQSkZJRgABAQEAYABgAAD//gAcU29mdHdhcmU6IE1pY3Jvc29mdCBPZmZpY2X/2wBDAAoHBwgHBgoICAgLCgoLDhgQDg0NDh0VFhEYIx8lJCIfIiEmKzcvJik0KSEiMEExNDk7Pj4+JS5ESUM8SDc9Pjv/wAALCAEoAcIBAREA/8QAGwABAAIDAQEAAAAAAAAAAAAAAAECAwQFBgf/xABKEAABAwIEAgUGCQoGAQUBAAABAAIDBBEFEiExE0EGIlFhcRQVMoGRsSMzQmJykqHR8BYlNVJTc4KTweEkNGODsvFDREVVosJU/90ABAAo/9oACAEBAAA/AOqXEPechecxvz5oJ7kjgsBGhBbYq/GIAzQsBO3V38O1V47g8jgtAG+lrIZi65bG0gHU22Uce4vw49NdQoFQST8HHb6KrHK9zrNia53YGXUGd4NuGy/YG/0VfKXHThsPflUccn/xt9ikzuDdYWgHbRPKnEWETPq3VfKCCfgmX72hPKDzjYf4Qo4+ljEz6qCff4Jm3MK3Fc9nVhabamzb6I+V4aM0LQHbXba6r5QeTI7g/qqRM5xsGNJ7mo2Zz3gNia4nkApE5HVdC1pHItVmyyO9CFrjyAYgnkPW4LbjX0VPlD23aYm94y7LHxzcnhM1uLWUNkc6zREwknYNUlzs+VsbdeWXVM0liBFtv1NkM7hoY2jTbKFL3SsAzw5QdrttdUEttDEz1tTi6kiNnsV2yPcOrCCLi1mqTxruHk2o3HD2VHF4dldGA7syqXSEHK6MC3ItVTL1dGM9ipxCfkN9i//Q2iZGDMYgA7mWqOJcbN9gTNc2ytuduqpGckjh7fN2Qycy1mo7EaXEHLG023s26uHucLNiaSN7NQGQmzYtj+osbpSDq1osdRZS6Ytu0xNBHa1Z6JvlMwaWsYALk5eS2Hw0sbrF7rjsjCywUQmAyv0dbI0Ri7rqKjDnU7bywzMa45QXRAC6mLDm+SmR7usL5gxgNlp1VMyOIkOJ6ubVtrjbQrSbM7KNTt2rqwyMhqHyPcQGlx05kXIHtWBzmva1zo3cYm8khOjt/wCy6rquF2cmY53AtD2tcA3SwJadjy6vetc1EEtEad893tDA6VwNnWLu7kCFjoZ4mUZjmeRH1iWi4fqOR2I8Vaepo2SF9PEx5A6oc3cZr2Og1tcK8j8MELo4IwctwHObq7Yg7dt+YWGnqI4cSklLWticx7G5RpYggaLYpqyipo4S6McSJwJIZuc9z/8AVVFXhvEhJgYbA5yRrex5eNlRk1EyKnErGOdoXWG2pvf7EZV0Zp2tlY3OGm9m876AepUNbRNxBkkcWWIMc0gDckFH1lAX3EZIMeQAt2sDb17KWVeHOkBkgJANtG8tPuKs6qwsFobT3AG5GxWjPLTuEGSPKGg5wNCbuNteellkpHMZFWi9g+IBoLtT12myyuqKaSvlnkLntf6LS24ZtpbwBUxVNECzPA0gWvdl7elf7CFeKtw+IxlkRGW9+qARo4a9t7j2KrKujhrWyMYGsET2nLcEkg2B+9ZHVmHyOzyQOeXEXFtQBlA17gD4r//R7766BjAKaMNcyVjx1bZrA38OSsayhbTmNkZvkc0HLuC7Nb2rG+tojXRytha2ASZnMMYJdqTv7NFEVXQZY+JC0yfKdl0G9z9osO5WhraCnMbmRFpaHC5bc+i4faSPBVbXROq2Sh7WAUwjN2G17WI019YWdtbSGphLat0LYpS6QkE8TQbdouCNeS0MRlhnqvKIZAQ5rBksbts0Dw5Lb8vonBzpouLKW6uI0J8FhFRQcW5hBYIhazbXeB96tJV0FnmOBrSYyG9Xncf3UtrqeOQ8PqCzSLN0a4HsWRmI0pfEW5ohHJxCCbh/VtbuG61pKqJ+KNqmy5bhoOZtwLMDfZcLOarD3Z84EjiwC5uRsdASL72VWVGH5nGSIaSWaGssMhI1PeLf/ZYa6WlfHlpmMDiesQ3fTloPwFfyuifUGadrnEuBDCDZoDSLW8bLCyopWwxB0ILgevZv0rnv3Gncsr5qQUz3saMxsGjLY3DRr3arKytpmjPawJeXjmSW2991gnmo3NcIo2tOXfLcEa6dxtbVZvKqMR8OCPK5wDb27HAgn2LWMzBJVlhDQ9wLe8ZrrakxCkfJEWssBMHP6u7d/eSsflVEWsJhBc22uTudc9+tlr1ckdTVSTNeQDtdvYB/VKNuSZ4Yc14zt6ls1kVKYmSU8kr5T6TDGQB6/FZIZDD5O4hwAtmtcluipIX2ymonmzOboWusNd9fWtqmqhTzue9sj2tHVa0dV3j3LTxOZtTLLJG5xDohoR6BuOqO5cYNdlFjy7F62goKGdtTLV5g1kpGjrLeiwfBZpXQgPL2C5HF5LK7AcIjdlcCzNsDLYlPyawuXK6MShrhcEP0KfkxheXUS2+mjujeFNZcNfroDxN1/9L6Ezo1hZaDw3uB2PEKxHo1hlrGF9++Qoej+EN9JhGtrGU7rGejWHXJEctu56j8m8Nvcsl1/wBRB0dwoksaHEg6ji6hW/J3C2hoMcl3HQGQqv5PYYf/AAv/AJhT8n8IDS0tII/1TdVHRrDHat4hba9+Jor/AJMYY0ejKf8AcT8m8MP/AI5SL/tDon5N4U30mPHP41PydwvNk4cma17cU3spd0Ywx2oZK3lo/dR+TWGaHLKbdsikdGcMt6El/wB4rN6OYaXDqSfzCg6OYVpeKX+YVZvRvCgR8DJv+0KqejGFmVxyS25ASGyq7o1hgPxUv8xWd0awvOTwZBpp8IVX8ncLDw3gSHnfiFSejmFX+Ifb94VB6P4UDbyd9vplUPRvDgfi5bfvEHRzDbkGOS37xW/JzDM5HCef9xT+TuF5viX/AMwqB0dwznA+/wC8Kq/o7hmloJG94kKn8m8Lt6Ev8xV/JzDf2cg8ZCoPRzDc3xUhB+eVP5PYYBYxP158QqpwHDWn4h5/3Cjuj2GkXEcg8JFH5PYYRcMl+urDo7hg0LJLn56//9P2o6O4aB8VJb6ZVm9HcMzWMMn8woejmGA34T/5hUM6N4Zrdsh/3FkHRnDWuDg2UHlaRZG4DROcRnnAG/wxVX4BhkTM5dNuNpTc3VHYXgfFNMal5m1Bj4xv2q0eAYYKVsrXSxsIuDxTosFfgdC2nLWTzPe7qtDpSQHWuLrxofYAZvsXuMCYH+XMLWuPFJAcL66pS072T/BU0zWCW7X5iBa4JuL7aFdGpw8VEz5S7KeEWNsToe1Vw6hlopHZpzI0sDQLm2nctqridPTyRNdlLxa/YOa0G4VMLAyh7WkFlyQQAdtFSHCZ2iNr6kkMbY2J629r+C3mNcyNrXuzOAAJ7VqVeHmrmEjZSzQafOB0PsutduE1cYa3yxwA5Zib6/dddMi7jYrSqaDiPkewsBdbkRtfmFrvwmZzGk1NyL63Nye9dFoDWNZe5aACdrrzPSHorWYxiEtTQ17abNEAGm/xnol2nzCR4rAzopjUOFx0bMQY93CfHIHTyNDrghpBAJFr7dy3Z8I6Qve19PizYwGgOa57nB5Bd1tRpe40HYvQgx08DGyTAAANzPNr2HatWuoTVnMJCy8RaMpI1vue1ajcInbIHccP5FxLrjv/ALLs3Ab2+Kq7YHkpAJBJ+xS0AW1VtBl03Uh2uumttVA+MI5aqpIOwR5y891//9T6dYl4trpqjjy5qCSHKtzftVha3ZopaADyVSLv3tqotl3KDUanRW9wVARmsd/FQ64/7VSOfMclJtYWNktbS6nKLqCDmBvqjQQRfVZAB/2mTt2RgtyG6y+PPsVHvcxrzGwudl0HetAyV74C2eEOcSMvDAAuDfW7lqw4e+Ou8qdSOLsziSHgl19r3PILpsa9mGsjMb8zW2IaRdaMrDHCxjYpmtbJnLpLaC3MrwRc/MbONrr33R/WWtNgRxjvvuV0G19A6WSPjRAsNjc2ue7tW1Zg0yN07lVj4HyFrDGXDkDqr5Y3OeC0dXuWhHWmSpMbaMOFswAe3MW8ja/NbLJI5GiXhkR5HOLbAEW3XK85wgutQSdXU/Ct7Lrqsija4jIPYtenjqWcXytsTiZXcERi3wfK9+azPEcbcxaLdoF1qGrBlMbKZzrbm1l//9X6TVv4LI2xxx5pJA27hcDvWGKaTyoRujjkjc4s4jWFtnAX57hUkqphVvijbCGtdbrN/v4rJRT8cvDmxEMAN2d9+9bEz4oY2vey4JAs1tySvN4vS4ZWPlxfFKV1VFBFwIaJ0V7vcRYtB3cbgLq9GqSqoej9DS12s8UVnDNmy67X522v3LcqKkRB3UuQW30voTYrK0hxBDAMypNljZ1I2ucfRb3rHQ1LKjOyWIRVMZtJGR9o7libWPdiYhNPEYjJkzWu7Rt7reAgeXGMxkNNidOqVqeWMDw/hxGMymMD5RN7ditX4jHh7nF7G5WszuJuLa2GwWHDcWGJylgpJYRlzBz9iFkMtXI90zaemNLcgOe+ztNOztCz08kdREJDCwEOLdLHY20KyFjGkkMHsUBrS4gsbfwVHRMzaMHsVhE3Uhg27FbhNLvRb4WUljCbhrd+xVdG0t1YPGygsa1oBjae+yl0TAD8G037lXhADSNviQmRp+Q0Edyo9jRY8Nt+eighrgCGNA8ELGuGYtHsThxOOjG+xSY23y5RtyCMZl0LB7FfI29soJ8FJA2yt9igRsy+gN+xXEcdhZjdO5TZg2Y32L//1vqORmUDILdhChzIw4ZY29myBrLFoYNd9Fp4m1raCY5dmk3t3L54Ngvd4Acoq778Y8u9bYw6iEj3ZC4ONw03Ib3ALcEjSe0juRjIGOzsYxrjuclirBwu4g6X7FoijcxzJBOxrmMDAWscCQO3XVZoYmwQmB8jnXjc3MGE6uN9lz3YXTBz5BK8F5JNqd1wCBcfYukJGklwa+/e0rCyJxnfLLUGSNwGWPh2yuBPWvvrcezvWZ7mvbodb9igEBxOYnusVjqmOmbA6MNc+OUOs4EAgKjYJjUtdI0ABxeTnJsLEADTvUS4ex8ksgle3PqRkFh67ePtWvRUUkNRJM6Z5BaQGZrrcqWGWJrGGzw4O6wNlqT0FXJGDHURRP8AKGSEmHOMrbXAB2PfyXQLwwnQ6nTRalRhzKl7nABua18rbXF7m/atlkQhaxrGNaG8mtsD6lMsYmDWkN03Bbe4VW07BJHNK3NJHdoeBY2PI23WnLhbn1/HjrJGNzZsljYEixt6luUsEFHAYmNJBN3XYbuPO61WYdI5whLm8Ns/GD8pzDrXtZTjFB5wjmEbmhz48tntPI3vfkow+OphmLqkR5BE2OMMuSAO+3NRU4fK+MRRzh8bHlwikZ1Te+5A71nw6n8jpuG4guLi6zWmzbnYdy2XPBPoO+qVUuF7FjvGx0Vi9psbn1BSHg3325AqA5ok+Vv2Ff/X+oudqbA+ppVS86aO0+aUMwFg4H1tKkysI5+wqOI0i+v1VUyNFjr7FUytcNCdfmpmBBFnE/RKjiAW007CFLZWA6C3qQyAHRt9OxSyS5uQdO5XL272P1VGdt9QSfoqWSbjn4K2aw/sgeCdQTb5qOk6oIB+qVQubfQOt3gq+awzZT7FqYm8Ow+cczG7kexfOQ6wsva4OHF9U3iPaDK62Uka66/Yum0tbkEkkz872su15Fr9yoKunMrg+OsEAkMTZ+JcOkByloAObe425FUhxXCHiPh4jP8ACuIZYu6xF72uORBUNxnCOMYTWVFzGJb3dq03IIFr2sCb7KlTi2H0mLDDppai+gziYE6tLh1b5iNLXA3IWWTEsJjDT5TVSXlEFml1xIXZcu241JG9gup5pgcATJP/ADSpOEUxN88380oMKiG09R/MUHCYj/56j+YnmmG1uLP/ADCrea4f2tR/NKjzVBe/Fn/mlDhMFtJZx/ulBhUQ/wDUVH8xSMNjY8PEsxIN7F+i0KmeOJrpXh1uOyLR3Nzg0fa5f//Q9/UY1hlOXCWd4LGvfoHG7Wem4doHM8tO0KkWOYTMYWidwfOCWAh2ttD42JXU4bWmwDwefWK1HVUBlqWNdI51OzM/U9+g9i0qXpJhdTBHJxZmF5yhjmuve9rac1t0uMYdVztp4J3ue6xDS1wNiMw9oXRdE0WN3XO/WKu1uwF/aVThNJPWdttmKoIgOZ+sVZ8TMxJza/OKq6FmfNrf6RVZImlo1P1iqtp2b8+25V+GLWDn2+mUbGL2u76xVuG3Ob3tf9Yqhiu8gk2+kVHBjFx1vrFHQt+Tfv6xUujAbYF31iqcIXtmd63FVdA1361ufWKpwIm3HWAHzigibzvr2uKtwwLAFwH0ipyNzGxf9YqDECW3c+3ZnKlkQBNnO32urGMZjcu+sVUQ8zex26xV2xZW3zP+sVfLe13P+sUycusP4io4QIBu8fxFRwmX2Iv84qDECABmGn6xusNfGPN9SS5+kTt3E8l84y932r3eAMa99a6V5Y1jnOzA6t1Oq//R+ixuw2WkfXQVlRUMpTxHN2NwLi4IHIgrQbLQTSGrlw+RpkJkYBO4Nzb5g0aNJy7jX2rpOoMBiZS000MURljfJFGXkXaLOfz11IJ8VWnw7o9VxxVVOyJzZGN4cgeQSwCwA1vazrW21W7NRYZV5uK2N+aRp9KxzZbDnvY8lpT03R6OeKmlljZNK4vjbx3Al4PpDX0rnfddbzjS20kJAJGjHG9t+WqyCrgdTmoErTE25L76ADc/YVipsUoquPiQ1DXNzFuuhuBe1jrsQVl8qgLQ7its42BuNeXvUtqYXmzZGuNr2Bvp2rIpRFV3ok9y4VRE2sjmgdTvlj4oLrS5DcEEEEEEEEA6Lm1XR6lqomxminYMrmFzam7i13pNJdc2de57bdy2fNNJljaMKaOFfKONtc394C6AllIP+HffsDwVjeAc5dRuJkbkcczRcdn2laUGC0MDgYsLI62YXl2PhdbEOGU0UzJ2YbZ8di0iXazQwaX/AFQAtwzT6f4V38xqls09xamNr/tQobLKCb0rr25OaqcWci3kzh/G1JJps5/wzv5jVHFnG1N6zKPuVZp5mNDnU7AAQL8TnfwUg1Njenb32lH3K4fMbWpnfXCjPOCT5MTp+0CkyVAdpTb/AOoPuUF84J/w53/ahY+JOW/5Y3B/aj7lIkqC43pj4CQKXSS5bupXjS9s7VTPNf8AyrvrhRnnOnk7tv2gX//S+jOdP/8AzH+aPuTPNYf4Y3/eD7lOaXcwG/dIFYvkvpTuP8YUF0xNxSnT57VZjqm/+VPZbiAI6SYO61KQNrcUKpkm505H+6PuV2yvLABA8n6bfvV+JLypn6dr2qpkmzZfJndvxjVJkmyj/DO15cQKvEmP/pnfzR9ykSTHQ0zv5gWKuc84dU3hcPgnbkaaFfPA3QbL3OARcd1fC69pMzSRuLkhdLB8AgwmnlhDzKya2ZpYGt0Fthz7StKfCKyR7IYo2MY1xOrxa1iBp61fGMMoq59Kyokmz00ZYOC3k7LmB05htvBxWnh/RrDZ4CKesllibLG57XxtNyx2a2o0BvY2+9bMvRWjneHmqeCDlYW2BAzFxFxvq7nfZXj6MxQyxTsqnZ4yzUsbazcnIdzB7VvuwsPMk0VQ5sr72eGiwB5W2Pjurx4aI6GWkbM5scjS1oAByXBva++/O64zuhtK+B0U9ZIRJplaMrWjQgNbc21F7d5WabolRSV8tWJJWGTaNtg1gIs4AcrnUrYw/o7TUFTBNC9zTDCIiLWz2Fsx712RspRFDtWlearw6eir6RkpilldZrg/IRcDUO5LkNZ0jZiBHl8Ap31DC97XsJdHlAJAI6pJANtRqfXtUQxxlfCavEYn0wYwvFo9X5euNLEC9rW9a7cssYAyzxNJO5cNFd1RTX0nj21641UCog0+Hi7uuFdtRTn/AM8fqeF//9P6oZ4Da00Z/iCltRFcWlZv+sNVTyqESG80Q/jCuwcRueMiRp5tNwpdG/ObsNuWikRu/VJ9S16uCQw9RhJzt0A+cFkfT8WN8cjHFrhrvsvMto8ew8U1JTcUwgRvmyAOdcus5uZwIII1vytyuuphNNjjJ3OxOcSMyGzWxtAvpY3Gt/SvpbXRdbI7PfKbKOE8vN2m1+xRwng6NPsXGnp66rwWqYyObiPqHltuo/IJLi17DYbEi4vrqtGkw7pM1sMTqh1NCHata1ry1th8p2Y5r301GuhWRlF0skc3i1TI8z2XEMbCGtzWdqRvl1HjZb9TRYoax00BvGQGZQbEttcnsBuqSUWLuFo3yN69yS4Hq8h6uavS0WJtqGunzFnWuC72bLf8nkB+LKvwZCb5CsVXBN5NKGNffhutl3vZajaOokwyiAge8saC9jiWm+W2pOu6xsw/FXSNE0hkZG64uRbQaclilw7Gp6eSF77h5FiSOqLG/wBtvYsdfhWJSinEUMj3shLA/j5eG+4s/v0B0stZ1L0vNRnDzq1waQY8rLlu457Hs0PLZSyj6VxU4bE6zzJI53ELHDVzy3LptYtGp08Atmhp+k3lUYrJs0DSL2jZd361+zutf1cu4YZCdGOsrNicPkFcrE4ZBVSuLJOF5FKNjlzXH22vuvBi9hovfdFz/iqz6R969GuLV4PPJ0hp8TjLSyMxtcOI4HKBKHabHV7PqrHUUs1NiFRNIHzRygFgDc1jzGxspwTD6inweojkZw3ylxYHntFhey8+zo/WMpZ4oY6GUysLYWPlGandYXkBa0AnTsB6rbndegbhte/AZ8OnZATkLGFkzjxASb3u0ZdPpevn/9T3NJ0fxyJjYxXMp4OK12SKQtcGZ7uHVaG3I5gDU9iucE6R5Zm+eQc0ZZE7O4GOwIadtSeqTcaHZZsdwKtq8ho+FI9sHDjfUOuYng3D9WuvfnYX0FiqRYP0hp/J3DEmzGKxl4s7/hPgwC30dOvd1/UtvozSYxTUbPO8+eXhNa8cUvu8E3dqNLi2ncu3dLhSiq42aSvMYlX1FJS1b6cgSGWzSSByGy0cIqJX18U02JSzTcIyOizdW9ibeyy7ceNOdBITDGx7MgALtDc2WaHEZKmljmbDCXGQMc0u2vsdlruxo7GmYHOuGG9wbXJHjossmMRMlnjEQc5htHa3WNtfDVQcfgbE1zoHNJ30Go20V5MbjjD2+TuD2g9U2FiBtdJ8digiDzTvzFxaALHUeHK+iyDF4OK2J1PIXvOUWAIvudb8rrbo6plXTiaNpa0kixtcLYRQ7ZeZr+l0eH4lLQvpHPkY4t0ktckNMfL5RcQPolbEPSmjlpopRHK50zfg2tb6ZsCQL22vzsrN6WYeyjiqJxLE2Rt75bgGwJb43cBtuVnoOkeH4pOIaUyOLmlzXOZYOA0Nu3W/sVcKxzzjUCN0AiEsXGh6+YuZcC5FgAdRoCd11wbrSxfEDhmHPq2xCUtexgaXFou54bqQCflX2K5lN0upJIA6WmqGS5i0xtYT1hyBNuWuoCio6XUUMWZsE5c4OcGublLg1ocbeot9q78ZuwEgi/I8ldQpRQtGvxemw6SNkzZXOkF2hjb82t97gF//1fpI6YYSb2fLdvpDJ6PbfssdPddVh6W0TyGmCoDy4MyhgPWJsBvubg9mq7zTmF1KIiLz2IYpLNJiNAKX4OBha6br6nhh36mX5Q3dfuXzm+m7vavoXRU5pqt1rXd/VekSyrIDkIbuVgAlbBLxLE5TaxPZ3ry01c5svFE5gNPEeG62bO82uLFdx5q6qgpXljuK+K5A0GfTf7VDXYsGkua86aDqannf7bKKJlf5VnqGuEhaS4n0ToLDTS9wdlQR4kRG2AkRkDO551DjcH2bo7zwKYCzjma4OAAu3st4qzDjLIw1gHVFiHgcuzt9faon88vw6sDXlk9gIHMa24PMgc/WuXKcea2qq6mSphdFFOWsjIMbntEfDIHY45z79l64bBSqyGzCvPyik4M76mSUA1GRrYgS5xsNABcn+yvQUeFUYjqo2y2e1xGdrhlGxJFtPWtp9XhMZY17GMF8rCY9D3g9itHW4WG5ogwAtEnVj3ANr7dqq2twoMGVrMvWdoza17nx3V2TYWYGxHhBjerlkGo8b+Cs+qwxgDS6FxGmVoB79ltiCFxzmJpceZbqnk0FmjhMs3VumygUlM12ZsEYdpqGi6vHGyJgZGwNaOQFlZSv/9b7I8hrCTsBquU+bBZ5RPK2B8hc053NF7t6zTfuzfaUfHgXDihMdKWWJYABYAe7YexX4GBiP4ulDC0Dlawtb/iPYOxGtwmjImjgiZw2BzXMZs1xO1vWqRMwCCd1RGKVkrrkvBF9Tc29Yv4rpxRxxt+CaACBtz0sPsXMdjmFT1b6OadrDG8/HtyNJY4XsToSHW2VZKvo++V03lVA+S/WIlYXE2A7d7WHsWWmgwjE4OJDDBNG0uYXNA0Ng1w9gH2LpMY2NjWNFmtFgFKKURc+WrweeXLLVUj5GE6Olbdtjc8+Rbf+HuWnK3o1G4Z/Ibym1gW65rfYdFnpoMCkmaKXyN8nptEb2uO5Nxr23XUClERF5zEp8L8or2x05NdHG4PeIjvkBF3Wt6JC+fBpIBuBfwXv+ig+Fqj3/wBV6VFChos0Am/etColk8pEYp2vYL9YtBynT71Wtla2ZwfKWANGVufL26qtBWPnrZIeMJGNia7e9jc/0XEpul9QwsFQyGr4jGPJp2lnCJJzNNy4EgWO49ymn6ZSzmhjFNCx04bxHulIjacgJF7dU3cLb7FZmdNA5ufzbKGgAm7tQNbi1rk6aAb3WzR9KDU1UET6AxNndZr+KHWuLgEAXB5G+g7V3wb6r//X+yFt1KKH+gVwJoqZ9FUyVFQ+mEFTxGyxuAc0hoFxcEcyLEHdVwupoMVjZBFV1UnBYcz5d5Gne5tr6l0PNtCXtLn5w0HIwuBa0c7Ds1WMYNRWdlqHgvucweNAeQG1lD8DpnAhszhmAB1BuOZ8SDZZZsJo5Tr1HBzXjLYatvY/aq+aKISOmc8l2a5JIFndtwN10Gyxizc4J8dSpM0bbXe0X213UiRhbmDgR23QSMcbBwJ7Lq6KDqLLlPwLDnZwG5C/Q5Xa7l39VL8EpXuMnEkAzmSwItm11271Dej9Dku0OuR6RIN9LeHess2EwSRsY6WUMDQ0jMOsAb63CwjAKLMNZHW3uR2+GngF1QFyJ+jWFzl7jA0SPlfK54Y0ucXXuDcajrFU/JTDTTOgtK1jmFhAcNiGjs7GhbuF4fFhsDqeGSR8edzhxCOrfcaAaeK3lBNlKKUXGn6M0EzHtLpm57dZj7EdZ7tNO2R32LWd0OwzIWh80bSSXBjmi93XN9NezuG1l0cOwalw2aWaAEySsax5IAuG3tsB+t7l0FKIv//Q+zIuDiuEU8bMQxBskgklicXts23oBu9rjRo5r5yLWG49n3r33RUET1XZmPvXpkUINlrPq4GVQicXZyDy00WCsAfOA5jDlGmZgcftWGnq44TVWpo28GISdQZc2+n2LTb0ogi6ldA2nlOQsYx4eHZ7ZddNbm39tVt4ZjVJiZMUMeWYRCQxvt1b20NvEKzcYhFPxZoXNIa1xDRm327NdFEmOUzYDKyJ9yCWhwAuNdb+orIMW4WWOeGQSaAhrRa+9t+8Khx+mERkdHKANbWFyO0epSMbjFuJG9txm0sbC9r+5ZnYkBSmdkLzZ1nNcLFul7m19NlWLF6eomEEbJS517HIcptubrmYlTNqcIxCAAFzphkBcG3Nm9qtg9PPI6Ti07YminELHB7TftuAs7MCdFMyRsocA0DK5oAJsQdtt1XzNKKYRGKFzuqc97EWtcag6aK3meoLJA2QRuc67CPkN2LfYSquweqka1skrXPtrKDZ2bt9gGizjC3mnmp3siLXuDg7fUADb1H2qrsOqGPfLHHE2Qvsws0DW2I18L3VPMswjbGJGdW4Eltm9mXbt1WOpwCZ+dsMoyPcC4O+UBry21v7V0aSgEFQJjFGw8MM6upvc9wW8igrk1+DuqqzjMqXRtIAcwbHkfa3RYPNFc2MMFVmBzZ253AEfJt2W+1WZheJNbZldltvuQbe7kLdl1Z2F1jsLxGlNRxJKiFzInvcdCWkXPZrZc9+EdIJKuSojqBTNmlD5IWzuIyjcAgCxNhr7t1//9H6rgdHV0WGsir6h9RU3JfI55dfU2ttysNgudjXR2XE8RdWQ1IglZE0QuDW5mva5xvmIJA1G29liiwXGRI50mJT2dISG+UOOVl2aeNg/XvGqz9HsKxDD66rkrpRMJWtDH8QnZz9wedi3Xc6rvqUREXLrKGrnreLFU5GAaNud7Hl42WocIr5ARNVZwXl2UvIGw2t3+xbFHhlVDWGaeqc+PMXBmc+r2LrBSiIi8ti+Dzecq3EnMifG6AgOOTMyzCNLsLvY4LwN4+d7/R/uvoPRXSqqx84+8r0yKEbsFiD4jNk0zG5tbe1r+8LSxCGOScEtdcNuSJSwfYqUMdEyeSFrHl8jLv4ji8Fu39Voum6LU7jD5PSRmKq8nLeAAGy2DuzsAN+4Lbo3YFQ3dSGjiLRlJYWg20uD9n2LLJV4PldHJNSZWkAtc5ulrj+hHqUeU4K4W4tGQzS2Zun41V4avC6qtbHDJTyzvZnBZYktFtb+sLadQ0rm5XQRlvYWhDQ0rt6eI639AbqzqWB7Cx8THNJuWluhRlLBE8yRwsa87uDQCuDVvETpTnDDxXWcTYXyNsuXgMTGSU8/lLnVsjpH5HPJBAB5DtNl//S+pUVdXT1UbJaQxxuZdzi0ix+77V1EUKURERFB2Xk8WxLF6bGpBTPmMQLQGCAua1ulz6Oo31Dr8svNWjx/H5KaeYYM68TA5kbonh0hNtN9LXPs5KoxzHo5zCzDnTh8pDZX08jGhpc4XsddLDft3XUwWsxGqraoVsRjYyNgYOC5gzZpA7U+loGHTTVdlF5vF5MdixWSegaXUsEUbjGT8YSXhwDcvWNsp9Ieu6pBivSGbKX0EcQc9zdYn3AD2tDjrpcOLrfNWz0axDFK51ScTgdA4ZSyN0RaWg3vqd9V3kRERcGsxLF4K+ZkFE2SCOSwPDcS5to7m9/nv8AqLnS4/jzoWvGGPgDngFxp3uLRoSSL6aabnUHZdLB8Rxeuq8tXRCliEYc4uY4OzH5I1tp2813BspREReWr5q52J4lFK+dtMGERNEbshHDafSyW9LN8rlsvCW7wvf9F9aqrPPMfevSL//T+ygWUqFqup6UVoqJGRmVjSGvIF2gkfcsWIRl72lkxYSLWEYdcLDQ08cdYXOq+K8xkBvDy2Fx/Zc+rwHAqzE543VZbWydZ8Uc4DxrmuG7+vsUydFcHip46d88sbTUPkbeQAvfJ6TdtQexa7Oh1Cxj21dZI+LginYDlblizOOW+t9Xb76Lfm6M4dVOZLnk0zWLXCxD9HDbXRbNBgVPQVcVRTvkGSAQ5SQQWgNAvpv1AuqiKDstGgYxz6q4DvhuY7gtllJTROzR08THdrWAFZVKIiIiIihLDsTKOwJYdgRSiiwPJLDsRSi//9T7KpRFFh2JYdgSw7FKIiItPFRfCqodsTvcvlAeQLL33Rf/ADdZp8o+9ekUooGoWpUUQmnEnEc0i5yg6HS2qxYiJGmMxmO9rEPfl0WGhpKlteKiRsTWBhAyvzb27lqYl0XFdWuqW1kjHmdsuS5LCAzLYtvbXmey650nQ2snbE04j5MaeZz2SQg5nN0sCSeQBt4+3JV9Eqiql4nlkbRmaRE2M8MWtoASdLi/j7Vnp+iksczZXV7iWQOiaQ03Li8ODyb6usLfiy9ONlKIodoCtHDTeSr7pv6Bb6IiIi//1fsyIiIiKEUoiIoUqFKIiIiIiItTFBfDKkDnE73L5QBpsV73oqb1FXffMfeV6RSoQCwstWWKd0ri1wsdhb+6wV7nxzhwhkkBZYFjb2WDD+L5Y6R0EsUYitd4ygm6/9b2hqMfbi03kjJpInufmMvos/UAGoPLVttPSF9VmmxHpLHTS8OkBqDHEGBzBlZJn+EBObVobqDpfv5RR1mOQ4nHS1JD45ZbXc30Gg3ve/MAjuJavVCRhNg9pPYCroiKHbLQwxvWqnHczH3BdBEREREREREREREREREREX//1/syIiIi0sXJbhNWQbERO19S+WZSRyXu+ipJqKsH9Y+9elRFA1UW6/qSQXY4dy1q/q0EhsDlbfXZeWjqpzV1r3TRxxwtAj6g6xOwumO07HYjmMmRxIzlrgCeqP6rSbR0+QyOqX5QdHZxrvp9iz4VHEzEqN0cziXSjQuvuNl7kHRFKKHbLSw0g+Ukftj7gt5ERERERERf/9D7MiIiIiIoRCLhSiIihSiIi0cZNsGrP3LvcvlzSMo15L3XRYnyirHzj7yvSooKrGLMAPYlvhL9ysdlgqo3z0cscZyuc0gEhcaDyQ38uw+FsjXhhLgBrp7Vq4ziFFSYuG1OHQyQCMGSY3LgbE5bAGxsBa9gb76LG/GMCia502DyNa2ThXyAgyEXa0a6k8it3CavC66sLKXCzE+JjXmQtAAzC4trutKh6ZukonzVVG5rmwNn6oc0ZXAcnAE2Lhte/JbsHS+lkbHmppmhxyl1hlBuWnXxC//R+yjUXUqHbLSw7R1SLW+GP/Fq3kRERERERERERQpUIilERERERERf/9L7MtHGRfBqz9y73L5YNgvedF/8zV/SPvK9KihFXXid1klcGxku25rDTVTKmPMyxA5g6FeclmdVVTg7QFoku08yCPZ1V1IJKOeLD6ypponVNQBGx+QEtOVziL8hYFYIccwHLAxksDWytMrLNAHVIB9d3AaX1WdmK4RE+OKnfHnlc1gEbdddr93Md2qwR4xg01VJE+JsfkzsgdJG21xcaWuRaxOttBfZZY8VwF7WvZNSuMjhlytBLja4sLXOhutqlxrDq2dsVNWRzOcLjIbg789uR9h7F0FDtAtLDzd9V++//IW8iIiIiIiIiIiIv//T+zIiIiIiIoRSiIi0sY/Q9X+5d7l8rHojwXvOi5/xdWPnH3r0qKEbfKL7p8r1IQCNRdY2sDYgI2tZpppoF5mSgfFUSRjiOFyJJWtsGADNYa962z5rdhLGzGWGCmnyxua97Xh+o0LddcxFlWDo/wBHZ6akfHAx8cET207uK45GvIc62u5LRruFmjwXB6EsqGtMQiLXA8ZwBy+jcX1t3rFU4HgkWatrC94aSGufKTkzG2VttdSdvBWjwbAKuKnqI4mPbHA2KJ4kPVY06DffkefIrZhwjC6d1M+KINNLfhdc9W9yefeukyVrtGkHwKu70StHDvjqv97/AEC31C//1PsqlERERQpRERERERERQiKURERERaeLH80Vf7l3uXyoONhr9i930Y/z1X9J3vXpkX//1fsyKtwX27FjkqoYnhjn6nTtt4pG6J1+G8O7bG64b8OxCfHDNJc0ZJBaJNx22W/PgtJJRMo2hzI2yiWwcQXEG++65LehFA0tHGkc0Z7B2p6zCy3qvcK1T0QppmSNZUZA8ggOjBDSC4i3ddxuOdlnj6NRQYbPRwzfGua4mRmcOtsCCdfUQfArDS9EaaJ7Hy1D6hzXiQ8TW5BBy6k9XQWB171U9CKItnbx5nCeMxnMb5G2IaG8gADbney6mH4JDhtXUTQkhs9vgwAGs1J09vh3c10nEBpv2LRw2/HqybWMunsC6CIiIiIijmpRERERERERf//W+yoiIpREREWli/6Jq/3LvcvlrWnKNOS9z0W/zNV9I+9emRFA2WqyhibiBrCH8YtLL5zly3v6N7X77XWpWsqGVD3Mp3PY83zCRo5DtI7FGGQ1UYqXzRcIyFuTM4G9h3LzkWCdIsOw2vZQZIi+IcFjZuuHtvc3DQCToATqefat5tB0hdV1Fqh7IvKGPZmnJ+Ct1mDTcn5XK62MNwrFaesjnrKp9QfhgRxiWxgkFgtpewBF7LSoMBxekqHOje2niceu1kvWe646xcGi439IEm+pNlkOC9IWmlLcTEjIQ18ge85nuLC14DraDsI2zHsWWbC8dfxHMrnNzEljeObNGlmnTUjXXc9p2XpYg4RMD7ZsozW2urqrhdpWlhmoqTzM59wW+iIiIi//1/syKFKIiIoUoiIiIihSiIiIiLQxr9DVn7l3uXzFpGQeHavbdFifLKod5969OihBoLLSm8r8o+DA4QJvvflayxYq4MdG5wJaQR6JcOXYtWimkkriyMyZBG/TKQL6W3WMRY7BkLZOLma3NcDQ69/tK//Q+kslxZsbY+G4/Auu4s1z5Tb7bDvXKZiPSGBoZBT1M7HtbaSqhs5rrAOsBbQE3FxyOuy2qTE8aqaCs49LJC5tPeCRsBa9z9b9Rx15EeOy1qPEekrQ2NlNxGGZrRLURvu5pdYuHVaQGjk4A95Wfzl0ibXvikoWtgYXRmZsLnB5FyHBodexGUdxusjcT6QAtc+hhDDIGuY1ry8Ak+raxve2p9fpGaDe6PvkNlo4XvVDmJv/AMhdBEREREREREUKUREREREREUL/0fsqlERFpYzrg1YP9F3uXy0HqjTkvb9GDavqgf1ne9eoRUeS1pIWvDUSTQyFzHRkA2DhYrkx1MrJYKni5WA5C3U53OGl/YuhLV1L4IHU8YzyXu062I9Y0utRuJ1oiYXNaJHG4YWbjKTp6wk2JVMbnCGZk9o8zbNtmdrpb1K0mLVUb2sEHEzi+Zo0aTpY/wASocUqDKWsMUketnhp6pHaN9TossmISZGzNlYIjBnccmbW4Ft+9YnYlVxZXnhy6Z3Bg2bY7esFQ3F6qZxaIWQgXBdITqR6tOaxuxiqZE57W8Z7XACMM3H61+zkt2avqI443tDT8EZHgDV1iLgd4F1hhxWukmjilpcnEOQ5tLEC5P2rbwsWfVD/AFf6BdBERERERFClF//S+yoilEREUKURERERERFp4tY4VVA84ne5fLARYaL23Rj9JVX0nf8AJeoUqCLplFiLDVafmqlaLRtdHc3JY4glbUcTYY2xxgNa0WA7ArWSwSyWSwUZG58+UZrWvbWymyWC/9P7IY2lwcWgluxtshGhWlhwtLVC1vhf6Bb6IiIiIiKFKIiIiIiKFKIiIiIiIi//1PreKC+GVF/2bvcvlAboPvXuujR/OdWLW6z/APkvUIiIiIiIiKFKq+4abLSw43lqtdeJr7FvoiIiIoUoiIiIiIv/1fsyIihSijmpRERERFqYobYZUn/Td7l8oa/qjTkvddGWnzlVOB0zO969QiIiIiIiKFKKjwcjrb2WphwIfUk85O3uC3kRf//W+zIiIihSiIiIiIiIihSihSiIiIiLSxY5cJqj2RO9y+WtYMo6w2Xtui4tX1O+pd716lEX/9f7MiIiIiKFKKDstSg3qL78X/8AIW4iIiKEUoiIiIiIiIiIi//Q+zIiIiIiItLGNcHq/wBy73L5WJBlHgvcdGf0nUjvf/yXqURFClERERERQ7ZalD6dR+8/oFuIiIiIi//R+zIiIiIiIiIiIihSiIiIiLSxf9EVf7l3uXykbDRe46M9XF6kd7/+S9WiIiIiL//S+zIiIiq42aStOgdeWpHZJ/RbyIiIiIiIiIiIiIiIihEUoiL/0/syIiLSxf8ARNV+6d7l8sbIA0eC9p0cP56qe5z/APkF6tSiIiIoUqFKIixzfEvsbaFaWGkmapub9cH7F0URERERERFClf/U+zIiIiIiIihSiIiIiLTxXXC6of6TvcvlIvlG2y9p0buMeqhyzSf8l61EUqERSoUoiKEX/9X7HJrG7wWhhgIqKoE364P2LpIiIiKEUoihAO9SiKEUqERSoUooUooUooUooWrigJwypt+zd7l//9aQ45R4L22AHJiVXO42Ie/w3Xo6GubWQvkbcBry0Eje3MdyzukDWg2v22WJ9VljLwx2h5haxxR1vi238U85yX+LaPWnnOTS8bfaVBxOW2jGfaoGKS7lrbeKedX3+LbYd+6jztJzjAHLVVdi0wPVY0+tWGKTE+gy97breMku2gt2KRJI3dt79qxTVroGF7mCwWlTY6Kp5Zwww6ggnVp7CFigqzBLWS30a/rEmwAA/ustNjflJ0jIab2d2+CucWeLksA1Tzu4bsHtshxd/wCzH1k87yE2EQHrUedpQPQbv2qXYpLl0a0HfdI8Tmc+xaLeKk4pLtkaeyxVfO0oNiwH1qXYpK15GRtge0qfOkhdYNb7VR2LSnYN070GLyfqj1lV88TfqN9qnztPuWt8AdUOLz39Bo8VR2M1A+Qy3rTzvUWuWtHtU+eJr7N8Fkdi0rQOozX539l//9f6X55m0+DZvvf+yscXmBALWe1R54m/VZ9qHFpwb5WWA71IxeXW7W+1T53l/UaAq+eJeTAfWred5SLhjQgxaZ2zWjVbtNM+eASXIOosB2FZru2zOvbsUjMBYuJPgpubXv8AYos7NufYhz6arBWVRpWA2LjY6dq5k2LNrsJqXxEaRO9ttQV83GW24XucBEbZa18ua3Fc0EAnn/0utTupaZgEWYEuLnDIbEnf3KkjonnMwvGuoylYyAT/AJh9uYIKpwoxc8V3qafuViI7D4V3Z6J+5QGx6gSO7uqVj4bL/GP136pR8bPkufftylQ2NrTfiuv4H7lFmBwvI72H7lBbHmvnNh3H7lkLYQ4OLndujSskGI1LWxCYxusXZ8kTtR8m39VBxSv4I60DX8Ai5ifbjcj9H7VaesdUMcx72hga22Vjr5tc3q2staljp6eUEXtck2aSSrODM8uV7sshuRkOqrTxQU5Ng5ouSAGm2qsWsF+u83+aVLmMOz3D+EqoYzS0h7PRP3L/0PoGVhvZzj/CVdsTCcxc6w+aUdHEQHZ3+phWRkbL5rvsNfQKo5kYJdxHW7mn7lUBjz6btfmlS4Rl1w+Sx+aVUNjEhOaTq/NKhzYzbLn3/VKjJGQLF48WFVLYzbru7+qfuTLGD6biSLeiVLWxvLjnk7fRKgsjc4uzv+qVXhx8nya/NKsImjeV4Pe0qHRsFiZHew/cpLI3W67vU0qHNaQMsjrj5pUFjSB13X5dQo5jGnRz/qFQwMJPwrr97SrljM1uI4Dsyn7kbG1rrcR2uvon7lLo2WPwrvU0qzYmXBD36fNK36auhp4QyzzruWlZjisAJsHEjfqlWGLQkaB31ShxSIE3a76pQ4tCDbK/6hVTi8Q+Q/6pWpX1DKwMFnMte92kbrQkbT02H1DGdUcJwADTvZeCO/NfROjO9eLa8crsEi4LlA302Q7EgKtvxZf/0fqpGvjspa4m5tYdpWJw62hUuNhoq3HPfvVMtt+e3cpN2i1t+5S8gbt5KtxcWNlYbdigC53S4zaG6knRt2oRZ2vqU3NrX0UuAt3qW6ag29SDNpcXVuWv2JcGwupbcD1FVBuy3ZujG/CA73VMoB356KAMznXdohIve5HYq5rHU7od7XPdopGtgTYqWAN0vfTayx/xKQRltfVTa5GqhwbYA7jsVdRa2t/sS2oAJVI4WiZ7zmJPK+yu9oGmuvapabnsseSnMc1ifsX/0vpt7uIup0LSdjfRWv1AAdbIXHNYDxRjgI721uULz2WVmuzXvsAqudr77psQL3ape/sOl1p4lph9S7YcJ2vqXzmwOuntXtKYYzh09SIMNfIJJHG58Ss3l3SA/wDtJup8r6RaAYXb1/3QYjjoJBwd5PcCqmux62mEP9hUGtx8EluEuHqKeWdIctvNJt+O9UNV0hO2EnX8dqqajpEAT5qNhy/BU+cMftfzPJ7CsZr8fsfzQ72FS6s6QuAIwpyg1PSMm/mt1/x3oKjpIdsJP49akVPSSPV2FE+H/ag13SDX8zv17inlfSH/AOId7FbyvpGQLYQfx608q6Sk/og/j1oKnpNb9FW/HinlnSMaOwh5I5i6eX9Ih/7O/wBhUit6SW/RLvx608s6S30wl2v47VbyrpMTfzUPb/dSKjpOGu/NY1Hb/dYxX9ItbYO+/wCO9Syr6SZwfNJH48V//9P2JqOkpI/NR/HrUtn6TC/5r3/Hao4vSfN+jRbs/BUOl6SjrHDLjsH/AGo8q6R2/RLrqRUdJLfoo3/HejZukt9MKt+PFVL+k24wu348U4nSc6ebB+PWp43SNhAfhZJOoy/9qDUdIg7TCnKPKOkZt+anafjtUcfpINfNR/HrVmzdJGm/mzx/F1Dpekrzphn49qhlV0hDw04S/Tc2Ty3pCHX80PKnyvpFb9EO9ikVXSU6+anD8eKt5R0lI/RZ8fwVUT9JQLuwskfjvVvL+kNrDBn2HcVArOkX/wAQ5W8q6RWNsIdr+O1H1HSTNduFE/jxUGfpMQPzW4a3/GqGq6RM1dhDnA9lysc1R0gqIJIXYNJZ7S29jouOOj2KgAeb5/qL/9k=" /> </div> <p class="paragraph"> Рис. 11.10. Список учетных записей Logins в окне программы SQL Server Enterprise Manager </p> <p class="paragraph"> (Учтите, что в данном случае на рис. 11.10 показана учетная запись ASPNET, созданная на компьютере PRICEKW2KLT2 автора книги. — Прим. ред.) </p> <p class="paragraph"> Итак, учетная запись ASPNET включена в список учетных записей SQL Server. В следующем разделе показано, как ее использовать для подключения к базе данных без указания в строке подключения какой-либо информации об имени и пароле учетной записи. </p> </div> </div> <!-- end .note-content--> </div> <!-- end .note-inner--> </div> <!-- end .note--> <div class="note-bottom-left"> <div class="note-bottom-right"> <div class="note-bottom-center"></div> </div> </div> </article> <article class="note-block entry post"> <div class="note"> <div class="note-inner"> <div class="note-content"> <div class="post-content clearfix"> <p> </p> <p class="chap">Применение параметра TRUSTED_CONNECTION</p> <p class="paragraph"> Продемонстрируем теперь применение параметра TRUSTED_CONNECTION для подключения к базе данных и выполнения простого запроса с помощью технологии ASP.NET. Запустите интегрированную среду разработки приложений Visual Studio .NET и создайте новый проект ASP.NET Web Application. Для этого в диалоговом окне New Project (Новый проект) выберите тип проекта Visual Basic Project в области Project Types (Типы проектов) и шаблон ASP.NET Web Application (Приложение на основе ASP.NET Web-форм) в области Templates (Шаблоны). </p> <p class="paragraph"> Переименуйте автоматически созданный файл WebForm1.aspx и укажите для него новое имя default.aspx, щелкнув на имени правой кнопкой мыши и выбрав команду Rename (Переименовать) в контекстном меню, а затем отредактировав выделенное имя. Эта Web-форма будет используемой по умолчанию Web-страницей данного каталога. (Впоследствии в эту Web-форму будут постепенно вноситься другие изменения.) </p> <p class="paragraph"> Для начала рассмотрим код в листинге 11.1 с очень простым примером подключения к базе данных с помощью учетной записи ASPNET, выборки данных с помощью запроса на основе команды SELECT и отображения результатов запроса на Web-странице. </p> <p>ЛИСТИНГ 11.1. Вспомогательный КОД Web-формы default.aspx.vb </p> <p class="paragraph"> Imports System.Data </p> <p class="paragraph"> Imports System.Data.SqlClient </p> <p class="paragraph"> Public Class WebForm1 </p> <p class="paragraph">  Inherits System.Web.UI.Page </p> <p class="paragraph"> #Region " Web Form Designer Generated Code " </p> <p class="paragraph">  ' Этот вызов организован мастером Web Form Designer. </p> <p class="paragraph">  <System.Diagnostics.DebuggerStepThrough()> _ </p> <p class="paragraph">  Private Sub InitializeComponent() </p> <p class="paragraph">  End Sub </p> <p class="paragraph">  Private Sub Page_Init(ByVal sender As System.Object, _ </p> <p class="paragraph">   ByVal e As System.EventArgs) Handles MyBase.Init </p> <p class="paragraph">   ' CODEGEN: Вызов этого метода организован мастером </p> <p class="paragraph">   ' Web Form Designer. </p> <p class="paragraph">   ' He редактируйте этот код вручную с помощью окна редактирования. </p> <p class="paragraph">   InitializeComponent() </p> <p class="paragraph">  End Sub </p> <p class="paragraph"> #End Region </p> <p class="paragraph">  Dim connString As String </p> <p class="paragraph">  Private Sub Page_Load(ByVal sender As System.Object, _ </p> <p class="paragraph">   ByVal e As System.EventArgs) Handles MyBase.Load </p> <p class="paragraph">   ' Указание строки подключения. </p> <p class="paragraph">   connString = "server=(local);database=Novelty; TRUSTED_CONNECTION=Yes" </p> <p class="paragraph">   ' Это вся информация, которая нам нужна </p> <p class="paragraph">   ' для подключения к базе данных. Кроме того, если </p> <p class="paragraph">   ' кто-то сможет получить доступ к коду этого файла, </p> <p class="paragraph">   ' он не сможет использовать полученные сведения </p> <p class="paragraph">   ' для регистрации входа в базу данных. </p> <p class="paragraph">   ' Извлечение системной ссылки на указанную строку подключения. </p> <p class="paragraph">   ' Это позволяет .NET проверить наличие данной строки </p> <p class="paragraph">   ' в куче. Если её нет, то создаётся её экземпляр в </p> <p class="paragraph">   ' оперативной памяти и возвращается ссылка </p> <p class="paragraph">   ' на нее, а если есть, то возвращается ссылка на нее. </p> <p class="paragraph">   String.Intern(connString) </p> <p class="paragraph">   ShowCustomers() </p> <p class="paragraph">  End Sub </p> <p class="paragraph">  Private Sub ShowCustomers() </p> <p class="paragraph">   ' Это простой пример использования функции, </p> <p class="paragraph">   ' которая извлекает данные из таблицы tblCustomer </p> <p class="paragraph">   ' и отображает их. </p> <p class="paragraph">   ' Инициализация объекта подключения строкой </p> <p class="paragraph">   ' подключения. </p> <p class="paragraph">   Dim conn As New SqlConnection(connString) </p> <p class="paragraph">   ' Затем инициализация объекта-команды </p> <p class="paragraph">   ' строкой выполняемой команды SQL. </p> <p class="paragraph">   Dim cmd As New SqlCommand("SELECT * FROM tblCustomer", conn) </p> <p class="paragraph">   conn.Open() </p> <p class="paragraph">   Dim dReader As SqlDataReader = _ </p> <p class="paragraph">    cmd.ExecuteReader(CommandBehavior.CloseConnection) </p> <p class="paragraph">   While dReader.Read </p> <p class="paragraph">    Response.Write(dReader.GetString(1)) </p> <p class="paragraph">    Response.Write(" " & dReader.GetString(2)) </p> <p class="paragraph">    Response.Write("<BR>") </p> <p class="paragraph">   End While </p> <p class="paragraph">   dReader.Close() </p> <p class="paragraph">   conn.Close() </p> <p class="paragraph">  End Sub </p> <p class="paragraph"> End Class </p> <p class="paragraph"> Обратите внимание на то, что в листинге 11.1 используются пространства имен </p> <p class="paragraph"> System. Data и System. Data. SqlClient, которые содержат все необходимые классы и методы для подключения и опроса базы данных. Учтите, что код в листинге 11.1 является вспомогательным кодом для Web-страницы default.aspx. Это значит, что Web-страница default.aspx не содержит его, а только отображает результат его выполнения. Полностью код Web-страницы default.aspx показан в листинге 11.2. </p> <p>ЛИСТИНГ 11.2. КОД Web-страницы default.aspx </p> <p class="paragraph"> <%@ Page Language="vb" AutoEventWireUp="false" Codebehind="default.aspx.vb" Inherits="Novelty.WebForm1"%> </p> <p class="paragraph"> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> </p> <p class="paragraph"> <HTML> </p> <p class="paragraph">  <HEAD> </p> <p class="paragraph">   <title>WebForml

 

 

 

  

 

 

 

 

 

В верхней части листинга располагается директива, которая сообщает механизму выполнения ASP.NET о необходимости использования вспомогательного кода из файла default.aspx.vb. После щелчка правой кнопкой мыши на файле default.aspx в окне Solution Explorer и выбора команды Build and Browse (Скомпоновать и просмотреть Web-форму) произойдет следующее. Во-первых, Web-форма скомпилируется в DLL-файл и при каждом последующем вызове этой Web-формы ASP.NET будет использовать ее откомпилированную версию. Во-вторых, откроется окно Web-броузера с отображением результатов выполнения кода, как показано на рис. 11.11. (Чтобы открыть проект данного примера и выполнить приложение, нужно разрешить совместное использование текущего каталога с файлами примера. При работе с операционной системой Windows 2000 для этого щелкните правой кнопкой мыши на имени каталога, т.е. Novelty в данном примере, и выберите в контекстном меню команду Sharing (Совместное использование). Затем выберите вкладку Web Sharing (Совместное использование в Web-среде), переключатель Share this folder (Совместно использовать данный каталог) и в диалоговом окне Edit Alias (Редактировать псевдоним) введите Web-имя каталога, т.е. Novelty в данном примере. — Прим. ред.)

РИС. 11.11. Результат отображения Web-формы default.aspx в окне Web-броузера

НА ЗАМЕТКV

Коды всех примеров в данной книге можно скопировать с Web-страницы книги на Web-сервере Издательского дома "Вильямс" по адресу: www.williamspublishing.com .

 

Применение элемента управления DataGrid

В первых версиях набора инструментальных средств разработчика .NET Framework SDK для демонстрации примеров итерирования коллекции данных применялся пользовательский элемент управления DataGrid, который имеет очень мало или не имеет вообще ничего общего с элементом управления ActiveX. По сути, он означает использование в Web-форме некоторых шаблонных функций, которые выполняются в серверной части в целях создания HTML-кода для клиентской части. Эта технология обладает очень большими возможностями, поскольку позволяет создавать весьма сложную логику, связанную с пользовательским интерфейсом, в виде повторно используемого компилированного объекта, который полностью безопасен и совместим с любым типом Web-броузера. Дело в том, что серверные элементы управления в итоге создают HTML-код и вопросы совместимости полностью зависят от разработчика.

Элемент DataGrid является характерным примером элемента управления, который позволяет разработчику просто связать объект DataSet с объектом DataGrid и мгновенно получить визуальное представление данных. В листинге 11.3 показан пример создания базового запроса для заполнения данными элемента управления DataGrid. Для использования любого серверного элемента управления его нужно объявить, а после объявления его методы и свойства можно использовать так же, как любые другие объекты Web-страницы. Итак, здесь создается новая Web-форма WebGrid.aspx, которая содержит элемент управления DataGrid.

ЛИСТИНГ 11.3. Web-форма WebGrid.aspx

<%@ Import Namespace = "System.Data" %>

<%@ Import Namespace = "System.Data.SqlClient" %>

<%@ Page Language="vb" AutoEventWireup="false" Codebehind="WebGrid.aspx.vb" Inherits="Novelty.WebGrid"%>

 

  WebGrid

<%@

 Dim connString As String

 connString = "server=(local);database=Novelty;TRUSTED_CONNECTION=Yes"

 Dim conn As New SqlConnection(connString)

 Dim As New SqlCommand("SELECT * FROM tblCustomer", conn)

 conn.Open()

 Dim dReader As SqlDataReader = cmd.ExecuteReader(CommandBehavior.CloseConnection)

 dataGrid1.DataSource = dReader

 dataGrid1.DataBind

 dReader.Close()

 conn.Close()

%>

 

 

  

  

 

 

  

   

    

   

 

  

После выполнения этого кода по отношению к базе данных Novelty полученные результаты будут иметь такой вид, как на рис. 11.12. 

РИС. 11.12. Внешний вид Web-формы WebGrid.aspx

Серверный элемент управления предлагает способ отображения данных без создания вручную какого-либо кода, связанного с механизмом отображения данных. Учтите, что серверные элементы управления в большинстве своем созданы на основе фрагментов Web-страниц, или пэйджлетов (рagelet). Они не являются полноценными ASPX-страницами, имеют расширение .as и представляют только некоторые разделы Web-страницы, например повторно используемую форму или код, который применяется для отображения сообщения об ошибке и является частью более общей Web-страницы с информацией о происходящих ошибках. Такие серверные элементы управления позволяют выполнять практически любые функции с помощью Web-ориентированного пользовательского интерфейса.

НА ЗАМЕТКУ

В cреде с динамическим содержимым некоторые переменные, например строка подключения к базе данных, часто остаются статическими. В листинге 11.1 для строки подключения в куче ищется (interned) экземпляр строки connString. Если он найден, то проверяется его содержимое. Если значение экземпляра в куче совпадает со значением строки connString, то оно используется приложением. В противном случае создается новый экземпляр и ему присваивается значение строки connString. Данный подход позволяет экономить ресурсы, потому что среда CLR гораздо быстрее выполняет проверку кучи, чем создание нового экземпляра объекта-строки. Такое повторное использование строк позволяет повысить производительность приложения. 

Данный способ не следует применять для строк, значение которых часто изменяется, потому что нет никакого смысла проверять значение экземпляра, когда наверняка известно, что оно другое. Несмотря на это, его можно применять для свойств, если свойства содержат особый набор значений, например при работе с перечислением. Для повышения производительности приложения и эффективного использования ресурсов в таких случаях применяется метод intern. В главе 12, "Web-службы и технологии промежуточного уровня", описываются другие технологии повышения эффективности приложений.

 

Повышение производительности приложений с помощью хранимых процедур

Благодаря достоинствам платформы .NET многие разработчики стали полагаться на клиентскую часть приложения для реализации специализированных бизнес-правил. Хотя ASP-страницы на платформе .NET компилируются и выполняются быстрее, чем обычные ASP-страницы, все же для большинства организаций управление такой бизнес-логикой (или ее поддержка) остается достаточно сложным.

В большинстве случаев сервер базы данных оказывается недоступным для разработчиков, т.е. они не могут управлять количеством процессоров, размером оперативной и дисковой памяти, а также способом резервного копирования. Для большинства операций правильно сконфигурированный сервер базы данных является наименее требовательным к ресурсам компьютером. Ниже перечислены типичные рекомендуемые конфигурации компьютеров, которые могут использоваться для Web-сервера и сервера базы данных. 

Компьютер Спецификации
Web-сервер Pentium 4, частота 800 МГц, 1 Гбайт оперативной памяти, массив RAID 5 дисков SCSI емкостью 18,1 Гбайт
Сервер базы данных Quad-Pentium 4 Xeon, частота 800 МГц, 4 Гбайт оперативной памяти ECC-RAM, массив RAID 5 дисков SCSI емкостью 72 Гбайт для базы данных и журналов регистрации транзакций, дополнительные сетевые платы и источники бесперебойного питания  

Часто для повышения производительности рекомендуется использовать хранимые процедуры. Вот что происходит при поступлении Web-запроса к базе данных.

1. Пользователь открывает Web-страницу, вводит данные, а затем передает их Web-серверу.

2. Web-сервер анализирует полученные данные и выполняет проверку и/или сбор данных, посланных пользователем.

3. Затем пользователю пересылается отклик, обычно в виде Web-страницы с уведомлением об успехе или неудаче запроса.

4. Пользователь продолжает работу с Web-приложением.

Основная задача заключается в том, чтобы сократить количество запросов к Web-серверу и не увеличивать размер Web-страниц. Ниже перечислены действия, которые выполняет компьютер при поступлении запроса.

1. От пользователя поступает запрос с некоторыми данными.

2. Имеют ли данные корректный формат? Если да, то поместить их в базу данных; в противном случае обработать возникшие исключительные ситуации.

3. Можно ли установить соединение с базой данных? Если да, то продолжить работу; в противном случае обработать возникшие исключительные ситуации.

4. Может ли база данных получить данные? Если да, то продолжить работу; в противном случае обработать возникшие исключительные ситуации.

5. Подключен ли клиент или уже нет? Если да, то послать отклик; в противном случае закрыть подключение к базе данных.

Очевидно, что Web-сервер должен выполнить множество операций, помимо обработки кода в Web-страницах. Более того, в предыдущих перечнях операций не учитывается возможность манипулирования создаваемыми объектами.

Попробуем теперь изменить код в листингах 11.1 и 11.2 для применения хранимой процедуры, предназначенной для возвращения данных Web-странице. Для этого нужно создать саму хранимую процедуру, которая, по сути, создает основу для двухуровневого приложения.

ВНИМАНИЕ!

При работе с любым приложением ASP.NET для сбора данных из формы нужно использовать метод Server.HTMLEncode(Request.Form("objectName")), который позволяет предотвратить межузловые атаки на основе сценариев. Этот метод кодирует информацию в виде строкового литерала, понятного SQL Server, что позволяет исключить риск применения злоумышленных операций, например вставки команды в виде подстроки "; TRUNСАТЕ TABLE MASTER" в текстовое поле txtFileName Web-страницы и выполнения ее со стороны SQLServer.

Некоторые разработчики опасаются использовать хранимые процедуры в Web-приложениях. Эти опасения вызваны сложностями использования объектов Command и SQLCommand в технологиях ADO и ADO.NET вместе с хранимыми процедурами. Как отмечается в главе 4, "Модель ADO.NET: провайдеры данных", указание параметров в коде необходимо для "предварительной квалификации" данных за счет установки их типа. При этом SQL Server и платформа .NET избавлены от излишних затрат времени на определение типа передаваемых данных (целое число, строка и т.д.). В данном примере рассматривается хранимая процедура без параметров, код которой показан в листинге 11.4.

НА ЗАМЕТКУ

С помощью типов, описанных в разделе о включении учетной записи ASPNET в список учетных записей SQL Server, необходимо конфигурировать роль public с указанием разрешения EXEC на выполнение процедуры. В листинге 11.4 показан код процедуры, а в листинге 11.5 — способ ее применения. 

ЛИСТИНГ 11.4. Код процедуры sp_GetCustomersOrders

CREATE PROCEDURE sp_GetCustomersOrders

SELECT tblCustomer.LastName, tblCustomer.FirstName, tblOrder.OrderDate

FROM tblOrder

INNER JOIN tblCustomer ON tblCustomer.ID = tblOrder.CustomerID

ORDER BY tblCustomer.LastName

GO

Обратите внимание, что в запросе используются только действительно нужные а не все поля таблицы tblCustomer, как показано в листинге 11.3. Вообще говоря, никогда не следует запрашивать поля таблицы, которые не будут использоваться. Это особенно важно при расширении масштаба приложения.

Рассмотрим теперь измененный код подпрограммы ShowCustomers, который показан в листинге 11.5. Обратите внимание, что в него включена еще одна строка для обработки даты, возвращенной хранимой процедурой.

Листинг 11.5. Обращение к хранимой процедуре из подпрограммы ShowCustomers

Private Sub ShowCustomers()

 ' Это простой пример использования функции,

 ' которая извлекает данные из таблицы tblCustomer

 ' Инициализация объекта подключения строкой

 ' подключения.

 Dim conn As New SqlConnection(connString)

 ' Затем инициализация объекта-команды строкой выполняемой команды SQL.

 Dim с As New SqlCommand("exec sp_GetCustomersOrders", conn)

 conn.Open()

 Dim dReader As SqlDataReader = _

  cmd.ExecuteReader(CommandBehavior.CloseConnection)

 While dReader.Read

  Response.Write(dReader.GetString(0))

  Response.Write(" " & dReader.GetString(1))

  Response.Write(" " & dReader.GetDateTime(2))

  Response.Write("
")

 End While

 dReader.Close()

 conn.Close ()

End Sub

(Учтите, что для работы этого приложения в базу данных Novelty должна быть включена хранимая процедура sp_GetCustomersOrders, как описывается в главе 3, "Знакомство с SQL Server 2000". — Прим. ред.)

С помощью хранимых процедур, как правило, удается значительно повысить производительность работы Web-приложений с базами данных. Дело в том, что хранимые процедуры компилируются на сервере баз данных и выполняются гораздо быстрее по сравнению с динамически создаваемыми запросами. В листинге 11.1 команда SELECT должна интерпретироваться перед каждой операцией извлечения данных из базы данных SQL Server. Поэтому компилированные версии Web-страницы и хранимой процедуры выполняются гораздо быстрее. В аспекте повышения производительности эти особенности технологии ASP.NET и платформы .NET Framework являются их несомненным преимуществом.

 

Резюме

В данной главе представлены основные сведения о способах доступа к SQL Server с помощью технологии ASP.NET. Здесь показано, как извлекаются данные на основе динамических запросов и хранимых процедур без ручного кодирования механизма отображения данных в объекте DataGrid. В этой главе также упоминается промежуточный уровень, который более подробно описывается в главе 12, "Web-службы и технологии промежуточного уровня".

 

Вопросы и ответы

К каким базам данных можно осуществлять доступ с помощью технологии ASP.NET?

Технология ASP.NET обладает той же совместимостью с другими базами данных, что и технология ADO.NET, т.е. для любого источника данных, совместимого с ADO.NET, в ASP.NET предлагаются те же функции.

Почему для извлечения данных не используется XML-анализатор?

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

 

ГЛАВА 12

Web-службы и технологии промежуточного уровня

 

Вероятно, многие читатели или еще не работали с компонентами промежуточного уровня, или имеют опыт работы с приложениями, которые включают только Web-сервер и сервер баз данных, где большая часть прикладной логики содержится в ASP-страницах, а в базе данных хранится только используемая информация. Организацию системы, при которой прикладная логика находится на промежуточном уровне или распределена среди нескольких уровней, принято было называть канализацией (plumbing). В такой системе прикладная логика предоставляет пользователю все необходимые данные и службы, но полностью скрыта от него.

В течение многих лет такая "канализация" реализовывалась с помощью DLL-файлов на языке Visual Basic или Visual C++. Используемый код имел вид откомпилированного объекта, который можно было применять совместно, повторно или удаленно. Наиболее распространенным примером частого повторного использования кода являются объявления объектов ADODB.Connection и ADODB.Recordset, которые принимают строку подключения и запрос и возвращают результирующий набор записей. Эту логику можно упаковать в виде функции, принимающей в качестве параметров строку подключения и запрос, а возвращающей результирующий набор записей. Теоретически этот способ просто прекрасен, но в реальной ситуации возникают проблемы с контролем версий, удаленным доступом и общим недопониманием в среде разработчиков.

Компанией Microsoft достигнут невероятный прогресс в развитии промежуточного уровня в рамках платформы .NET Framework. Она открыла низкоуровневые библиотеки для всех языков программирования в среде VS.NET. В результате разработчики на языке Visual Basic получили гораздо более удобный и простой способ доступа к потокам и маршалингу для более эффективного управления производительностью. Следующим крупным шагом вперед было введение контроля версий на стороне сервера. Это позволяет хранить на одном компьютере проектируемую и рабочую версии кода без конфликтов между ними. Серверный контроль версий происходит благодаря тому, что на платформе .NET для их хранения используются разные каталоги, а не параметры системного реестра. Нельзя не упомянуть здесь и Web-службы. Хотя в эпоху интенсивного развития Internet эту технологию нельзя назвать совершенно новой, все же Web-службы, вероятно, являются наиболее перспективным путем развития идеологии распределенных вычислений. В данной главе рассматриваются механизмы работы промежуточного уровня и описываются способы его реализации.

 

Применение промежуточного уровня для презентационной логики

Данные, вводимые пользователем в Web-форму (например, дата), часто нуждаются в проверке на соответствие заданным требованиям. Большинству разработчиков известно, что эта простая задача может быть выполнена несколькими разными способами в клиентской части или на презентационном уровне. Однако это требование ограничивает клиентский код только языком HTML. В этом контексте становится ясным значение промежуточного уровня: именно на этом уровне происходит взаимодействие клиента с обрабатываемыми им данными.

В Visual Basic .NET предусмотрена удобная встроенная функция IsDate для управления процессами проверки правильности формата введенной даты. Она возвращает логическое значение, которое определяет успешное или неудачное преобразование переданной ей информации в корректный формат даты. Рассмотрим подробнее эту функцию на более высоком уровне.

Создадим Web-форму datecheck.aspx с помощью шаблона ASP.NET Web Application среды Visual Studio .NET. В данной Web-форме будут располагаться только два серверных элемента управления: текстовое поле и кнопка. После щелчка на кнопке введенная в текстовом поле информация передается серверу, на котором выполняется функция Is Date. Затем результат выполнения функции передается обратно Web-форме. В листинге 12.1 приводится вспомогательный код данной Web-формы datecheck.aspx.vb, а в листинге 12.2 — код самой Web-формы datecheck.aspx.

ЛИСТИНГ 12 1. Вспомогательный код Web-формы datecheck.aspx.vb

Public Class datecheck

 Inherits System.Web.UI.Page

 Protected WithEvents TextBox1 As System.Web.UI.WebControls.TextBox

 Protected WithEvents Button1 As System.Web.UI.WebControls.Button

#Region " Web Form Designer Generated Code "

 ' Этот код создан конструктором Web-форм.

  Private Sub _

  InitializeComponent()

 End Sub

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

  ByVal e As System.EventArgs) Handles MyBase.Init

  ' CODEGEN: Этот вызов метода организован конструктором Web-форм.

  ' Не изменяйте его вручную в окне редактора кода.

  InitializeComponent()

 End Sub

#End Region

 Dim Msg As String

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

  ByVal e As System.EventArgs) Handles MyBase.Load

  Button1.Text = "Check Date"

  TextBox1.Text = DateTime.Now.ToString

 End Sub

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

  ByVal e As System.EventArgs) Handles Button1.Click

  Msg = IsDate(Request.Form.Item("TextBoxl")).ToString

  Msg += "
"

  Msg += Request.Form.Item("TextBox1")

  If Page.IsPostBack Then

   Response.Write(Msg)

   Button1.Text = "Date Checked"

  End If

 End Sub

End Class

В листинге 12.1 нет никаких следов взаимодействия с клиентской частью.

ЛИСТИНГ 12.2. Код самой Web-формы datecheck.aspx

<%@ Page Language="vb" AutoEventWireup="false" Codebehind="datecheck.aspx.vb" Inherits="Novelty1.datecheck" %>

 

  datecheck

 

 

 

 

 

 

 

  

  

  

  

 

 

В листинге 12.2 элементы управления формы содержат директиву runat=server, которая указывает на выполнение сервером действий, определенных во вспомогательном коде datecheck.aspx.vb. В листинге 12.3 приведен фактически генерируемый HTML-код, который передается клиенту. Код серверного элемента управления никогда не передается клиенту. Клиент получает только HTML-результат выполнения сервером кода данного элемента управления.

ЛИСТИНГ 12.3. HTML-код клиента

 

  datecheck

 

 

 

 

 

 

 

 

  

    

 

 

В листинге 12.3 демонстрируется, что практически любая прикладная логика может быть сохранена на промежуточном уровне. В следующем разделе описываются способы работы с базой данных с помощью промежуточного уровня. Учтите, что подключение к базе данных и выполнение запроса организованы сложнее, чем проверка введенных данных.

 

Обработка данных на промежуточном уровне

 

До сих пор презентационный уровень описывался как визуальное представление приложения для клиента, а промежуточный уровень — как связующее звено (plumbing) между клиентом и основной частью приложения. Теперь пришло время показать роль окончательного уровня n-уровневой технологии, т.е. уровень данных. Обычно уровень данных состоит из базы данных, которая может иметь традиционную реляционную структуру, формат XML или формат файла INI. Далее в примерах этой главы в качестве хранилища данных используется SQL Server 2000.

В листинге 11.1 из главы 11, "Web-формы: приложения на основе ASP.NET для работы с базами данных", показан простой пример использования промежуточного уровня для подключения к базе данных, выполнения запроса и возвращения объекта в виде HTML-таблицы. Этот код никак не влияет на возвращаемые данные, а только отображает их. На самом деле запрос выполняется в базе данных. В листинге 12.4 повторяется код подпрограммы ShowCustomers из листинга 11.5, который в следующем примере используется в другом контексте.

ЛИСТИНГ 12.4. Код подпрограммы ShowCustomers

Private Sub ShowCustomers()

 ' Это простой пример использования функции,

 ' которая извлекает данные из таблицы tblCustomer

 ' и отображает их.

 ' Инициализация объекта подключения строкой

 ' подключения.

 Dim conn As New SqlConnection (connString)

 ' Затем инициализация объекта-команды

 ' строкой выполняемой команды SQL.

 Dim cmd As New SqlCommand("exec sp_GetCustomersOrders", conn)

 conn.Open()

 Dim dReader As SqlDataReader = _

  cmd.ExecuteReader(CommandBehavior.CloseConnection)

 While dReader.Read

  Response.Write(dReader.GetString(0))

  Response.Write(" " & dReader.GetString(1))

  Response.Write(" "& dReader.GetDateTime(2))

  Response.Write("
")

 End While

 dReader.Close()

 conn.Close ()

End Sub

Обратите внимание на использование хранимой процедуры sp_GetCustomeOrders, которая является типичным примером размещения прикладной логики на уровне данных приложения. Это сделано просто потому, что кратчайшее расстояние между двумя точками определяется прямой линией. Код, расположенный на сервере баз данных, компилируется для наиболее эффективного выполнения сервером. Поэтому в результате хранимая процедура, которая располагается на уровне данных, будет выполнена быстрее, чем хранимая процедура, которая располагается на промежуточном уровне.

Однако, к сожалению, хранимые процедуры можно использовать далеко не во всех ситуациях. Это ограничение наводит на мысль воспользоваться еще одним простым принципом определения кратчайшего пути как пути наименьшего сопротивления. В приведенном примере наименьшее сопротивление означает, что следующий уровень над уровнем данных используется для выполнения прикладной логики. Рассмотрим, как в многоуровневом приложении, где клиентский уровень используется только для отображения данных, можно реализовать остальные уровни.

 

Создание повторно используемых компонентов промежуточного уровня

В этом разделе описано создание простого запроса в виде повторно используемого объекта. Основная цель данного примера — продемонстрировать способ создания функции в одном месте и использования ее сразу в нескольких приложениях. Создайте новый или откройте уже имеющийся проект Visual Basic .NET. Щелкните правой кнопкой мыши на имени проекта в окне Solution Explorer и выберите в контекстном меню команду Add→Add Component. В диалоговом окне Add New Item в текстовом поле Name введите имя нового компонента GetRowCount.vb.

НА ЗАМЕТКУ

Коды всех примеров в этой и предыдущей главах основаны на решении Novelty1. Пространство имен Novelty1 используется в остальных примерах данной главы.

После создания пустого компонента нужно включить в него код функции GetRowCount, которая возвращает целочисленное значение с количеством записей в таблице tblCustomers базы данных Novelty. В листинге 12.5 приведен полный код этого компонента.

ЛИСТИНГ 12.5. Код компонента GetRowCount.vb

Imports System.Data

Imports System.Data.SqlClient

Public Class GetRowCount

 Inherits System.ComponentModel.Component

 Public Function GetRowCount() As Integer

  Try

   Dim connString As String

   ' Помните обсуждение в главе 11 функции

   ' String.Intern? Если в памяти уже есть строка

   ' с тем же значением, то вместо создания нового

   ' экземпляра будет использована ссылка на нее.

   connString = _

    "server=(local);database=Novelty;TRUSTED_CONNECTION=Yes"

   Dim conn As New SqlConnection(connString)

   Dim cmd As New SqlCommand("select count(*) from tblCustomer", conn)

   conn.Open() Dim dReader As SqlDataReader = _

    cmd.ExecuteReader(CommandBehavior.CloseConnection)

   While dReader.Read

    ' Включить первую и единственную запись

    ' в результирующий набор.

    GetRowCount = dReader.GetValue(0)

   End While

   dReader.Close()

   conn.Close()

  Catch

   System.Console.WriteLine("An error has occurred " & Err.Description)

  End Try

 End Function

#Region " Component Designer generated code "

 Public Sub New(ByVal Container As System.ComponentModel.IContainer)

  MyClass.New()

  ' Код, созданный конструктором компонентов.

  Container.Add(Me)

 End Sub

 Public Sub New()

  MyBase.New()

  ' Вызов метода, созданный конструктором компонентов.

  InitializeComponent()

  ' Инициализация после вызова метода

  InitializeComponent().

 End Sub

 ' Переопределение метода Dispose для очистки списка компонентов.

 Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)

  If disposing Then

   If Not (components Is Nothing) Then

    components.Dispose()

   End If

  End If

  MyBase.Dispose(disposing)

 End Sub

 ' Код, созданный конструктором компонентов.

 Private components As System.ComponentModel.IContainer

  ' ЗАМЕЧАНИЕ: Код, созданный конструктором компонентов.

  ' Его можно изменять только с помощью конструктора компонентов

  ' Не изменяйте его вручную в окне редактирования кода.

   _

   Private Sub InitializeComponent()

   components = New System.ComponentModel.Container()

  End Sub

#End Region

End Class

Более глубокое изучение иерархии наследования используемых компонентов выходит за рамки данной поэтому далее описывается лишь простой пример ее использования. Хотя в данном коде метод ToString не используется, но он применяется после компиляции вспомогательного кода. Для его применения нужно вставить в код строку Inherits System.ComponentModel.Component, которая позволяет использовать функции класса System.ComponentModel.Component, унаследованные от класса System.Object. Это наследование позволяет использовать функции данного класса без выполнения дополнительных действий.

Для компоновки нового компонента щелкните на его имени в окне Solution Explorer правой кнопкой мыши и выберите в контекстном меню команду Build. Теперь готовый компонент можно использовать, но как? Создайте Web-форму GetRowCountTest.aspx со вспомогательным кодом, который показан в листинге 12.6. Обратите внимание, что в самом начале кода используется строка импорта компонента Novelty1.GetRowCount с функциями компонента GetRowCount.

ЛИСТИНГ 12.6. Вспомогательный код GetRowCountTest.aspx.vb

Imports Novelty1.GetRowCount

Public Class GetRowCountTest Inherits System.Web.UI.Page

#Region " Web Form Designer Generated Code "

 ' Вызов метода, созданный конструктором компонентов.

  Private Sub InitializeComponent()

 End Sub

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

  ByVal e As System.EventArgs) Handles MyBase.Init

  ' CODEGEN: Этот вызов метода организован конструктором Web-форм.

  ' Не изменяйте его вручную в окне редактора кода. InitializeComponent()

 End Sub

#End Region

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

  ByVal e As System.EventArgs) Handles MyBase.Load

  Dim GRC As New GetRowCount()

  Response.Write(GRC.GetRowCount.ToString)

  GRC.Dispose()

 End Sub

End Class

Здесь совсем не обязательно вызывать метод Dispose, предназначенный для очистки памяти от уже не нужного объекта. Создав данную страницу и вставив в нее код, щелкните правой кнопкой мыши на ее имени в окне Solution Explorer и выберите в контекстном меню команду Build and Browse. После выполнения всех созданных сценариев и доступа к базе данных Novelty будет отображена Web-страница с числом 2000.

 

Использование компонента в другом приложении

Попробуем теперь использовать созданный компонент в совершенно другом приложении. Для этого нужно создать новое приложение Visual Basic .NET на основе шаблона Windows Application среды Visual Studio .NET и создать в нем ссылку на файл Novelty1.dll, который располагается в каталоге bin проекта Novelty1. При использовании компонента из другого пространства имен или другого проекта нужно помнить, что dll-файл компонента находится в каталоге bin своего проекта. Например, dll-файл Web-приложения с именем Web_приложение обычно находится в каталоге с:\inetpub\wwwroot\Web_приложение\bin.

Для указания ссылки на внешний компонент щелкните правой кнопкой мыши на элементе References в окне Solution Explorer и выберите в контекстном меню команду Add Reference. В диалоговом окне References щелкните на кнопке Browse и укажите dll-файл используемого компонента. Для закрытия диалогового окна References щелкните на кнопке OK. В данном примере предполагается, что dll-файл используемого компонента Novelty1.dll находится в каталоге c:\inetpub\wwwroot\ Novelty1\bin.

Здесь следует напомнить, что, как и при работе с прежним приложением Windows, после указания директивы Imports его пространство имен становится полностью доступным. В общем вспомогательный код Web-формы из листинга 12.7 напоминает код из листинга 12.6. Он создан на основе шаблонного кода, сгенерированного конструктором Web-форм среды Visual Studio .NET.

Листинг 12.7. Вспомогательный код Web-формы Form1.vb

Imports Novelty1.GetRowCount

Public Class Form1

 Inherits System.Windows.Forms.Form

#Region " Windows Form Designer generated code "

 Public Sub New() MyBase.New()

  ' Этот вызов метода организован конструктором Web-форм.

  InitializeComponent()

  ' Инициализация после вызова метода InitializeComponent().

 End Sub

 ' Переопределение метода Dispose для очистки списка компонентов.

 Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)

  If disposing Then

   If Not (components Is Nothing) Then

    components.Dispose()

   End If

  End If

  MyBase.Dispose(disposing)

 End Sub

 ' Код, созданный конструктором Web-форм.

 Private components As System.ComponentModel.IContainer

 ' ЗАМЕЧАНИЕ: Код, созданный конструктором компонентов.

 ' Его можно изменять только с помощью конструктора

 ' Не изменяйте его вручную в окне редактирования кода.

 Friend WithEvents Label1 As System.Windows.Forms.Label

 Friend WithEvents Button1 As System.Windows.Forms.Button

  _

  Private Sub InitializeComponent()

  Me.Label1 = New System.Windows.Forms.Label()

  Me.Button1 = New System.Windows.Forms.Button()

  Me.SuspendLayout()

  '

  ' Label1

  '

  Me.Label1.Location = New System.Drawing.Point(8, 16)

  Me.Label1.Name = "Label1"

  Me.Label1.Size = New System.Drawing.Size(248, 16)

  Me.Label1.Tablndex = 0

  Me.Label1.Text = "Label1"

  '

  ' Button1

  '

  Me.Button1.Location = New System.Drawing.Point(264, 8)

  Me.Button1.Next = "Button1"

  Me.Button1.Size = New System.Drawing.Size(72, 24)

  Me.Button1.TabIndex = 1

  Me.Button1.Text = "Test It!"

  '

  ' Form1

  '

  Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)

  Me.ClientSize = New System.Drawing.Size(344, 54)

  Me.Controls.AddRange(New System.Windows.Forms.Control() _

   {Me.Button1, Me.Label1})

  Me.Name = "Form1"

  Me.Text = "Form1"

  Me.ResumeLayout(False)

 End Sub

#End Region

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

  ByVal е As System.EventArgs) Handles Button1.Click

  Dim GRC As New Novelty1.GetRowCount()

  Label1.Text = "There are " & GRC.GetRowCount.ToString _

   & " rows in the table."

  GRC.Dispose ()

 End Sub

End Class

В код, созданный конструктором форм, добавлены только объекты Label1 и Button1. Текст надписи будет задан только во время выполнения приложения. Теперь можно приступить к созданию Web-службы.

 

Доступ к объектам с помощью Web-служб

 

Итак, мы приступаем к работе на совершенно новом уровне, т.е. с использованием Web-служб. С самого начала Web-среда рассматривалась как способ передачи данных между двумя точками. Именно эта исходная концепция способствовала развитию и популяризации Web-среды. Однако она обладала несколькими ограничениями и только недавно консорциум World Wide Web Consortium (W3C) начал реализовывать стандарты технологии обмена данными. Реализация Web-служб на платформе .NET основана именно на этих стандартах и использует язык XML для идентификации и передачи данных.

Допустим, что компания Jones Novelties, Incorporated решила предоставить другим компаниям быстрый доступ к своим данным без необходимости создания пользовательского интерфейса. Для решения этой задачи прекрасно подходят Web-службы.

Прежде чем приступить к решению этой бизнес-ситуации, следует привести основные сведения о Web-службах. Читатели с опытом создания Web-служб могут пропустить остаток этого раздела без ущерба для понимания остального материала или освежить свои знания, бегло познакомившись с ним.

По определению Web-службы – это объекты, которые обмениваются данными с помощью протоколов Internet, например HTTP. Причем для определения данных или набора выполняемых сервером инструкций используется XML. Эти инструкции также могут возвращать данные. Например, для включения нового пользователя с фамилией Doe и именем John в базу данных можно послать некому воображаемому Web-серверу www.someserver.com следующий запрос:

http://www.someserver.com/sevices/dataserver.asmx?op=AddUserToDB&FName= John&LName=Doe

В данном примере используется протокол HTTP и запрос GET для вызова службы dataserver, которая имеет функцию AddUserToDB с двумя параметрами – FName и LName. Было бы просто замечательно, если бы у нас был способ доступа к Web-службе и информирования о выполняемых действиях. К счастью, Microsoft вместе с несколькими другими компаниями предусмотрела эту возможность и создала язык определения Web-служб Web Services Description Language, или WSDL (эта аббревиатура произносится как английское словосочетание wiz-dull). WSDL способен анализировать код Web-службы и находить ту информацию, которую нужно сообщить пользователям (людям или машинам) о данной Web-службе и выполняемых ею функциях. Пример такой функции приводится далее, в разделе о программном способе доступа к Web-службе. 

Как уже отмечалось, доступ к Web-службе осуществляется с помощью HTTP-протокола (методы GET и POST). Основное различие между ними заключается в том, что при использовании GET параметры запроса передаются в URL-указателе, а при использовании POST – инкапсулируются внутри самого запроса.

Кроме того, для взаимодействия Web-служб разработан протокол объектного доступа Simple Object Access Protocol (SOAP), который позволяет Web-серверам обмениваться сообщениями с инструкциями запросов, заключенными в конверт (envelope). SOAP-конверт имеет формат XML, как показано в приведенном ниже примере.

 

 

   int

 

 

Для передачи такого запроса необходимо создать собственный Web-запрос и послать его серверу. К счастью, на платформе .NET в пространстве имен System.NET для выполнения этих действий предусмотрены специальные средства, которые существенно упрощают выполнение этой задачи.

Рассмотрим бизнес-ситуацию, для решения которой следовало бы применить Web-службы.

База данных содержит имена 100 тыс. человек в возрасте от 14 лет до 21 года. Вместе с этими данными хранятся постоянно обновляемые ответы посетителей Web-узла на ежедневно обновляемые вопросы. Допустим, что компания Pepsi хочет регулярно знакомиться с результатами таких опросов, например за 1 млн долларов в месяц. Как предоставить ей доступ к вашей базе данных? Именно в такой ситуации пригодятся Web-службы.

Приведем еще один сценарий.

Допустим, что некий Web-узел выполняет аутентификацию входа на другие Web-узлы, которые платят ежемесячную абонентную плату и предоставляют пароль и учетное имя для создания cookie-файлов на клиентских компьютерах с обозначением аутентификации пользователей. Похоже на службу Microsoft Passport, не так ли? В этой ситуации также пригодятся Web-службы.

Web-службы дают разработчику возможность публиковать свои функции в Web-среде (Internet) или корпоративной среде (intranet), которые входят в состав других приложений или баз данных и располагаются на том же или на другом компьютере, о которых разработчик может даже не подозревать. Web-службы, по сути, стали именно тем, для чего разрабатывались COM-компоненты, но Web-службы можно вызывать с любого компьютера, подключенного к Internet или внутренней сети под управлением любой операционной системы.

Итак, продолжим работу с нашим компонентом и включим в него дополнительную внешнюю функцию.

 

Публикация существующего компонента с помощью Web-службы

В большинстве случаев для публикации функций существующего компонента с помощью Web-службы достаточно поместить соответствующий код в Web-службе в виде открытого метода с возвращаемым значением. Например, для публикации с помощью Web-службы метода GetRowCount класса GetRowCount из предыдущего примера выполните перечисленные ниже действия.

1. В проекте Novelty1 создайте новую Web-службу NoveltyServices.asmx.

НА ЗАМЕТКУ

Для работы с компонентом из другого пространства имен следует создать ссылку на него, как описывается выше в главе, в разделе об использовании компонента из другого приложения.

2. В файле NoveltyServices.asmx вставьте код нового Web-метода ShowGetRowCount, который приведен в листинге 12.8.

3. Добавьте в тело метода ShowGetRowCount три строки кода, как показано в листинге 12.8.

4. Щелкните правой кнопкой мыши на имени решения в окне Solution Explorer и выберите в контекстном меню команду Build для компоновки решения.

5. После компоновки решения щелкните правой кнопкой мыши на файле NoveltyServices.asmx и выберите в контекстном меню команду View in Browser (Просмотр в окне Web-броузера).

6. Сразу после загрузки Web-страницы полученной Web-службы NoveltyServices щелкните на гипертекстовой ссылке ShowGetRowCount в верхней части Web-страницы.

7. Убедитесь в правильности полученных результатов. (Сначала в окне Web-броузера появится описание данной Web-службы с предложением проверить ее работоспособность, щелкнув на кнопке Invoke (Вызвать Web-службу). Щелкните на этой кнопке, и в окне Web-броузера появится XML-файл с приведенными ниже строками.

2000

Здесь значение 2000 типа int – это результат выполнения метода ShowGetRowCount Web-службы NoveltyServices. — Прим. ред.)

ЛИСТИНГ 12.8. Файл NoveltyServices.asmx

Imports System.Web.Services

Imports Novelty1.GetRowCount

_

 Public Class NoveltyServices

 Inherits System.Web.Services.WebService

#Region " Web Services Designer Generated Code "

 Public Sub New()

  MyBase.New()

  ' Этот вызов метода организован конструктором Web-служб.

  InitializeComponent()

  ' Инициализация после вызова метода

  InitializeComponent().

 End Sub

 ' Код, созданный конструктором Web-служб.

 Private components As System.ComponentModel.IContainer

 ' ЗАМЕЧАНИЕ: Код, созданный конструктором компонентов.

 ' Его можно изменить только с помощью конструктора Web-служб.

 ' Не изменяйте его вручную в окне редактирования кода.

  _

  Private Sub InitializeComponent()

  components = New System.ComponentModel.Container()

 End Sub

 Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)

  ' CODEGEN: Этот вызов метода организован конструктором Web-служб.

  ' Не изменяйте его вручную в окне редактора кода.

  If disposing Then

   If Not (components Is Nothing) Then

    components.Dispose()

   End If

  End If

  MyBase.Dispose(disposing)

 End Sub

#End Region

  Public Function ShowGetRowCount() As Integer

  ' Эти строки кода остались неизменными.

  Dim GRC As New GetRowCount()

  ShowGetRowCount = GRC.GetRowCount GRC.Dispose()

 End Function

End Class

Вот и все. Теперь после размещения этого кода на открытом Web-сервере любой пользователь может с помощью Web-броузера открыть данную Web-страницу и выполнить указанный метод. Обычно эта цель достигается программными средствами, а не вручную. В следующем разделе рассматривается пример такой ситуации.

 

Доступ к Web-службе программными средствами

Попробуем теперь использовать созданную Web-службу программными средствами из другого приложения, будь то обычное приложение Windows или Web-приложение.

Для соединения с Web-службой нужно создать Web-ссылку. Для создания такого соединения можно послать простой GET-запрос на основе протокола HTTP, который обычно заканчивается вопросительным знаком (?) с параметрами, разделенными амперсандами (&), например: http://search.yahoo.com/bin/search?p=VB.Net&VS.Net.

Кроме того, для создания соединения можно послать простой POST-запрос на основе протокола HTTP, параметры которого передаются в HTTP-заголовках. Еще один способ основан на применении протокола SOAP, благодаря которому Web-серверу посылается специализированный XML-файл, а Web-служба, в свою очередь, возвращает специализированный XML-файл в контейнере, заданном в SOAP-запросе.

Рис. 12.1. Диалоговое окно Add Web Reference  

Для демонстрации программного доступа к Web-службе создайте проект нового консольного приложения Visual Basic .NET на основе шаблона Console Application среды Visual Studi o.NET. Учтите, что основные принципы доступа к Web-службе остаются одинаковыми независимо от типа проекта. После создания проекта щелкните правой кнопкой мыши на элементе References в окне Solution Explorer и в контекстном меню выберите команду Add Web Reference (Создать Web-ссылку). На экране появится диалоговое окно Add Web Reference (рис. 12.1). Укажите в текстовом поле Address (Адрес) URL-указатель используемой Web-службы и нажмите клавишу . После этого в правой части диалогового окна Add Web Reference сразу же появится описание Web-службы NoveltyServices (см. рис. 12.1). Такой результат получается благодаря языку WSDL, который вставляет метаданные с описанием Web-службы в ее код. Щелкните на кнопке Add Reference для закрытия данного диалогового окна и вставки созданной ссылки в проект консольного приложения. В окне Solution Explorer теперь появится новая Web-ссылка, аналогичная показанной на рис. 12.2.

РИС. 12.2. Новая Web-ссылка в окне Solution Explorer

НА ЗАМЕТКУ

Если доступа каталогу или Web-серверу нужно пройти аутентификацию, то код нужно разместить в приложении, а не в Web-службе.

Теперь, после создания Web-ссылки, остается только включить в код консольного приложения три строки, которые показаны в листинге 12.9 с полным кодом основного модуля Module1.vb консольного приложения ConsoleApplication1.

ЛИСТИНГ 12.9. Код основного модуля Module1.vb

Module Module1

 Sub Main()

  Dim GRC As New localhost.NoveltyServices()

  Try

   System.Console.WriteLine(GRC.ShowGetRowCount.ToString)

   GRC.Dispose()

  Catch

   System.Console.WriteLine(Err.Description)

  End Try

 End Sub

End Module

Здесь объект GRC обозначает Web-службу localhost.NoveltyServices(). Дело в том, что в данном примере используется локальный Web-сервер localhost, который в листинге 12.8 играет роль пространства имен для данной Web-службы. Учтите, что пространства имен должны иметь уникальные имена (например, название вашей компании) или полностью квалифицированное имя домена, на котором располагаются ваши Web-службы. Например, сотрудники компании Microsoft могут использовать в качестве имени для пространства имен адрес www.microsoft.com. Тогда объявление нового объекта objectname в данном пространстве имен будет иметь следующий вид:

new www.microsoft.com.objectname

После вставки дополнительных строк кода в основной модуль Module1.vb и указания Web-ссылки на Web-службу можно скомпоновать все решение. Для этого щелкните правой кнопкой мыши на имени решения в окне Solution Explorer и выберите в контекстном меню команду Build Solution. Для запуска полученного приложения откройте консольное окно Windows и в режиме командной строки укажите каталог проектов VS.NET, который по умолчанию имеет вид

C:\Documents and Settings\ <имя_лользователя> \Му Documents\Visual Studio Projects

Далее найдите в основном каталоге этого консольного приложения (т.е. в каталоге ConsoleApplication1 в данном примере) его подчиненный каталог bin. В нем содержится выполняемый файл проекта ConsoleApplication1.exe. Введите в командной строке путь к нему, имя, а затем нажмите клавишу .

C:\Documents and Settings\<имя_пользователя>\Му Documents\Visual Studio Projects\ConsoleApplication1\bin\ConsoleApplication1.exe

Спустя несколько секунд в командной строке появится результат выполнения консольного приложения и вызванной им Web-службы, а именно: количество записей в таблице tblCustomer базы данных Novelty.

 

Заключительные замечания

В последних главах описываются и демонстрируются на примерах несколько технологий, предназначенных для достижения одной цели: максимально эффективного использования базы данных для экономии денежных средств. Использование новых технологий для экономии денежных средств — это довольно спорный путь, потому что часто сами понятия новая технология и экономия денежных средств являются взаимно исключающими.

С самого начала книги, где рассматривались этапы планирования и создания базы данных, и до последних страниц, где описываются способы расширения функциональности приложения за счет повторно используемого кода и Web-служб, авторы преследовали одну и туже цель, а именно: создать надежное приложение с помощью наиболее эффективных средств. Многие примеры из этой книги можно буквально скопировать и вставить в приложение, используя практически без всяких изменений (не считая строк запросов). Авторы уверены, что использование представленной информации позволит читателям успешно создавать и размещать приложения с помощью Visual Basic .NET и SQL Server на основе традиционной технологии клиент/сервер ("толстый" клиент + Windows-формы) или Web-ориентированной технологии ("тонкий" клиент + Web-формы).

 

Резюме

В этой главе описываются способы организации и реализации промежуточного уровня для повышения производительности приложения и повторного использования кода. Здесь показано, как повторно используемый компонент можно применить с помощью Web-службы практически в любом приложении. Все эти важные концепции автор постарался изложить в максимально сжатом виде, чтобы читатель смог убедиться в простоте их реализации без дополнительных затрат времени и усилий на изучение всех тонкостей этого процесса.

 

Вопросы и ответы

Можно ли вызывать Web-службы из языка Java?

Да. В языке программирования Java предусмотрена библиотека классов java.net, предназначенная для подключения к Web-службе (по заданному URL-указателю посредством протокола HTTP), которая работает на платформе .NET. Для синтаксического анализа полученного результата в языке программирования Java применяются специализированные классы для работы с XML-файлами.

Как опубликовать Web-службу через брандмауэр?

Web-службы обычно доступны через порт 80 (который используется для HTTP), поэтому, с точки зрения системного администратора, для них нет никаких ограничений. На самом низком уровне Web-служба — это не что иное, как Web-страница без графического интерфейса пользователя. Что касается программного доступа, то, конечно, можно создать несколько методов аутентификации доступа на Web-сервер.

Содержание