Структура языка SQL

Введение
Глава 1. Описание SQL
1.1 Применение языка SQL
Глава 2. Выражения SQL
2.1 Использование выражения SELECT
2.2 Простые формы SELECT
2.3 Фильтрация данных с помощью предложения WHERE
2.4 Операторы, применяемые в предложении WHERE
2.5 Оператор BETWEEN
2.6 Оператор IN
2.7 Логические операторы
2.8 Предложение WHERE и вложенные команды SELECT
2.9 Сортировка данных
2.10 Группировка столбцов
2.11 Использование предложения HAVING
2.12 Объединение таблиц
2.13 Оператор INNER JOIN
2.14 Оператор LEFT JOIN
2.15 Оператор RIGHT JOIN
1.2.15 Объединение запросов
2.17 Переименование столбцов результата
2.18 Добавление записей
2.19 Обновление данных
2.20 Удаление данных
2.21 Вызов функций из команд SQL
2.22 Хранимые процедуры
Глава 3. Создание запросов
3.1 Создание запросов в базах данных
Заключение
Приложения
Приложение 1 Таблицы, используемые в базе.
Приложение 2 Запросы, используемые в приложении
Приложение 3 Формы, используемые в приложении
Глоссарий
Листинг программы
Список использованных источников

Понятно, что при запуске процедур на сервере (который, как правило, намного более производителен по сравнению с персональными станциями) прикладная программа будет выполняться существенно быстрее. Этот вывод справедлив даже в том случае, если Access 2002 работает на том же компьютере, что и ваше приложение, поскольку хранимые процедуры выполняются непосредственно ядром Access. А именованные интерфейсы обеспечивают настолько же простые возможности обращения к хранимым процедурам, как и при использовании обычных функций. Вы передаете значения аргументов, затем определенные вами операции выполняются и возвращают требуемые результаты. Процедуры хранятся в базе данных, в коллекции Procedures, входящей в состав объекта Catalog. Каждый элемент коллекции Procedures — это объект класса Procedure.
Объект Procedure содержит атрибуты DateCreated, DateModified, Name и
Command.
Command — это объект данных, содержащий собственно код тела процедуры. Хотя хранимые процедуры, на самом деле, физически располагаются в одной из системных таблиц базы данных — доступ к процедурам вы получаете с помощью коллекции Procedures объекта Catalog. Прежде чем воспользоваться процедурой, ее необходимо создать и добавить в объект Catalog.
Синтаксис определения хранимой процедуры.
PARAMETERS [Параметр!] Тип {, [Параметр2] Тип, . . . } ;
После служебного слова PARAMETERS следует список пар Параметр Тлп, определяющих интерфейс процедуры. Объем списка не ограничен. Квадратные скобки в данном случае служат составной частью конструкции, а не признаком необязательности синтаксического элемента. Список параметров завершается символом точки с запятой, после которого набирается текст тела процедуры на языке SQL.
Примеры хранимых процедур:
1: PARAMETERS [APublisher] TEXT;
2: SELECT First_Name + •' ' + Last_Name As Artist, Title,_
Format, Publisher
3: FROM Music WHERE Publisher = [APublisher]
4:
5: PARAMETERS [APublisher] TEXT, [AFormat] TEXT;
6: SELECT First_Name + ' ' + Last_Name As Artist, Title,_
Format, Publisher
7: FROM Music
8: WHERE Publisher = [APublisher] AND Format = [AFormat]
Строки 1-3 задают текст первой процедуры — далее показано, как
в виде единой строки он присваивается переменной-свойству Command-
Text объекта ADODB. Command. Процедура принимает текстовое значение,
переданное в качестве параметра [APublisher], и отбирает все строки
таблицы MUSIC, содержимое поля PUBLISHER которых равно значению
параметра. Текст второй процедуры приведен в строках 5—8. Она выпол-
няет схожую операцию, но работает уже с двумя аргументами ([APublisher] и [AFormat]), задающими искомые значения полей PUBLISHER И FORMAT.
Чтобы хранимая процедура стала доступной для использования, ее следует добавить в базу данных с помощью свойств и методов объектов ADODB. Command и ADODB.Catalog.
Пример добавления хранимой процедуры в базу данных
Sub CreateStoredProcedure( )
Dim Connection As ADODB.Connection
Set Connection = CurrentProject.Connection
Dim Command As New ADODB.Command
Dim Catalog As New ADOX.Catalog
Set Command.ActiveConnection = Connection
Command.CommandText = "PARAMETERS [APublisher] TEXT;" &
"SELECT ARTIST, TITLE, FORMAT," &
"PUBLISHER FROM Music WHERE Publisher = [APublisher]"
Set Catalog.ActiveConnection = Connection
Call Catalog.Procedures.Append I
Set Command = Nothing
Set Catalog = Nothing
Set Connection = Nothing
End Sub
Когда хранимая процедура создана, можно обращаться к ней в любой
момент по мере надобности. Чтобы выполнить процедуру, следует воспользоваться методом Execute класса Command. Если хранимая процедура возвращает некий набор данных, надлежит присвоить результат выполнения метода Execute переменной класса ADODB.Recordset. Если же хранимая процедура выполняет команды SQL (такие как INSERT, DELETE или UPDATE), не возвращающие значений или наборов данных, объект Recordset не нужен.
Пример выполнения хранимой процедуры
Sub ExecuteProcedureI
Dim Connection As ADODB.Connection
Set Connection = CurrentProject.Connection
Dim Catalog As New ADOX.Catalog
Set Catalog.ActiveConnection = Connection
Dim Command As ADODB.Command
Set Command = Catalog.Procedures("Artist By Publisher").Command
Dim Publishers As ADODB.Recordset
Dim RecordsAffected As Long
Command.Parameters ("[APublisher]").Value = "Elektra'
Set Publishers = Command.Execute()
Publishers.MoveFirst
Do While RecordSet.EOF = False
Debug.Print Publishers( "Artist" )
Publishers.MoveNext
Loop
Publishers.Close
Set Publishers = Nothing
Set Command = Nothing
Set Catalog = Nothing
Set Connection = Nothing
End Sub
Глава 3. Создание запросов
3.1 Создание запросов в базах данных
В проектах Access SQL можно использовать тремя способами: создавать соединения с SQL-базами данных, преобразовывать базы данных Access в формат SQL Server, устанавливать связь с SQL-таблицами, используя команду Файл^Внешние данные^Связь (File^Get Externel DataOLink). Выбор зависит от целей проекта и условий его разработки. Для повышения надежности, вероятно имеет смысл использовать формат SQL Server. А если для работы требуется всего лишь некоторые данные из другой базы данных, достаточно создать связь с таблицей или использовать объект Connection.
После того как доступ к данным SQL Server обеспечен, работа с такой базой данных, по большому счету, не будет отличаться от работы с данными Access. Необходимо получить объект Recordset, определить запрос в зависимости от требуемой операции и открыть набор записей. С этого момента управление данными происходит так же, как и в Access — с помощью SQL или VBA-кода либо их комбинации.
Заключение.
В данном проекте была разработана программа для библиотеки.
Программа была разработана с помощью Microsoft Access.
Программа позволяет просматривать данные, получать необходимые отчеты.
Программа работает под управлением операционной системы Windows, что позволяет использовать продукт на большинстве пользовательских компьютеров.
Необходимо помнить, что почти каждая система управления базами данных снабжена собственным диалектом SQL. Поэтому бывает необходимость воспользоваться специальными руководствами и фирменной документацией.
Преимущества от внедрения баз данных Access:
- Доступ к данным из различных источников и их использование
- Использование данных различных форматов из различных программ в знакомом интерфейсе.
- Включение данных из различных источников. Access 2003 поддерживает различные форматы данных, в том числе XML, OLE, ODBC и формат служб Microsoft Windows® SharePoint™ Services.
- Связи между бизнес-системами. Можно связать таблицы таким образом, чтобы одновременно получать доступ к данным из различных баз, работая с формами, отчетами и страницами доступа к данным в Access 2003. Кроме того, можно связывать таблицы из других баз данных Access, электронных таблиц Microsoft Excel, источников данных ODBC, баз данных Microsoft SQL Server™ и других источников.
- Максимально эффективное использование корпоративных данных. Можно включить данные Microsoft SQL Server в решения баз данных Access. Используйте конструктор сохраненных процедур для создания и изменения простых процедур, сохраняемых в SQL Server, — и вам не придется изучать Transact SQL.
- Сокращение числа ошибок и своевременное получение помощи.
- Новый внешний вид форм. Access 2003 поддерживает темы из Microsoft Windows XP, что обеспечивает единый внешний вид форм.
- Просмотр сведений о зависимостях. Можно быстро находить таблицы, запросы, формы и отчеты, которые связаны зависимостью с конкретным объектом база данных Access.
- Помощь в устранении ошибок. Новая функция проверки ошибок помечает общие ошибки в формах и отчетах, существенно ускоряя процесс тестирования и исправления. После того как ошибки помечены, пользователю предлагаются варианты их исправления, что значительно экономит время и повышает качество форм и отчетов.
- Автоматическое обновление свойств. При изменении свойства поля в таблице может быть выполнено автоматическое изменение всех форм и отчетов, чьи элементы управления связаны с ней.
- Мощные функции анализа данных.
- Простота архивирования данных. Access 2003 позволяет сохранить в другом месте копию базы данных, с которой вы работаете.
- Создание форм и отчетов, которые можно сохранять в предыдущих версиях Access, значительно упрощает совместное использование данных.
- Более эффективное совместное использование данных.
- Разработка веб-страниц с использованием мощных программных средств. Можно публиковать формы и отчеты в Интернете и связывать их с источником записей для отображения и обновления данных в исходной базе данных и работы с ними.
- Использование совместимых форматов файлов.
Приложения.
Приложение 1 Таблицы, используемые в базе.
В данной базе данных ведется учет книг.
Данные можно редактировать непосредственно в таблицах (рис.1) или с помощью форм (рис. 2).
Рис.1. Таблицы базы данных.
Рис.2. Формы базы данных.
В данной базе для хранения данных используются следующие таблицы:
autors:
Рис.3. Таблица «authors»
В таблице «authors» хранятся имена писателей.
shkaf:
Рис.4. Таблица «shkaf»
В таблице «shkaf» хранятся номера шкафов, в которых хранятся книги.
books:
Рис.5. Таблица «books»
В таблице «books» хранятся шифр книги, ее название, уникальный номер автора, год издания и номер шкафа, в котором хранится книга.
Таблицы в базе данных связаны между собой:
Рис. 6. Схема данных
Приложение 2 Запросы, используемые в приложении
Запросы используются для выборки определенных данных.
Рис. 7. Список запросов
Zapros1 – запрос для выборки местонахождения книг по автору или названию книги:
SELECT shkaf.number, authors.id AS authid, books.id, books.name
FROM shkaf, authors, books
WHERE books.idshkaf=shkaf.id and books.idauther=authors.id;
Zapros2 – запрос для выборки книг определенного автора:
SELECT authors.id AS authid, books.*
FROM authors, books
WHERE books.idauther=authors.id;
Zapros3 – запрос для выборки книг
SELECT * FROM books WHERE 1;
Приложение 3 Формы, используемые в приложении
Для заполнения таблиц используются следующие формы:
Меню:
Рис. 8. Форма «Основная форма программы»
Рис. 9. Форма для ввода авторов
Рис. 10. Форма для ввода номеров шкафов
Рис. 11. Форма для ввода записей о книгах
Рис. 12. Поиск местонахождения книги по автору и названию
Рис. 13. Выборка книг определенного автора
Рис. 14. Выборка книг по году издания
Глоссарий
№ Новое понятие Содержание 1 Microsoft Access реляционная СУБД корпорации Microsoft, обладает интуитивно понятным интерфейсом. 2 MS SQL SERVER 3 SQL (англ. Structured Query Language — язык структурированных запросов) — универсальный компьютерный язык, применяемый для создания, модификации и управления данными в реляционных базах данных. 4 VBA Visual Basic for Applications (VBA, Visual Basic для приложений) — немного упрощённая реализация языка программирования Visual Basic, встроенная в линейку продуктов Microsoft Office (включая версии для Mac OS), а также во многие другие программные пакеты, такие как AutoCAD, WordPerfect и ESRI ArcGIS. VBA покрывает и расширяет функциональность ранее использовавшихся специализированных макро-языков, таких как WordBasic. 5 Группировка Группировка данных по столбцам, применяется в тех случаях, когда необходимо получить только одну строку из группы строк, в определенных столбцах которых хранятся идентичные значения. 6 Запрос это формулирование своей информационной необходимости пользователем некоторой поисковой системы. Для составления запроса используется язык поисковых запросов. 7 Процедура поименованная или иным образом идентифицированная часть компьютерной программы, содержащая описание определённого набора действий. Процедура может быть многократно вызвана из разных частей программы. 8 Сортировка упорядочивание возвращаемых наборов данных по убыванию или возрастанию значений полей. 9 Форма Объект Microsoft Access, предназначена для разработки интерфейса приложений 10 Функция один из видов подпрограммы. Особенность, отличающая её от другого вида подпрограмм — процедуры, состоит в том, что функция возвращает значение, а её вызов может использоваться в программе как выражение.
Листинг программы
Код основной формы программы
VERSION 1.0 CLASS
BEGIN
MultiUse = -1 'True
END
Attribute VB_Name = "Form_Меню"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = True
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Option Compare Database
'Открыть форму добавления авторов
Private Sub But_AddAuthor_Click()
On Error GoTo Err_But_AddAuthor_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "authors" 'название формы
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_But_AddAuthor_Click:
Exit Sub
Err_But_AddAuthor_Click:
MsgBox Err.Description
Resume Exit_But_AddAuthor_Click

