Форум программистов, компьютерный форум, киберфорум
Delphi: Базы данных
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.88/8: Рейтинг темы: голосов - 8, средняя оценка - 4.88
0 / 0 / 0
Регистрация: 22.01.2013
Сообщений: 20

Авторизация, права доступа

10.04.2013, 09:25. Показов 1735. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Добрый день, есть база в Аксесе где есть таблица RAB с полями id_rab, FIO, tip(1-слесарь, 2-бригадир, 3-слесарь не допущенный к работе, 4-мастер), log(логин), pass(пароль)
Есть несколько форм:
1)Форма авторизации на ней Edit1(Логин),Edit2(Пароль),Button1(Вход) ,Button2(Выход)
2)Форма журнала задания где в grid отображается журнал с заданиями, 4 edit (В них заносятся данные для добавления новой записи),Button1(Добавить),Button2(Удалит ь),Button3(Редактировать),Button4(Примен ить изменения ),Button5(Вывод журнала в Ексель)
3)Форма журнал движения датчиков Кнопки и едиты такие же как на форме журнал задания

Необходимо если пользователь авторизовался как слесарь(tip 1) то он может просматривать журнал задание но добавлять, изменять, удалять записи и выводить в ексель он не может. Может просматривать, удалять, изменять, добавлять записи в журнале движение датчиков, выводить в ексель не может.
Если авторизовался как бригадир(tip 2) то может просматривать, изменять, удалять записи во всех журналах,выводить в ексель не может.
Если авторизовался как Слесарь не допущенный к работе, то может только просматривать журналы удалять,изменять, добавлять записи не может так же как и выводить в ексел
Если авторизовался как мастер (tip 4) то может все во всех журналах.
Помогите пожалуйста.
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
10.04.2013, 09:25
Ответы с готовыми решениями:

Авторизация и права доступа через ADOQuery: анализ ошибок
Добрый день, форумчане! У меня есть база данных в Access, в которой я создал таблицу Sotrudniki. Всех сотрудников я поделил на 5 ролей...

Права доступа к БД
Здрасьте! Подскажите, пожалуйста, каким образом реализуется такая штука: таблица пользюков id, name, pass, admin, boss, user,...

Права доступа
Доброго времени суток! Имеется база данных Access/ADO. Приложение пишу на Delphi соответственно. Не могу разобраться, как настроить права...

3
 Аватар для Игорь[Igor]
726 / 478 / 130
Регистрация: 24.12.2008
Сообщений: 3,924
10.04.2013, 09:34
Когда то делал так, переделай под себя.

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
procedure TForm8.Button2Click(Sender: TObject);
begin
if
(form8.LabeledEdit1.Text=form1.Table3.Lookup
('login',form8.LabeledEdit1.Text,'login'))
and
(form8.LabeledEdit2.Text=form1.Table3.Lookup
('login',form8.LabeledEdit1.Text,'passw'))
then begin
ShowMessage(format('Пользователь %s зарегестрирован',
[form1.Table3.Lookup('login',form8.LabeledEdit1.Text,'fio')]));
form1.Action5.Visible:=true;
form1.Action6.Visible:=true;
form1.Action19.Visible:=false;
form1.Action20.Visible:=true;
form1.Action35.Visible:=true;
form1.ActionMainMenuBar1.ActionClient.Items[2].Visible:=true;
form1.ActionMainMenuBar1.ActionClient.Items[8].Visible:=true;
form1.Polzovatel:=form1.Table3.Lookup('login',form8.LabeledEdit1.Text,'id')
end
else begin
ShowMessage('Если вы хотите зарегестрироваться обратитесь к администратору');
end;
form8.LabeledEdit1.Text:='';
form8.LabeledEdit2.Text:='';
end;
1
0 / 0 / 0
Регистрация: 22.01.2013
Сообщений: 20
10.04.2013, 09:47  [ТС]
Я так понял у вас идет для конкретного пользователя конкретный набор прав?Если так то это под каждого прописывать права надо?Или я что то не так понял, вдруг я понял все как есть, то как сделать именно по типам?Логины и пароли у слесарей разные но набор прав одинаковый, так же и с остальными

Добавлено через 37 секунд
То есть присваивать права к типам пользователя
0
 Аватар для Игорь[Igor]
726 / 478 / 130
Регистрация: 24.12.2008
Сообщений: 3,924
10.04.2013, 11:12
У меня администратор, который может редактировать данные или добавлять в группу администраторов и просто пользователь который не входит под логином и паролем, а может просто просматривать данные. А так да, для каждого права надо прописывать будет свое.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
10.04.2013, 11:12
Помогаю со студенческими работами здесь

Права доступа админ/юзер
Есть таблица в аксесе с авторизацией логин/пароль/доступ(тип логический). Нужно сделать чтоб при авторизации разных пользователей были...

Delphi 7 + Access и права доступа
Доброй ночи! Знает ли кто-нибудь, где можно ознакомиться с материалом, где будет рассказано о том, как можно сделать вход по пользователю и...

Установить права доступа к базе данных
Дана база данных, в которой есть ограничения доступа для 'пользователя' и 'администратора'. (у каждого свой пароль). Необходимо сделать так...

Права доступа к Access через Delphi
есть база данных, в ней, в логическом поле отмечено, что доступно пользователю, а что нет. как в делфи это отобразить? т.е. зашел...

Права доступа при работе с БД Аксес
добрый день ув форумчане) такой вопросик, как правильно организовать работу с базой данных в ексесе через делфи чтоб было 2-5 юзеров и у...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android
8Observer8 26.01.2026
Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .
Установка Android SDK, NDK, JDK, CMake и т.д.
8Observer8 25.01.2026
Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .
Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf
8Observer8 25.01.2026
Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .
Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly
8Observer8 24.01.2026
Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
моя боль
iceja 24.01.2026
Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .
Модель сукцессии микоризы
anaschu 24.01.2026
Решили писать научную статью с неким РОманом
http://iceja.net/ математические сервисы
iceja 20.01.2026
Обновила свой сайт http:/ / iceja. net/ , приделала Fast Fourier Transform экстраполяцию сигналов. Однако предсказывает далеко не каждый сигнал (см ограничения http:/ / iceja. net/ fourier/ docs ). Также. . .
http://iceja.net/ сервер решения полиномов
iceja 18.01.2026
Выкатила http:/ / iceja. net/ сервер решения полиномов (находит действительные корни полиномов методом Штурма). На сайте документация по API, но скажу прямо VPS слабенький и 200 000 полиномов. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru