Реферат

Реферат Защита базы данных спортивного магазина

Работа добавлена на сайт bukvasha.net: 2015-10-28

Поможем написать учебную работу

Если у вас возникли сложности с курсовой, контрольной, дипломной, рефератом, отчетом по практике, научно-исследовательской и любой другой работой - мы готовы помочь.

Предоплата всего

от 25%

Подписываем

договор

Выберите тип работы:

Скидка 25% при заказе до 26.12.2024





Содержание
Введение                   3

1.Общая часть                                                                                        

1.1.Цель разработки                                                                       4

                   1.2.Обоснование выбора среды разработки приложения            4

                   1.3. Характеристика среды разработки приложения                    5

                   1.4.Методика создания приложений баз данных                          8

                   1.5.Защита баз данных                                                                   9

2.Специальная часть

2.1.Постановка задачи                                                                  11

2.2.Концептуальная схема БД                                                      11

2.3. Описание структуры  БД                                                                12

2.4.Разработка интерфейса пользователя                                              13

2.5.Описание процесса отладки приложения                              13

2.6.Настройка параметров запуска                                               14

2.7.Выбор способа защиты базы данных                                              14

2.8.Инструкция пользователю                                                      15

Заключение                                                                                                      18

Приложения                                                                                                     19

Список литературы                                                                                        28



                                               Введение




Для учета, контроля и планирования служат всевозможные картотеки, списки, регистрационные журналы и т.д. Они постепенно накапливаются и обновляются. При большом объеме информации поиск и обобщение необходимых сведений, осуществляемых вручную, представляют собой довольно трудоемкий процесс. С появлением ЭВМ и использованием их для обработки информации появилась возможность автоматизировать решение многих информационно - справочных и расчетных задач.

Первоначально для накопления и хранения информации на ЭВМ применялись локальные массивы (или файлы), при этом для каждой из решаемых функциональных задач создавались собственные файлы исходной и результатной информации. Это приводило к значительному дублированию данных, усложняло их обновление, затрудняло решение взаимосвязанных проблемных задач.

Постепенно с развитием программного обеспечения ЭВМ появились идеи создания управляющих систем, которые позволяли бы накапливать, хранить и обновлять взаимосвязанные данные по целому комплексу решаемых задач, например при автоматизации бухгалтерского учета на предприятии. Эти идеи нашли свое воплощение в системах управления базами данных (СУБД). СУБД взаимодействуют не с локальными, а взаимосвязанными по информации массивами, называемыми базами данных. С появлением персональных компьютеров СУБД становятся наиболее популярным средством обработки табличной информации. СУБД также существенно увеличивает возможности и облегчает каталогизацию и ведение больших объемов хранящейся в многочисленных таблицах информации. СУБД включает в себя три основных типа функций: определение (задание структуры и описание) данных, обработка данных и управление данными.

Учёные утверждают, что каждые десять лет количество информации увеличивается вдвое. В связи с этим возникает необходимость использования автоматических средств, позволяющих эффективно хранить, обрабатывать и распределять накопленные данные
1.Общая часть

1.1.Цель разработки

·        Целью разработки защиты приложения «C:\Documents and Settings\Admin\Рабочий стол\Безымянный.bmp» является  создание актуальной защиты приложения, создание системы разграничение прав доступа и регистрации событий доступа.

                   1.2.Обоснование выбора среды разработки приложения

Для разработки данного приложения была выбрана СУБД MS ACCESS. Данная среда  позволяет разрабатывать необходимые запросы к базе данных, входные и выходные формы и отчеты, а также предусмотреть возможность автоматизации часто выполняемых действий путем создания макросов и программных модулей.

Преимущества разработки баз данных Access:

Быстрые сроки разработки базы данных

Не высокая стоимость разрабоки

Простота внедрения и обслуживания

Не требует применения дополнительных средсв разработки

Интуитивно понятный интерфейс
   1.3 Характеристика среды разработки приложения

Microsoft Access - это функционально полная реляционная СУБД. В ней предусмотрены все необходимые вам средства для определения и обработки данных, а также для управления ими при работе с большими объемами информации. Основные функции СУБД – это описание структуры базы данных, обработка данных и управление данными.

База данных – это совокупность сведений о реальных объектах, процессах, событиях или явлениях, относящихся к определённой теме или задаче, организованная таким образом, чтобы обеспечить удобное представление этой совокупности, как в целом, так и любой её части.

Любая СУБД позволяет выполнять четыре простейшие операции с данными:

-         добавить в таблицу одну или несколько записей;

-         удалить из таблицы одну или несколько записей;

-         обновить значения некоторых полей в одной или нескольких записях;

-         найти одну или несколько записей, удовлетворяющих заданному условию.
   В Access база данных обозначает файл, содержащий набор информации. База данных в Access может содержать следующие типы объектов: таблица, запрос, форма, отчёт, страница, макрос, модуль.
Окно  объектов базы данных
      Access может работать одновременно только с одной базой данных. Но одна БД Access может включать множество таблиц, форм, запросов, отчётов, макросов и модулей, которые хранятся в одном файле с расширением mdb.

     Таблица – это объект, соответствующий понятию «таблица» в теории реляционных баз данных. Для каждой таблицы в Access можно определить первичный ключ и один или несколько индексов с целью увеличения скорости доступа к данным.

     Access позволяет создавать структуру таблицы в трех режимах – в режиме конструктора, с помощью мастера и путем ввода данных. Разница предполагает использование этих средств пользователями с разным уровнем подготовки, разными целями и перспективами использования данных.

     Естественно имеется возможность просматривать, редактировать, удалять и добавлять записи, осуществлять поиск, замену, сортировку данных, изменять вид таблицы.

     Связи между таблицами определяются специальным  средством, которое называется «Схема данных».

     Это удобный графический инструмент, позволяющий создавать связи между определенными полями таблиц, задавать различные типы отношений, устанавливать ограничения ссылочной целостности. При этом изменения сразу применяются в базе данных (естественно, если содержащиеся данные удовлетворяют всем условиям) Полученную диаграмму таблиц и связей можно распечатать, что, несомненно, удобно для разработчика.

     Запрос  – объект, содержащий текст SQL запроса, имеющий уникальное имя в определенной базе данных. Создать запрос можно с помощью мастера и в режиме конструктора. В первом случае пользователю в интерактивном режиме предлагается выбрать имя таблицы и поля для выборки. Во втором случае можно выбрать несколько таблиц или запросов, связать их графическим способом и определить поля выборки. Также можно задать дополнительные условия для каждого поля и параметры сортировки.

     Есть  еще один способ создания запроса, который  встроен в конструктор, – это  написание запроса вручную на языке SQL. Однако текстовый редактор, предназначенный для этого имеет явно скудные возможности в плане удобства и наглядности оформления кода. Видимо этот способ не позиционировался разработчиками как основной.

     Форма – это специальный объект-контейнер для других интерфейсных компонентов, таких как поля ввода и отображения данных, кнопки и др. На форме разработчик располагает компоненты для ввода, корректировки, просмотра и группировки данных, в зависимости от специфики приложения. Форму также можно создать двумя способами – в режиме конструктора и с помощью мастера. В первом случае разработчик располагает набором компонентов (при необходимости можно зарегистрировать свои ActiveX), которые свободно размещает на форме и задает их параметры. В режиме мастера пользователь просто выбирает таблицу, поля и стиль оформления, а форма генерируется автоматически.

     Отчёт – объект, предназначенный для создания документа, который впоследствии может быть распечатан либо включён в документ другого приложения. Этот документ содержит результаты выборки из базы данных в виде структурированной информации (например в виде таблицы или списка). MS Access обладает богатыми возможностями по оформлению и форматированию отчетов. Те же два режима создания есть и у отчета. В режиме мастера у пользователя имеется возможность задать множество параметров, практически полностью определяющих желаемый внешний вид отчета. Для создания нестандартных отчетов лучше пользоваться конструктором.