End Sub
'Открыть форму добавления номеров шкафов
Private Sub But_AddShkaf_Click()
On Error GoTo Err_But_AddShkaf_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "shkaf"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_But_AddShkaf_Click:
Exit Sub
Err_But_AddShkaf_Click:
MsgBox Err.Description
Resume Exit_But_AddShkaf_Click

End Sub
'Открыть форму добавления книг
Private Sub But_AddBook_Click()
On Error GoTo Err_But_AddBook_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "books"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_But_AddBook_Click:
Exit Sub
Err_But_AddBook_Click:
MsgBox Err.Description
Resume Exit_But_AddBook_Click

End Sub
'Выборка данных
Private Sub ButFind_Click()
On Error GoTo Err_ButFind_Click
Dim stDocName As String
Dim stLinkCriteria As String
Dim num As Integer
'Определение метода выборки данных (1,2,3)
num = GroupFind.Value

stLinkCriteria = ""


Select Case num
'Поиск местонахождения по автору или названию
Case 1:
stDocName = "Zapros1" 'название формы
stLinkCr1 = ""
stLinkCr2 = ""

'формирование фильтра
If Me![author1] <> "" And Me![author1] <> 1 Then
stLinkCr1 = "[authid]=" & Me![author1]
End If

If stLinkCr1 <> "" Then
If Me![name] <> "" And Me![name] <> 1 Then
stLinkCr2 = "[id]=" & Me![name]
stLinkCriteria = stLinkCr1 & " OR " & stLinkCr2
End If
Else
If Me![name] <> "" And Me![name] <> 1 Then
stLinkCr2 = "[id]=" & Me![name]
stLinkCriteria = stLinkCr2
End If
End If
If stLinkCriteria <> "" Then
stLinkCriteria = "(" & stLinkCriteria & ") and [id]<>1"
End If

