Рис. 22. Конструктор формы «ПЛИС»
При помощи средств Visual Basic for Application будут проверены имя пользователя и пароль, введенные при авторизации, в соответствии с чем будет выставлен требуемый уровень ограничений.
Код VBA:
Option Compare Database
Private Sub Form_Open(Cancel As Integer)
If User = "Admin" And Pass = "123456" Then
Form_ФПЛИС.AllowAdditions = True
Form_ФПЛИС.AllowEdits = True
Form_ФПЛИС.AllowDeletions = True
ElseIf User = "Guest" And Pass = "Guest" Then
Form_ФПЛИС.AllowAdditions = False
Form_ФПЛИС.AllowEdits = False
Form_ФПЛИС.AllowDeletions = False
End If
End Sub
4. Форма «Потребители»
Разработка была проведена с помощью конструктора форм, с последующей доработкой средствами Visual Basic for Application.
Данная форма позволяет получать сведения (а в случае входа под учетной записью администратора так же изменять, дополнять или удалять сведения) о потребителях, информация о которых занесена в базу.
Рис.23. Конструктор формы «Потребители»
При помощи средств Visual Basic for Application будут проверены имя пользователя и пароль, введенные при авторизации, в соответствии с чем будет выставлен требуемый уровень ограничений.
Код VBA:
Option Compare Database
Private Sub Form_Open(Cancel As Integer)
If User = "Admin" And Pass = "123456" Then
Form_ФПотребители.AllowAdditions = True
Form_ФПотребители.AllowEdits = True
Form_ФПотребители.AllowDeletions = True
ElseIf User = "Guest" And Pass = "Guest" Then
Form_ФПотребители.AllowAdditions = False
Form_ФПотребители.AllowEdits = False
Form_ФПотребители.AllowDeletions = False
End If
End Sub
5. Форма «Поставки»
Разработка была проведена с помощью конструктора форм, с последующей доработкой средствами Visual Basic for Application.
Данная форма позволяет получать сведения (а в случае входа под учетной записью администратора так же изменять, дополнять или удалять сведения) о поставках, информация о которых занесена в базу.
Рис.24. Конструктор формы «Поставки»
При помощи средств Visual Basic for Application будут проверены имя пользователя и пароль, введенные при авторизации, в соответствии с чем будет выставлен требуемый уровень ограничений.
Код VBA:
Option Compare Database
Private Sub Form_Open(Cancel As Integer)
If User = "Guest" And Pass = "Guest" Then
Form_ФПоставки.AllowAdditions = False
Form_ФПоставки.AllowEdits = False
Form_ФПоставки.AllowDeletions = False
ElseIf User = "Admin" And Pass = "123456" Then
Form_ФПоставки.AllowAdditions = True
Form_ФПоставки.AllowEdits = True
Form_ФПоставки.AllowDeletions = True
End If
End Sub
6. Форма «Заказы»
Разработка была проведена с помощью конструктора форм, с последующей доработкой средствами Visual Basic for Application.
Данная форма позволяет получать сведения (а в случае входа под учетной записью администратора так же изменять, дополнять или удалять сведения) о заказах, информация о которых занесена в базу.
Рис.25. Конструктор формы «Поставки»
При помощи средств Visual Basic for Application будут проверены имя пользователя и пароль, введенные при авторизации, в соответствии с чем будет выставлен требуемый уровень ограничений.
Код VBA:
Option Compare Database
Private Sub Form_Open(Cancel As Integer)
If User = "Admin" And Pass = "123456" Then
Form_ФЗаказы.AllowAdditions = True
Form_ФЗаказы.AllowEdits = True
Form_ФЗаказы.AllowDeletions = True
ElseIf User = "Guest" And Pass = "Guest" Then
Form_ФЗаказы.AllowAdditions = False
Form_ФЗаказы.AllowEdits = False
Form_ФЗаказы.AllowDeletions = False
End If
End Sub
Рис.26. Конструктор подчиненной формы для формы «Заказы»
При помощи средств Visual Basic for Application будут проверены имя пользователя и пароль, введенные при авторизации, в соответствии с чем будет выставлен требуемый уровень ограничений.
Код VBA:
Option Compare Database
Private Sub Form_Open(Cancel As Integer)
If User = "Admin" And Pass = "123456" Then
Form_ФЗаказаноПодчин.AllowAdditions = True
Form_ФЗаказаноПодчин.AllowEdits = True
Form_ФЗаказаноПодчин.AllowDeletions = True
ElseIf User = "Guest" And Pass = "Guest" Then
Form_ФЗаказаноПодчин.AllowAdditions = False
Form_ФЗаказаноПодчин.AllowEdits = False
Form_ФЗаказаноПодчин.AllowDeletions = False
End If
End Sub
7. Кнопочная форма «Запросы»
Разработка была проведена с помощью конструктора форм.
Форма позволяет вызывать построенные в базе запросы.
Рис.27. Вид кнопочной формы «Запросы»
Опираясь на уже созданные формы, можно показать структурную схему интерфейса пользователя:
|
В результате выполнения курсовой работы по дисциплине «Базы Данных» была разработана и отлажена база данных «Проглраммируемые логические интегральные микросхемы». Разработка производилась в СУБД MS Access. Все данные систематизированы, что позволяет осуществлять поиск нужной информации пользователю БД. Графический интерфейс легок в освоении и удобен для пользователя.
В работе были применены теоретические и практические знания, полученные при изучении курса «Базы данных», получен опыт по созданию баз данных. На определенном уровне изучены: СУБД MS Access, язык SQL, язык программирования VBA. В будущем, приобретенные знания сыграют свою роль при решении более сложных задач.
Список используемой литературы
1. Диго С.М. Базы данных: проектирование и использование: Учебник. – М.: Финансы и статистика, 2005. – 592 с.
2. Роланд Ф.Д. Основные концепции баз данных.: пер. с англ. – М.: Издательский дом «Вильямс», 2002. – 256 с.
3. Конспект лекций по курсу «Базы данных» лектор Щетинин Ю.И.
4. Крёнке Д. Теория и практика построения баз данных. 8-е изд. –СПб.: Питер, 2003. – 800 с.
Уважаемый посетитель!
Чтобы распечатать файл, скачайте его (в формате Word).
Ссылка на скачивание - внизу страницы.