1.4.Методика создания приложений баз данных

Основные этапы разработки приложения для базы данных:

1.Постановка задачи. Определяются функции, которые должно выполнять приложение.

2.Выбор информационных объектов (таблиц),с которыми приложение должно работать.

3.Разработка концептуальной схемы данных. На данном этапе устанавливаются связи между таблицами.

4.Разработка логической схемы данных.

5.Преобразование логической схемы в физическую.

6.Создание запросов.

7.Создание графического интерфейса. Разработка меню объекта и окна

8.Написание модулей обработки.

9.Отладка приложения.

10.Защита базы данных и самого приложения.

1.5.Защита баз данных

Защита с использованием пароля БД

Данный способ защиты позволяет установить пароль на открытие БД, для всех пользователей. Для его создания необходимо открыть файл БД в "монопольном" режиме и выбрать пункт меню Сервис / Защита / Задать пароль базы данных. Для работы с такой базой данных в MS Access потребуется вводить пароль.
Защита с использованием пароля пользователя

Данный способ позволяет ввести дополнительный уровень ограничений, связанных с работой БД Access. Основан на создании файла рабочих групп, в котором определяются имена пользователей, их пароли и права на работу с различными объектами БД.
Изменение расширения файла

Достаточно простой способ ввести в заблуждение - изменение расширения файла БД. Увидев незнакомое расширение, не каждый попытается выяснить природу этого файла. Кроме этого появляется возможность связать это расширение с вашей программой, так чтобы при клике по файлу запускалось ваше приложение, а не Access. Желательно открывать такой файл с монопольным доступом, так как в этом случае не будет создаваться ldb файл.
Защита с использованием пароля БД, содержащего непечатные символы

В первую очередь этот способ нацелен на противодействие определению паролей с помощью специальных программ. Одна база с такой защитой хорошо попортила мне нестроение. Теперь я попорчу настроение её авторам рассказав об этой защите. Способ основан на том, что пароль БД формата Access 2000 и 2002-2003 - текстовая строка в формате Unicode. При этом, нет ни каких ограничений на её содержимое. Стандартный способ установки и использования пароля БД подразумевает его ввод с клавиатуры в диалоговом окне. Если стока пароля содержит непечатные символы, то они не будут корректно отображены программой открывающей пароли БД. С другой стороны этот пароль нельзя ввести в диалоговом окне при открытии БД в MS Access.

Но и про Access 97 я не забыл. Дело в том, что в спецификации баз данных и в справке по DAO 3.60 указано, что максимальное число символов в пароле - 14. Но на самом деле их может быть 20. При этом и сам Access 97 не допускает ввода строк пароля более 14 символов. В спецификации Access 2003 также сказано про 14 символов, но программа допускает ввод всех 20. Также возможно использование непечатных символов, что приводит большинство программ взламывающих пароли в ступор.
Для установки такого пароля потребуется использовать программу, использующую метод CompactDatabase библиотек ADOX или DAO.
2. Специальная часть

2.1 Постановка задачи

Спроектировать базу данных, позволяющую хранить информацию о товарах:код товара ,фирма ,линия ,цена и тд .При заполнении критериев поиска ,выводить информацию о товаре .При выборе номера покупки выводить все приобретённые  товары и их общую цену .Обеспечить редактирование ,удаление и добавление записей .Предоставить возможность просмотра отчётов.

2.2
 
Концептуальная схема БД


Концептуальное моделирование. Как показывает изучение трехуровневой архитектуры СУБД, концептуальная схема является "сердцем" базы данных. Она поддерживает все внешние представления, а сама поддерживается средствами внутренней схемы. Однако внутренняя схема является всего лишь физическим воплощением концептуальной схемы. Именно концептуальная схема призвана быть полным и точным представлением требований к данным в рамках некоторой предметной области. В противном случае определенная часть информации о предприятии будет упущена или искажена, в результате чего могут возникнуть трудности при попытках полной реализации одного или нескольких внешних представлений.