'Выборка данных по определенному автору
Case 2:
stDocName = "Zapros2" 'название открываемой формы

'формирование фильтра
If Me![author2] <> "" And Me![author2] <> 1 Then
stLinkCriteria = "[authid]=" & Me![author2]
Else
stLinkCriteria = "[authid]>1"
End If

'Выборка данных по году издания
Case 3:
stDocName = "Zapros3" 'название открываемой формы

'формирование фильтра
If Me![year1] > 1 And Me![year2] > 1 Then
stLinkCriteria = "year>1 and [year]>=" & Me![year1] & " and [year]<=" & Me![year2]
Else
stLinkCriteria = "[year]>1"
End If
End Select

'открываем форму с определенным фильтром
If stLinkCriteria <> "" Then
DoCmd.OpenForm stDocName, , , stLinkCriteria
Else
MsgBox "Не указан критерий выборки данных"
End If
Exit_ButFind_Click:
Exit Sub
Err_ButFind_Click:
MsgBox Err.Description
Resume Exit_ButFind_Click
End Sub
'Кнопка выхода из приложения
Private Sub ButExit_Click()
On Error GoTo Err_ButExit_Click
DoCmd.Quit
Exit_ButExit_Click:
Exit Sub
Err_ButExit_Click:
MsgBox Err.Description
Resume Exit_ButExit_Click

End Sub
Список использованных источников.
Карпов Борис «Microsoft Access 2000: справочник», С-Пб, «Питер», 2001г.
2. Робинсон С. «Microsoft Access 2000: Учебный курс»,С-Пб, «Питер», 2001 г.
3. Эйткен Питер «Разработка приложений на VBA в среде Office XP», С-Пб, «Вильямс», 2003г.
2