База данных книжного магазина
Дипломная работа - Компьютеры, программирование
Другие дипломы по предмету Компьютеры, программирование
]. ITOG, [Поиск скидки покупателя]. ID_покупателя, Сотрудники. ID_сотрудникаBooks, [Цена с учетом скидки], [Поиск скидки покупателя], Сотрудники(Books. Номер=Forms! Продажи! NumberBooks) And (Сотрудники. ID_сотрудника=Forms! Продажи! Prodavez);
5) Уменьшение на 1 (Обновление)
Обновление таблицы Books: уменьшение количества книг после продажи
Books, Сотрудники SET Books. количество = Books. количество-1(номер=Forms! Продажи! NumberBooks) And (Сотрудники. ID_сотрудника=Forms! Продажи! Prodavez);
6) Удаление строк (УДАЛЕНИЕ)
Запрос на удаление срок в таблице Books, если количество <1*BooksКоличество<1;
7) Вархив (ДОБАВЛЕНИЕ)
Запрос на добавление данных в Архив после регистрации продажи
INTO АРХИВпроданныхКНИГ (Название, Автор, Серия, Жанр, Издательство)Books. Название, Books. Автор, Books. Серия, Books. Жанр, Books. ИздательствоBooks, Сотрудники(Books. Номер=Forms! Продажи! NumberBooks) And (Сотрудники. ID_сотрудника=Forms! Продажи! Prodavez);
8) количество проданных книг по авторам (сериям) (Перекрестный запрос)
Last (Books. Количество) AS [Last-Количество]Books. АвторСерии INNER JOIN Books ON Серии. ID_серии = Books. СерияBY Books. АвторСерии. [Название серии];
9) Статистика
Запрос на расчет максимальной, минимальной и т.п. цен проданных книг
Sum ([цена продажи]) AS Сумма_продаж, Min ([цена продажи]) AS Минимальная_цена, Max ([цена продажи]) AS Максимальная_цена, Avg ([цена продажи]) AS Среднеарифметическое, Count ([id_счета]) AS количествоСчета;
10) активность продаж
Количество продаж в дни регистрации продаж
Счета. [Дата продажи], Count (Счета. ID_счета) AS [Count-ID_счета]СчетаBY Счета. [Дата продажи]( ( (Счета. [Дата продажи]) >CDate ("31.12.2008")));
5.3 Создание форм
Форма - средство отображения данных на экране и управления ими. В форме можно разместить специальные элементы управления (счётчики, раскрывающиеся списки, переключатели, флажки и прочее) для автоматизации ввода. С помощью формы данные можно не только вводить, но и отображать. Запросы тоже отображают данные, но делают это виде результирующей таблицы, не имеющей почти никаких средств оформления. При выводе данных с помощью форм можно применять специальные средства оформления.
Наиболее удобными способами создания форм являются создание формы с помощью конструктора и с помощью мастера.
Мастер задаёт подобные вопросы об источниках записей, полях, макете, требуемых формах и создаёт форму на основании полученных ответов. С помощью мастера наиболее удобно создавать формы, предназначенные для ввода и редактирования данных.
Создание форм в режиме конструктора удобно для создания диалоговых окон и форм, не связанных с редактированием данных, поскольку в этом режиме можно управлять элементами формы в произвольном порядке.
В данной базе данных были созданы следующие формы:
1)Главная кнопочная форма
2)Форма "Продажи", имеющая подчиненные формы "Цена с учетом скидки", "Выборка книги", форму, созданную на основе запроса "Поиск скидки покупателя".
3)Поиск книг
)Форма "Привоз", имеющая подчиненную форму "Архив"
5)Сотрудники
6)Поставщики
7)Постоянные клиенты
8)Заказы
9)Архив
10)Форма Books
11)Сводную диаграмму, реализующая зависимость "жанр_количество_цена"
12) Сводную диаграмму, фиксирующую каждую продажу
1) форма "Поставщики":Compare DatabaseSub ID_издательства_GotFocus ()[расторжение контракта] <= Now () Then("Удалите поставщика или срочно перезаключите контракт!")IfSubSub Расторжение_контракта_GotFocus ()[расторжение контракта] <= Now () Then("Удалите поставщика или срочно перезаключите контракт!")MsgBox ("Срок сотрудничества еще не подошел к концу:)") ThenIfSub
) форма "Продажи":Sub Группа85_AfterUpdate ()Case Группа85. Value1_client = 12_client = "ВведитеID"SelectSubSub Кнопка33_GotFocus ()NumberBooks. Value < 100 Then("ВВЕДИТЕ ВЕРНЫЙ НОМЕР КНИГИ")IfID_client. Value < 1 Then("ВВЕДИТЕ ID КЛИЕНТА")IfProdavez. Value = 0 Then("ВЫБЕРИТЕ ПРОДАВЦА!")IfSub
)форма "поиск книг":Compare DatabaseExplicitSub ЗаголовокФормы_Click ()SubSub Кнопка62_Click ()SubSub Найти_Click ()
ПоискЖанра = Null
ПоискСерии = Null
ПоискНомера = Null
ПоискИздательства = Null
ПоискНазвания = Null
ПоискАвтора = Null. RequerySubSub ПоискНомера_AfterUpdate (). RequerySubSub ПоискИздательства_AfterUpdate (). RequerySubSub ПоискНазвания_AfterUpdate (). RequerySubSub ПоискАвтора_AfterUpdate (). RequerySubSub ПоискЖанра_AfterUpdate (). RequerySubSub ПоискСерии_AfterUpdate (). RequerySub
)форма "заказы":Compare DatabaseSub выборка_AfterUpdate ()Case выборка. Value1_pokupatel = 1_pokupatel. Visible = False2_pokupatel = "Введите свой ID"_pokupatel. Visible = TrueSelectSubSub Кнопка61_Click ()Error GoTo Err_Кнопка61_Click. GoToRecord,, acLast_Кнопка61_Click:Sub_Кнопка61_Click:Err. DescriptionExit_Кнопка61_ClickSub
5.4 Создание отчетов
Отчёт представляет собой эффективный способ представления данных в печатном формате. Имея возможность управлять размером и внешним видом всех элементов отчёта, пользователь может отобразить сведения желаемым образом. Большая часть сведений в отчёте поступает из базовой таблицы, запроса. По своим свойствам и структуре отчёты во многом похожи на формы, но предназначены только для вывода данных, причём для вывода не на экран, а на печатающее устройство. В связи с тем отчёты отличаются тем, что в них приняты специальные меры для группирования выводимых данных и для ввода специальных элементов оформления характерных для печатных документов. Наиболее удобным спос