Концептуальное моделирование базы данных - это процесс конструирования модели использования информации. Этот процесс не зависит от таких подробностей, как используемая СУБД, прикладные программы, языки программирования или любые другие вопросы физической организации информации. Подобная модель называется концептуальной моделью данных.
C:\Documents and Settings\Admin\Рабочий стол\Безымянный.bmp

2.3.Описание структуры БД.

таблица “ продажа товаров”

C:\Documents and Settings\Admin\Рабочий стол\Безымянный.bmp

таблица товары-заказы

C:\Documents and Settings\Admin\Рабочий стол\Безымянный2.bmp

таблица товары

C:\Documents and Settings\Admin\Рабочий стол\Безымянный3.bmp

таблица виды спорта

C:\Documents and Settings\Admin\Рабочий стол\Безымянный4.bmp
2.4.Разработка интерфейса пользователя

Интерфейс пользователя - эта та часть программы, которая находится у всех на виду. Некоторые программисты склонны оставлять дизайн интерфейса пользователя на потом, считая, что реальное достоинство приложения - его программный код, который и требует большего внимания. Однако часто возникает недовольство пользователей из-за неудачно подобранных шрифтов, непонятного содержимого экрана и скорости его прорисовывания, поэтому работу над интерфейсом также нужно воспринимать серьезно. Пользователь не видит программного кода, зато интерфейс (хороший или плохой) всегда перед ним.

Формы - это строительные блоки интерфейса пользователя. Хороший дизайн форм включает нечто большее, чем просто добавление элементов управления и программирование процедур обработки событии. Чтобы создать хорошо спроектированную форму, вы должны уяснить ее назначение, способ и время использования, а также ее связи с другими элементами программы. Кроме того в приложении может находиться несколько форм, каждая из которых будет отображаться по мере необходимости.

2.5.Описание процесса отладки приложения

Для отладки приложения  было проведено пошаговое тестирование работы программы.

В процессе отладки приложения были обнаружены и исправлены синтаксические ошибки.

2.6.Настройка параметров запуска

Существует два способа задать действия, выполняемые приложением при запуске, и ряд параметров, влияющих на работу приложения: установка параметров запуска в специальном диалоговом окне и создание макроса "AutoExec" .Выберите команду Сервис, Параметры запуска (Tools, Startup). На экране появляется диалоговое окно Параметры запуска (Startup)



В диалоговом окне Параметры запуска (Startup) можно задать:

значок и заголовок вашего приложения, которые будут отображаться в главном окне приложения и на панели задач вместо стандартного значка и заголовка "Microsoft Access". Значок должен быть задан в файле с расширением ico, а выбрать данный файл можно с помощью кнопки Построителя. Этот же значок может быть использован во всех формах и отчетах, для чего необходимо установить флажок Значок форм и отчетов (Use as Form and Report Icon). Эти параметры вступают в силу сразу после закрытия диалогового окна Параметры запуска (Startup);

меню, которое будет появляться при запуске вместо стандартного меню Access и определять основные функции приложения;

форму или страницу, которая будет появляться на экране при открытии базы данных;

