7. Разработка программного обеспечения арм
Проверка имени пользователя
Private Sub Проверка_Click()
'Объявляем переменные
Dim запрос As String
Dim бд As ADODB.Recordset
user = Кто.Value
'Создаем новый набор записей
Set бд = New ADODB.Recordset
'Создаем текст SQL-запросса
запрос = "SELECT * From [Пользователи]WHERE [Пользователь]='"
запрос = запрос & Кто
запрос = запрос & "'AND Пароль = '"
запрос = запрос & ВолшебноеСлово & "';"
'Открываем набор записей с помощью SQL-запросов
бд.Open запрос, CurrentProject.Connection, adOpenStatic, adLockReadOnly
'Если в наборе есть хотя бы одна запись
If бд.RecordCount > 0 Then
'В открытом наборе есть записи
бд.Close
DoCmd.Close
On Error GoTo Err_Кнопка0_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "Бланк"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_Кнопка0_Click:
Exit Sub
Err_Кнопка0_Click:
MsgBox Err.Description
Resume Exit_Кнопка0_Click
Else
'В открытом наборе нет записей
MsgBox ("В регистрации пользователю отказано." & Chr(13) & "Неверное сочитание имя/пароль.")
End If
End Sub
8. Разработка руководства пользователя арм
Чтобы запустить АРМ для выполнения надо запустить ярлык Реестр. После этой операции, открывается окно АРМ. В открывающейся автоматически кнопочной форме расположены кнопки меню: Оператор, Начальник цеха, Выйти из программы, справка.
При выборе подменю “?” открывается справочная система пользования АРМ, подменю «Выход» мы закрывает АРМ, данные кнопки используется во многих формах.
При выборе одного из пункта Оператор или Начальник цеха, в зависимости от должности, появляется окно проверки, куда необходимо ввести фамилию и пароль. При идентичности пароля и соответствии фамилии - должности пользователь получает права на использование АРМ.
После получения доступа к АРМ оператором, открывается карточка для заполнения, представляющая собой бланк, куда вводится информация о выданном переводе. Поля: № по тетради ф.5, Место подачи, Сумма (цифрами), заполняются самостоятельно оператором, поля Дата, Оператор заполняются автоматически. После заполнения карточки оператор может перейти к заполнению следующего бланк, с помощью соответствующей кнопки.
Если доступ к АРМ получен Начальником цеха, то появляется следующее меню: Реестр ф.10, Поиск реестра ф.10, Отчет за месяц, Отчет по месяцам, Сотрудники, Справка и Выход.
При выборе первого пункта меню появляется реестр ф.10. Начальник может вывести на печать содержание, но не имеет права вносить какие-то исправления (в соответствии с почтовыми правилами). При просмотре отчетов пользователь может вернуться в предыдущее меню с помощью кнопки выход.
При выборе пункта меню Поиск реестра ф.10, появляется окно ввода параметра поиска, дата.
После ввода дата и нажатия кнопки дата, открывается реестр ф.10 в стандартном виде.
При выборе пункта меню Отчет за месяц , появляется отчет за текущий месяц. Отчет составляется автоматически на основе бланков заполняющих оператором.
Пункт меню Отчеты по месяцам, содержит информацию об оплаченных переводах за предыдущие месяца.
При выборе пункта меню «Сотрудники», следует два пункта подменю «Операторы», «Начальник цеха» и кнопка Выход.
При выборе одного из подменю появляется таблица с информацией о пользователях (фамилия и пароль), использующаяся для допуска к АРМ. Начальник имеет право изменять данные, в случае принятия на работу нового сотрудника и увольнения.
Для регистрации нового сотрудника надо внеси его данные в свободную строку, а для удаления информации о сотруднике нужно подвести курсор к интересующей строке и нажать на кнопку удалить запись. Для изменения информации достаточно подвести курсор к полю и внести исправления.