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

Авторизация пользователя

18.06.2017, 07:57. Показов 769. Ответов 7
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
1. Нужно сделать чтоб после авторизации пользователь мог работать только со своими данными из бд
2. Регистрация работает неправильно, что нужно подправить
Вложения
Тип файла: rar Project.rar (360.5 Кб, 5 просмотров)
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
18.06.2017, 07:57
Ответы с готовыми решениями:

Авторизация пользователя
Здравствуйте, Уважаемые Форумчане! Подскажите, пожалуйста, как правильно сделать форму авторизации. Есть форма авторизации закинул на...

Авторизация пользователя
В общем, авторизация работает нормально, но хочу сделать так что бы, если пользователь авторизовавшись переходит на следующую форму и там...

Авторизация пользователя Delphi
Всем доброго вечера! Добрые люди, подскажите пожалуйста, как создать вот такую форму авторизации? Выбор пользователя производится из...

7
 Аватар для Пытливый
3763 / 2267 / 705
Регистрация: 29.05.2013
Сообщений: 9,622
18.06.2017, 16:07
1. Для начала добавьте во все таблички ключевые поля (счетчики)
2. Раз у вас ограничение на отображение данных, то использовать надо не таблицы, а запросы.

Добавлено через 4 минуты
Структуру БД тоже имеет смысл пересмотреть, сейчас она у вас сделана неправильно.
0
0 / 0 / 0
Регистрация: 29.12.2014
Сообщений: 20
18.06.2017, 17:40  [ТС]
Пытливый,
Счетчики добавила.
А каким образом организовать запросы, подскажите, мало что в них понимаю?
Что именно со структурой бд не так?
0
 Аватар для Пытливый
3763 / 2267 / 705
Регистрация: 29.05.2013
Сообщений: 9,622
18.06.2017, 17:50
Таблица это по сути запрос вида:
SQL
1
SELECT * FROM TableName
У вас же все запросы должны иметь вид:
SQL
1
SELECT * FROM TableName WHERE Сотрудник=:КодСотрудника
Прикрепите новую БД. Будем посмотреть.
0
0 / 0 / 0
Регистрация: 29.12.2014
Сообщений: 20
18.06.2017, 18:34  [ТС]
Пытливый, Вот БД
Вложения
Тип файла: rar bd.rar (20.5 Кб, 5 просмотров)
0
 Аватар для Пытливый
3763 / 2267 / 705
Регистрация: 29.05.2013
Сообщений: 9,622
19.06.2017, 19:40
Так, ну это уже на схему БД стало похоже.
Кабинет это у вас я так понял Личный кабинет потребителя, собственно через который он может посмотреть свои данные по Счетам и Показаниям счетчика за период. Кабинет это просто система управления данными со стороны Потребителя и как отдельная сущность он не существует.

Добавлено через 23 часа 33 минуты
Я вам скинул в личку авторизацию в Акцесе под вашу БД. Там вы получаете запросом ID_потребителя который будет в дальнейшем использоваться для всех запросов для получения данных потребителя. Например, если вам надо вывести все счета потребителя, то вы сделаете запрос вида:
Oracle 11 SQL
1
SELECT * FROM Счет WHERE ID_потребителя=:ID_потребителя
где :ID_потребителя параметр в который вы передадите полученный при авторизации ID_потребителя.

А вот с показаниями возникает непонятка, т.к. показания у вас завязаны на Кабинет, а смысла в этой таблице я пока не улавливаю.

Добавлено через 15 минут
Вот то же самое под Delphi
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
procedure TForm24.Button1Click(Sender: TObject);
var
  Q: TAdoQuery;
begin
 if (Edit1.Text = '') or (Edit2.Text = '') then Exit;
 Q := TAdoQuery.Create(nil);
 try
  Q.Connection := ADOConnection1;
  Q.SQL.Text := 'select ID_потребителя, ФИО from Users where login=:Login and password=:Password';
  Q.Parameters.ParamValues['Login'] := Edit1.Text;
  Q.Parameters.ParamValues['Password'] := Edit2.Text;
  Q.Open;
  if Q.IsEmpty
  then begin
       MessageDlg('Пользователь не опознан. Программа прервана.',mtError, [mbOK], 0);
       Application.Terminate;
       end;
  MessageDlg('Добро пожаловать ' + Q['ФИО'], mtInformation, [mbOK], 0);
  UserID := Q['ID_потребителя'];
 finally
  Q.Free
 end;
end;
1
Модератор
 Аватар для D1973
9910 / 6447 / 2455
Регистрация: 21.01.2014
Сообщений: 27,371
Записей в блоге: 3
19.06.2017, 20:32
Цитата Сообщение от Пытливый Посмотреть сообщение
Я вам скинул в личку авторизацию в Акцесе под вашу БД
 Комментарий модератора 
А вот это категорически не рекомендуется: нарушение п. 4.6 правил форума:
Обсуждение вопросов - только в теме на форуме. Приглашения к обсуждению еще где-либо (в том числе и с помощью системы личных сообщений) запрещены, за исключением коммерческих разделов.
0
 Аватар для Пытливый
3763 / 2267 / 705
Регистрация: 29.05.2013
Сообщений: 9,622
19.06.2017, 22:59
А вот это категорически не рекомендуется: нарушение п. 4.6 правил форума
На каждое правило есть исключения, там авторизация на VB, что тоже никак не вписывается в Delphi
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
19.06.2017, 22:59
Помогаю со студенческими работами здесь

Авторизация с правами пользователя
Как сделать авторизацию с правами пользователя в delphi через access т.е чтоб форма авторизации в delphi читала данные пользователей из...

Авторизация пользователя и запоминание ID
Нужно при нажатии на кнопку сверить логин и пароль из EDIT'ов и из БД, если все введено верно, то войти в программу и при этом еще...

Не проходит авторизация пользователя
в программе не осуществляется авторизация пользователя, пишет ошибки:

Авторизация пользователя БД (администратор и гость, каждый со своим паролем)
Помогите сделать защиту на бд нужно с помощью Combobox сделать администратор и гость и чтоб у каждого был свой пароль

Авторизация пользователя
Всем доброго времени суток! Изучаю php недавно. Необходимо сделать авторизацию пользователя на страницу администратора. Чудным образом...


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

Или воспользуйтесь поиском по форуму:
8
Ответ Создать тему
Новые блоги и статьи
Установка 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 полиномов. . .
Расчёт переходных процессов в цепи постоянного тока
igorrr37 16.01.2026
/ * Дана цепь(не выше 3-го порядка) постоянного тока с элементами R, L, C, k(ключ), U, E, J. Программа находит переходные токи и напряжения на элементах схемы классическим методом(1 и 2 з-ны. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru