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

Шаблон проекта базы данных автоматически создает две папки для хранения сценариев SQL. Папка Create Scripts (Сценарии создания данных) содержит сценарии SQL, которые отражают предполагаемые изменения в базе данных. Изменения могут быть отложены, так как разработчик не имеет достаточных полномочий для изменения рабочей базы данных (иногда это бывает весьма полезно) или несколько изменений предполагается объединить и внести одновременно.

Любой сценарий SQL можно создать вручную, щелкнув правой кнопкой мыши на имени папки (или имени проекта) в окне Solution Explorer, а затем выбрав в контекстном меню команду Add New Item (Создать новый элемент) или Add SQL Script (Создать сценарий SQL). Выбрав один из стандартных шаблонов сценариев (рис. 8.2), их можно отредактировать вручную в редакторе Visual Studio .NET.

РИС. 8.2. Стандартные шаблоны сценариев SQL в диалоговом окне Add New Item

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

Сценарии создания данных

Как уже упоминалось ранее, папка 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 (Создать один файл).

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

Для внесения изменений в базу данных с помощью сценария 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, которые способны распознать такие файлы. Например, командный файл можно применить для загрузки данных во вновь созданную таблицу, экспортируя данные из уже существующей базы данных.

Итак, попробуем создать один командный файл, чтобы автоматически запустить все сценарии для создания совершенно новой версии базы данных 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.

@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

Данный командный файл можно запустить в окне Solution Explorer, щелкнув на нем правой кнопкой мыши и выбрав в контекстном меню команду Run. Его также можно выполнить извне, независимо от Visual Studio .NET, аналогично другим командным файлам.