Разработка базы данных

Автор работы: Пользователь скрыл имя, 20 Марта 2013 в 19:08, курсовая работа

Краткое описание

Целью этой работы является создать базу данных в СУБД ACCESS. Которая должна будет автоматизировать работу служащих аэропорта.

Содержание

Введение 3
1. Предметная область 4
1.1 Описание ER-модели 4
1.2 Реляционная модель 6
2. Основные понятия баз данных. 7
2.1 Базы данных и системы управления базами данных. 7
2.2 Состав СУБД. 9
2.3 Структура простейшей базы данных. 10
2.4 Свойства полей базы данных. 11
2.5 Типы данных. 13
2.6 Безопасность баз данных. 15
3. Проектирование баз данных. 16
3.1 Режимы работы с базами данных. 16
3.2 Объекты базы данных. 17
3.2.1 Таблицы. 17
3.2.2 Запросы. 17
3.2.3 Формы. 17
3.2.4 Отчеты. 18
3.2.5 Страницы. 18
3.2.6 Макросы и модули. 18
3.3 Проектирование базы данных. 19
3.3.1 Разработка технического задания. 19
3.3.2 Разработка структуры базы данных. 20
4. Реализация СУБД АЭРОпорт 23
Приложение №1 26
Приложение №2 27
Приложение №3 28
Приложение №4 29
Приложение №5 30
Приложение №6 31
Список использованной литературы 32

Вложенные файлы: 1 файл

baza_dannykh_kyrsovaya.doc

— 622.50 Кб (Скачать файл)

Рассмотрим код:

Private Sub butProtOff_Click()

setProtShift True MsgBox "Защита удалена!" & Chr(13) & Перезапустите базу данных!"

End Sub

Private Sub butProtOn_Click()

setProtShift False MsgBox "Защита установлена!" & Chr(13) & "Перезапустите базу данных!"

End Sub

Private Sub setProtShift(myFlag As Boolean)    dbChangeProperty "StartupForm",DB_TEXT, "пароль" – Первая форма(см. Приложение №6)

dbChangeProperty "StartupShowStatusBar", DB_BOOLEAN, myFlag – Нижняя полоска экрана

dbChangeProperty "AllowBuiltinToolbars", DB_BOOLEAN, myFlag – Панели инструментов

dbChangeProperty "AllowFullMenus", DB_BOOLEAN, myFlag –Меню таблиц, форм и т.п.

dbChangeProperty "AllowBreakIntoCode", DB_BOOLEAN, myFlag – Ошибки в модуле

dbChangeProperty "AllowSpecialKeys", DB_BOOLEAN, myFlag – Специальные ключи (CTRL+BREAK, ...)

dbChangeProperty "AllowBypassKey", DB_BOOLEAN, myFlag – Ключ Shift

End Sub

Function dbChangeProperty(strName As String, varType As Variant, varValue As Variant) As Boolean

Dim prp As Variant, dbs As Database

On Error GoTo 999 – Назначаем переход по ошибке

dbChangeProperty = False – Возвращаем результат при ошибке

Set dbs = CurrentDb – Выбираем базу

dbs.Properties(strName) = varValue – Присваиваем значение

dbChangeProperty = True – Возвращаем результат

Exit Function – Выходим из программы

999:If Err = 3270 Then  – Свойство не найдено

Set prp = dbs.CreateProperty(strName, varType, varValue) – Создаем свойство

 dbs.Properties.Append prp – Добавляем свойство

Err.Clear – Очищаем поток от ошибки

Resume Next – Возвращаемся к следующему оператору

End If

Err.Clear – Очищаем от незнакомой ошибки

End Function

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Приложение №1

Структура формы «Билет»

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Приложение №2

Структура запроса «№ билета запрос»

 

 

 

 

 

 

 

 


 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Приложение №3

 

Внешний вид формы «Пассажиры»

 

 

 

 

 


 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Приложение №4

 

Внешний вид отчета «Пассажиры Запрос1»

 

 

 

 


 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Приложение №5

 

Структура макроса «открытие запроса рейс»

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Приложение №6


 

 

 



 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Список использованной литературы

 

 

1. Информатика. Базовый курс /Симонович С.В. и др. - СПб:   Издательство «Питер», 2000. – 640с.

2.  Информатика. Учебное пособие  /Под ред. В.Г. Кирия. – Иркутск:      ИрГТУ ,1998 часть 2. – 382с.

3. Информатика. Учебное  пособие  /Ломтадзе В.В., Шишкина Л.П. – Иркутск: ИрГТУ, 1999. – 116с.

 




Информация о работе Разработка базы данных