ТЕХНОЛОГИИ, использующиеся при выполнении лабораторных работ
Технологии, представленные в данном разделе, являются часто выполняемыми операциями при работе с основными объектами SQL Server Management Studio и MS Visual Studio. Список технологий представлен в таблице 1. Освоение этих операций поможет студентам при выполнении курсового проекта по дисциплине ИСРКЭС. Таблица 1 – Список технологий
Технология 1 – Запуск и подключение к локальному серверу MS SQL server 1. В меню Пуск последовательно выберите пункты: Все программыà Microsoft SQL Server 2005 à Среда SQL Server Management Studio. 2. В открывшемся диалогом окне «Соединение с сервером» (рисунок 32) выполните следующие настройки: - в раскрывающемся списке «тип сервера» выберите Database Engines; - в раскрывающемся списке «имя сервера» выберите требуемый сервер, имя должно совпадать с именем вашего компьютера. Если имя в списке отсутствует, его можно ввести в поле списка. - в раскрывающемся списке «проверка подлинности» следует выбрать метод аутентификации устанавливаемого соединения. (в нашем случае выберите «Аутентификация SQL Server) - в полях «имя входа» и «пароль» введите соответственно: Имя входа – sa, пароль – sq Рисунок 32 – Соединение с сервером Технология 2 – Создание новой БД на сервере MS SQL server 1. Щелкнуть правой кнопкой мыши по контейнеру Database в Object Explorer и в контекстном меню выбрать New Database (Новая база). Откроется диалоговое окно New Database, изображенное на рисунке 33, в котором на закладке Общие § ввести имя создаваемой базы данных МММ_ВашеФИО § указать путь к Вашей папке для хранения файла БД и журнала БД (рисунок 33) § Остальные параметры пока оставим по умолчанию Рисунок 33 – Задание места для хранения БД и журнала БД На закладке Параметры
2. В окне создания БД нажмите ОК. Технология 3 – Создание первичного ключа в таблице Для создания первичного ключа выделите столбец, который будет ключом и нажмите на панели инструментов кнопку «Первичный ключ» (рисунок 34) Рисунок 34 – Создание первичного ключа Технология 4 – Создание поля счетчика в таблице
Рисунок 35 – Создание счетчика
Технология 5 – Создание связей между таблицами
Рисунок 36 – Создание связи между таблицами
Рисунок 37 – задание каскадного удаления и обновления Технология 6 – Изменение контекста на необходимую БД
Рисунок 38 – Окно базы данных в среде SSMS Технология 7 – Добавление конфигурационного файла приложения.
Технология 8 – Добавление описания строки подключения в конфигурационный файл приложения.
< connectionStrings> < clear /> < add name=" ПридумайтеИмяСтрокиПодключения" connectionString=" Data Source= Задайте имя вашего сервера SQL; Initial Catalog=Задайте имя вашей БД на сервере; User ID=Задайте имя пользователя; Password=задайте пароль пользователя" providerName = " System.Data.SqlClient" /> < /connectionStrings> Технология 9 – Создание экземпляра класса Connection 1. Запишите в строке кода: Dim ЗадайтеИмяОбъектаConnection Аs New SqlConnection
Технология 10 – Извлечение параметров соединения из конфигурационного файла по имени строки соединения
Dim setting1 As ConnectionStringSettings = ConfigurationManager.ConnectionStrings(" ЗадайтеЗдесьИмяСтрокиПодключенияИзФайлаКонфигурацииИзКоторой Вам НеобходимоПолучатьПараметры ") УкажитеИмяОбъектаConnection. ConnectionString = setting1.ConnectionString Технология 11 – Создание экземпляра класса Command
Dim ЗадайтеИмяОбъектаCommand As New SqlCommand ИмяОбъектаCommand. Connection = ИмяОбъектаConnection ИмяОбъектаCommand. CommandType ={Выбрать CommandType.Text или CommandType.StoredProcedure}
Технология 12 – Задание текста запроса для объекта Command
ИмяОбъектаCommand. CommandText = " insert into …………." Технология 13 – Создание объекта Command с параметрами
ИмяОбъектаCommand. CommandText = " insert into … values (@param1, @param2, …...)" 'Создание параметров и указание его значения ИмяОбъектаCommand. Parameters.Add(" @ ИмяПараметра ", Тип, длина (если необх.)) ИмяОбъектаCommand. Parameters(" @ ИмяПараметра ").Direction ={Выбрать ParameterDirection.Output илиParameterDirection.Input } ИмяОбъектаCommand. Parameters(" @ ИмяПараметра ").Value = {указать значение параметра или элемент управления из которого должно браться это значение} Технология 14 – Создание объекта Command, выполняющего хранимую процедуру
ИмяОбъектаCommand. commandType=CommandType.StoredProcedure ИмяОбъектаCommand. CommandText=“Имя хранимой процедуры” Технология 15 – Открытие подключения к базе данных
Технология 16 – Выполнение запроса, получающего единственное значение.
Технология 17 – Выполнение запроса, не возвращающего записей.
Технология 18 – Выполнение запроса, возвращающего набор записей
Dim ЗадайтеИмяОбъектаDataReader As SqlDataReader ИмяОбъектаDataReader = ИмяОбъектаCommand. ExecuteReader() While ИмяОбъектаDataReader. Read ‘ Выводим результат в какой-либо элемент управления TextBox1.Text = ИмяОбъектаDataReader (“ ЗадайтеИмяСтолбцаИзНабораДанных, КоторыйВамНеобходимоВывести ") End While ИмяОбъектаDataReader. Close() Технология 19 – Добавление нового источника данных
Технология 20 – Создание экземпляра класса DataSet
Dim ЗадайтеИмяОбъектаDataSet As New DataSet Технология 21 – Создание экземпляра класса DataAdapter 1. Запишите в строке кода: Dim ЗадайтеИмяОбъектаConnection As New SqlConnection Dim setting1 As ConnectionStringSettings = ConfigurationManager.ConnectionStrings(" ЗадайтеЗдесьИмяСтрокиПодключенияИзФайлаКонфигурацииИзКоторой Вам НеобходимоПолучатьПараметры ") ИмяОбъектаConnection. ConnectionString = setting1.ConnectionString Dim strSQL As String strSQL = " Задайте текст SQL-запроса на выборку названий из таблицы Магазины " Dim ЗадайтеИмяОбъектаDataAdapter As New SqlDataAdapter(strSQL, Con) Указание – для работы с конфигурационным файлом необходимо подключить библиотеку Project à Add Referencesà System.Configurationà ОК, если она еще не подключена Технология 22 – Вызов метода Fill объекта DataAdapter
ИмяПер-ойДатаАдаптер .Fill( ИмяПер-ойДатаСет )
Технология 23 – Вывод данных из объекта DataSet в окно сообщений
Dim R as Integer R = ИмяПер-ойДатаАдаптер. Fill(ИмяПер-ойДатаСет) if R> 0 then Dim row As DataRow For Each row In ИмяПер-ойДатаСет. Tables(0).Rows MsgBox(row(" ИмяНеобходимогоСтолбца ")) Next row End if
Технология 24 – Добавление элементов в список ListBox
ИмяСписка.Items.Add(“дoбaвляeмaя_cтpoкa”)
Технология 25 – Задание строки подключения и команды Select для DataAdapter
Dim ЗадайтеИмяОбъектаConnection As New SqlConnection Dim setting1 As ConnectionStringSettings = ConfigurationManager.ConnectionStrings(" ЗадайтеЗдесьИмяСтрокиПодключенияИзФайлаКонфигурацииИзКоторой Вам НеобходимоПолучатьПараметры ") ИмяОбъектаConnection. ConnectionString = setting1.ConnectionString Dim strSQL As String strSQL = " Задайте текст SQL-запроса на выборку всех данных из таблицы Магазины" Dim ЗадайтеИмяОбъектаCommand As New SqlCommand(strSQL, ИмяОбъектаConnection) ИмяОбъектаDataAdapter. SelectCommand = ИмяОбъектаCommand Технология 26 – Загрузка данных из объекта Dataset в DataGridView
DataGridView1.DataSource = ИмяОбъектаDataSet. Tables(НомерТаблицыВНаборе) Примечание – Нумеруются все таблицы, которые вы загружали в DataSet. Нумерация таблиц начинается с 0. Технология 27 – Создание экземпляра объекта DataRow
Dim ЗадайтеИмяОбъектаDataRow As DataRow = ИмяОбъектаDataSet. Tables(НомерТаблицыВНаборе).NewRow() Технология 28 – Присвоение значений объекту DataColumn
ИмяОбъектаDataRow. Item(0) = TextBox1.Text ИмяОбъектаDataRow. Item(1) = TextBox2.Text И.т.д. Технология 29 – Добавление строки к коллекции Rows таблицы Магазины
ИмяОбъектаDataSet. Tables(НомерТаблицыВНаборе).Rows.Add(ИмяОбъектаDataRow)
Технология 30 – Создание первичного ключа, запись значения выделенной ячейки в переменную
Dim ЗадайтеИмяМассиваПервичныхКлючей (1) As DataColumn ИмяМассиваПервичныхКлючей (0) = ИмяОбъектаDataSet. Tables(НомерТаблицыВНаборе).Columns(" код_магазина") ИмяОбъектаDataSet. Tables(НомерТаблицыВНаборе).PrimaryKey = ИмяМассиваПервичныхКлючей
Dim ЗадайтеИмяПеременойДляХраненияЗначенияАктивнойЯчейки As String = ИмяDataGridView. CurrentRow.Cells(" код_магазина").Value.ToString Технология 31 – Поиск строки для удаления по значению первичного ключа
Dim ЗадайтеИмяПеременойАктивнойСтроки As DataRow = ИмяОбъектаDataSet. Tables(НомерТаблицыВНаборе).Rows.Find(ИмяПеременойДляХранения-ЗначенияАктивнойЯчейки) Технология 32 – Удаление строки из коллекции Rows таблицы Магазины
ИмяПеременойАктивнойСтроки. Delete() Технология 33 – Создание экземпляра объекта SqlCommandBuilder
Dim ЗадайтеИмяОбъектаCommandBuilder As New SqlCommanBuilder(ИмяОбъектаDataAdapter) Технология 34 – Вызов метода Update и проверка количества обновленных строк
Dim ЗадайтеИмяПеременнойКоличестваОбновлСтрок As Integer = ИмяОбъектаDataAdapter. Update(ИмяОбъектаDataSet) If ИмяПеременнойКоличестваОбновлСтрок > 0 Then Создайте сообщение о успешном обновлении End If СПИСОК ЛИТЕРАТУРЫ 1. Баландин И. Майкрософт делает ставку на образование // Высшее образование в России. 2007. №6. С.18-22 2. Обзор программы MSDN AA // msdn.microsoft.com: сайт русского MSDN. http: //msdn.microsoft.com/ru-ru/academic/bb250623.aspx (дата обращения: 26.04.2010) 3. Платт, Д. Знакомство с Microsoft.NET. M.: Microsoft Press, 2001. – 240 c. 4. Платформа.NET Framework // msdn.microsoft.com: сайт русского MSDN. URL: http: //msdn.microsoft.com/ru-ru/netframework/default.aspx (дата обращения: 26.04.2010) 5. Рихтер, Дж. Программирование для Microsoft.NET Framework. M.: Microsoft Press, 2002. – 656 c. 6. Microsoft Learning // microsoft.com: сайт корпорации Microsoft. URL: http: //www.microsoft.com/learning (дата обращения: 26.04.2010)
|