специальное контекстное меню, которое будет заменять встроенные контекстные меню во всех окнах приложения, кроме тех, с которыми связаны другие контекстные меню.
Флажки Окно базы данных (Display Database Window) и Строка состояния (Display Status Bar) позволяют скрывать при запуске окно базы данных и строку состояния.
Следующая группа флажков позволяет запретить пользователям вносить изменения в разработанное приложение. Пока вы разрабатываете приложение, все эти флажки установлены, но когда вы будете передавать его пользователям, целесообразно сбросить флажки Полный набор меню Access (Allow Full Menus), Встроенные панели инструментов (Allow Built-in Toolbars) и Изменение панелей инструментов/меню (Allow Toolbar/Menu Changes). Вместо стандартных меню и панелей инструментов можно предоставить пользователям свои собственные меню и панели инструментов или использовать встроенные сокращенные меню, не допускающие пользователя к конструкторам. Чтобы пользователь не мог получить доступ к полным меню через специальную комбинацию клавиш <Ctrl>+<Fll> или к окну базы данных с помощью клавиши <F11>, нужно еще сбросить флажок Специальные клавиши Access (Use Access Special Keys). Если этот флажок сброшен, пользователь не сможет также открыть окно с текстом программ с помощью комбинаций клавиш <Ctrl>+<G> или <Ctrl>+<Break>. Но при этом он может все-таки попасть в текст программы, если произойдет ошибка, которая не перехвачена в коде программы.
2.7.Выбор способа защиты базы данных

Создана аутентификация пользователей и разграничение прав доступа субъектов к объектам программы с помощью установки паролей. Создана регистрация событий входа в систему, а также регистрация попыток входа. Также Для защиты БД был выбрал следующий способ: сокрытие всех объектов и дальнейшее создание собственного контекстного меню для защиты от просмотра содержимого форм и кода программы
 
2.8.Инструкция пользователю


Вход в программу

C:\Documents and Settings\Admin\Рабочий стол\Безымянный.bmp

Форма, появляющаяся сразу после запуска программы. Для перехода к главной форме следует выбрать пользователя и ввести соответствующий пароль
                                         
                                  Основное меню программы

C:\Documents and Settings\Admin\Рабочий стол\Безымянный.bmp

Эта форма  Является “сердцем” программы ,созданная для перемещения от одной формы к другой .На форме расположены 4 кнопки ,позволяющие открыть разные опции программы .

                                              Поиск товара

                         

На данной форме в верхнеё части расположены 2 вида поиска:

1(левая верхняя часть) .Расширенный поиск .В нём задаются параметры для поиска ,интересующего вас товара .Программа предупредит вас ,если вы не укажете хотя бы 1 поле и оповестит вас какое именно .Информация о товаре предоставляется в центре программы(код товара ,вид товара ,фирма ,линия ,количество ,цена и фото).

2(правая верхняя часть) .Поиск по цене. В нём указываются пределы, интересующей вас цены .При этом открывается форма ,предоставляющая всю информацию о искомом товаре.

В нижней части формы находятся следующие опции:

1 .”Назад”-переход к главному меню.

2.”Обновить”-произойдёт обновление списка товаров.

3 .”Добавить товар”-открытие формы ,позволяющей произвести добавление товара в список.(при не введённой информации в какое-либо поле программа предупредит вас об этом).

4 .”Редактировать ассортимент”-открытие формы ,позволяющей произвести редактирование списка товаров.

                                            Популярность товара

C:\Documents and Settings\Admin\Рабочий стол\Безымянный.bmp

На данной форме расположены 3 кнопки:

1 .”Топ 3 самых популярных товаров”-открывает форму ,позволяющая помочь покупателю при выборе товара.

2 .”Товары ,не пользующиеся спросом”-открывает форму ,дающую информацию о самых не продаваемых товарах.

3 .”Назад”-переход к главному меню.

                                                 
                                                 Наши заказы
C:\Documents and Settings\Admin\Рабочий стол\Безымянный.bmp

В верхней части формы находится поле ,где выводится номер покупки и суммарная цена заказа .В середине выводится вся информация о приобретённых товарах(фирма ,линия ,цена) .Обновление происходит ,при нажатии на кнопку “Просмотреть покупки”.

Так же имеется опция “Удалить покупку”-происходит открытие формы для удаления,где в поле со списком выбирается номер покупки для удаления.

Кнопка ”Назад”-переход к главному меню.

Заключение

В результате выполненной разработки можно сделать следующие выводы:

1. При разработке программного обеспечения был пройден полный цикл проектирования программы от постановки задачи до введения выходного результата на исполнение и эксплуатацию.

2. Были определены функции, которые должно выполнять приложение, а также объекты, с которыми приложение должно работать.

3. Разработана программа “База данных спортивного магазина” при использовании СУБД MS ACCESS. Создан графический интерфейс и модули обработки.

4.Созданно собственное специальное контекстного меню, которое будет заменять встроенные контекстные меню во всех окнах приложения.

5.Разработанна система аутентификации пользователей

6.Создана регистрация событий доступа к программе
                                                Форма Поиск товара
Private Sub Form_Load()

r.RowSource = "Select distinct фирма FROM tovari "

rr.RowSource = "Select distinct vid_tov FROM tovari "

rrrr.RowSource = "Select distinct nazv_sp FROM vidi_sp "

End Sub

Private Sub Кнопка58_Click()

Dim str As String

r.SetFocus

If r.Text <> "" Then

str = "фирма like '*" & r.Text & "*'"

Else

MsgBox "выберите фирму"

End If

rr.SetFocus

If rr.Text <> "" Then

If str <> "" Then

str = str & "and [vid_tov]='" & rr.Text & "'"

End If

Else

MsgBox "выберите вид товара"

End If

rrr.SetFocus

If rrr.Text <> "" Then

If str <> "" Then

str = str & "and [линия] = '" & rrr.Text & " '"

End If

Else

MsgBox "выберите линию"

End If

rrrr.SetFocus

If rrrr.Text <> "" Then

If str <> "" Then

str = str & "and [nazv_sp] = '" & rrrr.Text & " '"

End If

Else

MsgBox "выберете вид спорта"

End If

Form_2.Filter = str

Form_2.FilterOn = True

End Sub

   
Private Sub Кнопка7_Click()

On Error GoTo Err_Кнопка7_Click
    Screen.PreviousControl.SetFocus

    DoCmd.RunCommand acCmdAutoDial

Exit_Кнопка7_Click:

    Exit Sub

Err_Кнопка7_Click:

    Resume Next

    Resume Exit_Кнопка7_Click

    End Sub

                                         Форма “Добавление товара”

Private Sub Кнопка6_Click()

'If Поле0.Value = "" Or Поле2.Value = "" Or Поле4.Value = "" Or Поле7.Value = "" Or Поле9.Value = "" Or Поле11.Value = "" Or Поле13.Value = "" Then

If Поле0.Value <> "" And Поле2.Value <> "" And Поле4.Value <> "" And Поле7.Value <> "" And Поле9.Value <> "" And Поле11.Value <> "" And Поле13.Value <> "" Then
           

            Dim rst As DAO.Recordset, db As Database

            Set db = CurrentDb

            Set rst = db.OpenRecordset("tovari")

            rst.AddNew

            rst.Fields("kod_tov").Value = Поле0

            rst.Fields("фирма").Value = Поле2

            rst.Fields("vid_tov").Value = Поле4

            rst.Fields("линия").Value = Поле7

            rst.Fields("kol-vo").Value = Поле9

            rst.Fields("kod_sp").Value = Поле11

            rst.Fields("cena").Value = Поле13

            rst.Update

            rst.Close

             Else

           

       MsgBox ("введите значение в пустое поле")

        End If

End Sub

                                           ФормаНаши заказы

Private Sub Кнопка4_Click()

Dim s As String, db As Database, qdf As QueryDef

Set db = CurrentDb
For Each qdf In db.QueryDefs

        If qdf.Name = "просмотр" Then

        db.QueryDefs.Delete (qdf.Name)

        Exit For

      End If

    Next qdf

     

    s = "SELECT tovari.фирма, tovari.линия, tovari.cena FROM tovari INNER JOIN tov_zak ON (tovari.kod_sp = tov_zak.kod_sp) AND (tovari.kod_tov = tov_zak.kod_tov) WHERE tov_zak.nom_pok=" + CStr(nom_pok.Value) + ""
    Set qdf = db.CreateQueryDef("просмотр", s)
  Список8.RowSource = "просмотр"

End Sub

                                           Форма “Удаление покупки”

Private Sub Кнопка2_Click()

Dim n As Integer

Dim rst As DAO.Recordset, s As String, qdf As QueryDef

If ПолеСоСписком3.ListIndex = -1 Then

MsgBox ("введите значение")

Else

Set db = CurrentDb

            Set rst = db.OpenRecordset("prod_tov")

             rst.Move ПолеСоСписком3.ListIndex

            rst.Delete

           

MsgBox ("покупка удалена")

End If

End Sub

Форма

аторизации



Option Compare Database
Private Sub Êíîïêà2_Click()

Dim stDocName As String

    Dim stLinkCriteria As String

         Dim admin As String

                    Dim user As String

                     user = 111

          Ïîëå2.SetFocus

If user = Ïîëå2.Text Then

    stDocName = "Êîïèÿ_êíîïî÷íàÿ_ôîðìà2"

    DoCmd.OpenForm stDocName, , , stLinkCriteria

   

    kll1 = "1.txt"

    filer1 = FreeFile

    Open "D:\1.txt" For Append As filer1

    Print #filer1, "â ñèñòåìó âîøåë User" & "   âðåìÿ âõîäà: " & Date & " " & Time

Close filer1
Else

MsgBox ("íåâåðíûé ïàðîëü")
kll2 = "1.txt"

    filer2 = FreeFile

Open "D:\1.txt" For Append As filer2

    Print #filer2, "îøèáêà àâòîðèçàöèè ïîëüçîâàòåëÿ User" & "   âðåìÿ ñîáûòèÿ: " & Date & " " & Time

Close filer2

Exit_Êíîïêà2_Click:

   Exit Sub
Err_Êíîïêà2_Click:

    MsgBox Err.Description

    Resume Exit_Êíîïêà2_Click

    End If

        
End Sub
Private Sub Êíîïêà3_Click()

On Error GoTo Err_Êíîïêà3_Click
    Dim stDocName As String

    Dim stLinkCriteria As String

    Dim admin As String

    Dim user As String

    admin = 777

    Ïîëå1.SetFocus

   

If admin = Ïîëå1.Text Then

    stDocName = "êíîïî÷íàÿ_ôîðìà2"

    DoCmd.OpenForm stDocName, , , stLinkCriteria

    kll = "1.txt"

    filer = FreeFile

    Open "D:\1.txt" For Append As filer

    Print #filer, "â ñèñòåìó âîøåë Admin" & "   âðåìÿ âõîäà: " & Date & " " & Time

Close filer
Else

MsgBox ("íåâåðíûé ïàðîëü")

kll3 = "1.txt"

    filer3 = FreeFile

Open "D:\1.txt" For Append As filer3

    Print #filer3, "îøèáêà àâòîðèçàöèè ïîëüçîâàòåëÿ Admin" & "   âðåìÿ ñîáûòèÿ: " & Date & " " & Time

Close filer3

Exit_Êíîïêà3_Click:

   Exit Sub
Err_Êíîïêà3_Click:

    MsgBox Err.Description

    Resume Exit_Êíîïêà3_Click

    End If   

       

End Sub
список используемой литературы:

- Справочная система MS Access

-Конспект по предмету “Базы Данных”

-www.wikipediya.ru



1. Реферат на тему Antigone Essay Research Paper Creon is the
2. Реферат Медичні аспекти вигодовування дітей материнським молоком
3. Реферат Московская Русь 2
4. Реферат на тему Journalism Essay Research Paper 27 Years of
5. Реферат на тему Mercantilism Essay Research Paper Mercantilism as a
6. Доклад Жизнь Толстого в Ясной Поляне
7. Реферат Расчет показателей эффективности радиосвязи
8. Реферат АФС 1
9. Реферат Совершенствование системы управления персоналом на предприятии
10. Реферат на тему Киевская Русь 2