Ввод данных в поле через защиту паролем

@Braser · Регистрация: 16.03.2013

Студворк — интернет-сервис помощи студентам

Всем очень добрый день!

Возникла необходимость реализовать в БД защиту ввода данных в поле через пароль, дабы контролировать некоторые из совершаемых операций.

Почему такой способ защиты в подробности вдаваться не буду, скажу только, что подтверждение операции списания материалов могут делать разные люди (до 10 чел/полчаса) и чтобы каждый раз не выполнять вход под своим ИНН в БД, возникла идея запаролить конкретное поле или пару полей, имеющих для процедуры списания сакрально- ответственное значение.

В прилагаемом шаблоне это одно из полей - "ФИО". Подскажите пожалуйста где искать подобное решение или может кто-то может на живом примере показать.

механизм следующий:
Открывается форма "Подпись" в ней имеем поле "ФИО", инструкция по вводу данных написана в самом поле, теперь - главное.
Как реализовать саму процедуру идентификации пользователя с дальнейшей записью его ФИО в это поле, основываясь на данных из таблицы Access.
Т.е. машина должна проверить кому из пользователей принадлежит данный пароль или идентификатор и вписать его ФИО(соответствующее паролю в таблице) в поле Подпись.[ФИО] В случае неправильно набранного пароля откатить назад.

Спасибо за понимание и терпение. Шаблон БД d Access2007 прилагаю.

shanemac51 · 25.02.2016, 13:53

один из вариантов --десяток кнопок в заголовке
--------и каждому дайте условные вопрос --на который можно ответить парой нажатий для подтверждения записи
--------разрешив не более 2 ошибок --затем сменить вопрос

@Braser · 25.02.2016, 14:01 **[ТС]**

Почему то файл БД не зачепило сразу

@texnik-san · 25.02.2016, 14:06

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

Не по теме:

опоздала

@Braser · 26.02.2016, 04:09 **[ТС]**

Образец - в наличии
Процедура списания проста до безобразия - выбор компонента из списка, указание количества, кому и зачем, ну и собственно то самое поле "Списал ФИО" *ввел свои цифири в поле появились твои инициалы и далее кнопка "ОК"

Добавлено через 13 часов 54 минуты
Хотя бы подскажите, реально сделать такой вид защиты или нет? Если да, то как примерно это реализовать через VBA , ссылки на похожие теми может есть, неужели нету даже мыслей ни у кого.

@alvk · 26.02.2016, 06:01

а в чём проблема? я не понимаю.
форма: полесосписком1 поле1 полесосписком2 полесосписком3 поле2 поле3 кнопка
в поле2 на событии после обновления при условии совпадения введённых цифр с полем в таблице (DLookUP):
me.кнопкаОК.visible = true
иначе:
me.кнопкаОК.visible = false - это на загрузке формы тоже.

@texnik-san · 26.02.2016, 09:15

Сообщение от Braser

Образец - в наличии

Посмотрела. Никакого списания товара не вижу. Выложенный образец

да и вся затея яйца выеденного не стоит.

Добавлено через 2 часа 2 минуты
В общем, нате вам то,что вы просите, но я считаю, что ВСЕ из рук вон плохо и тебует переделки.

Начиная с того, что у вас нет связей между таблицами; что имея таблицу сотрудников с ключевым полем вы в рабочую таблицу все равно заносите зачем-то текстом ФИО; что пароль у вас не текст, а число; и заканчивая решениями по интерфейсу и функицоналу.

@Braser · 26.02.2016, 09:39 **[ТС]**

"В общем, нате вам то,что вы просите..." ???

Добавлено через 2 минуты
Если честно интересует именно как записать в VBA это : "...совпадения введённых цифр с полем в таблице (DLookUP)" никогда раньше не сталкивался с данной функцией

@texnik-san · 26.02.2016, 10:09

Вложение почему-то не прицепилось ((

@texnik-san · 26.02.2016, 10:11

Сообщение от Braser

(DLookUP)" никогда раньше не сталкивался с данной функцией

Если вам написали уже имя функции - что мешает найти ее в справке?

@Braser · 26.02.2016, 14:15 **[ТС]**

За пример, ПРЕОГРОМНОЕ СПАСИБО. Справку почитал, записал код по примеру из справки, но с учетом отсутствия опыта и некоторых глупых ошибок, типа запятой или кавычек получается ерунда -то значение возвращается одно и то же , то вообще не работает, ну а изучать вопрос по схожим темам не всегда просто, потому как товарищи такие как я своих ошибок поналепят в стартере, или тема почти похожа, но не та. Попробуй по ходу разбора завала определи с какого момента его направили в правильное русло. Хорошо, когда есть старшие товарищи, помогут, поправят... на место поставят

вообщем счастья всем и удачи, особенно вам texnik-san...

Добавлено через 3 часа 49 минут
Можно еще один вопрос по теме? Как убрать ошибку, которая выскакивает при незаполненном поле в форме набора пароля?

@boby104 · 26.02.2016, 14:34

Сообщение от Braser

Как убрать ошибку, которая выскакивает при незаполненном поле в форме набора пароля?

поле2 обрамить одной кавычкои
и пароль изменить с числового на текстовое - это как совет

@Braser · 27.02.2016, 07:54 **[ТС]**

boby104 ОГРОМЕНСКОЕ СПАСИБО! Насчет формата поля я тоже сам пришел к такому выводу, потому что числовой сурьезно ограничивает возможности.
Ну и набравшись наглости спрошу, чтобы для полноты задуманного, можете подсказать куда прикрутить это:

Visual Basic
1
2
3
4
If Me.Поле2 *не совпадает ни с одним из паролей* Then
MsgBox "Данные введены ошибочно или пользователь не имеет права доступа к данной операции"
End If
End Sub

Добавлено через 16 часов 56 минут
Благодарю всех кто поучаствовал в обсуждении и помог словом и делом. [Поле2] изменил в форме на [Pass].Может кому пригодится

В конечном итоге получилось так:

Code
1
2
3
4
5
6
7
8
9
 Dim tmp As Variant
  tmp = DLookup("User", "Access", "Password='" & Pass & "'")
    Forms("Подпись").ФИО= tmp
    DoCmd.Close
          If Len(Form_Подпись.ФИО & "") = 0 Then
    MsgBox "Неправильное значение, введите заново"
    Else
     Form_Подпись.Дата.SetFocus
    End If

@alvk · 28.02.2016, 14:04

ну и как, ставиться фокус на поле после закрытия формы?

@Braser · 29.02.2016, 07:30 **[ТС]**

Нормально ставится. Закрывается форма для ввода пароля, а в основной форме, которая с "запароленным" полем ,фокус переходит на след. поле.

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами 8Observer8 20.02.2026 Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .	Конвертировать закладки radiotray-ng в m3u-плейлист damix 19.02.2026 Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .	Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI Eddy_Em 18.02.2026 Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .	Камера Toupcam IUA500KMA Eddy_Em 12.02.2026 Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу zbw 12.02.2026 И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.	«Знание-Сила» zbw 12.02.2026 «Знание-Сила» «Время-Деньги» «Деньги -Пуля»	SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 12.02.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .	SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 11.02.2026 Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .

@Braser 397 / 140 / 39 Регистрация: 16.03.2013 Сообщений: 1,550

	Ввод данных в поле через защиту паролем 25.02.2016, 13:41. Показов 1167. Ответов 14 Метки нет (Все метки) Всем очень добрый день! Возникла необходимость реализовать в БД защиту ввода данных в поле через пароль, дабы контролировать некоторые из совершаемых операций. Почему такой способ защиты в подробности вдаваться не буду, скажу только, что подтверждение операции списания материалов могут делать разные люди (до 10 чел/полчаса) и чтобы каждый раз не выполнять вход под своим ИНН в БД, возникла идея запаролить конкретное поле или пару полей, имеющих для процедуры списания сакрально- ответственное значение. В прилагаемом шаблоне это одно из полей - "ФИО". Подскажите пожалуйста где искать подобное решение или может кто-то может на живом примере показать. механизм следующий: Открывается форма "Подпись" в ней имеем поле "ФИО", инструкция по вводу данных написана в самом поле, теперь - главное. Как реализовать саму процедуру идентификации пользователя с дальнейшей записью его ФИО в это поле, основываясь на данных из таблицы Access. Т.е. машина должна проверить кому из пользователей принадлежит данный пароль или идентификатор и вписать его ФИО(соответствующее паролю в таблице) в поле Подпись.[ФИО] В случае неправильно набранного пароля откатить назад. Спасибо за понимание и терпение. Шаблон БД d Access2007 прилагаю. 0

shanemac51 Модератор 12231 / 5078 / 814 Регистрация: 07.08.2010 Сообщений: 14,936 Записей в блоге: 4
	25.02.2016, 13:53
	один из вариантов --десяток кнопок в заголовке --------и каждому дайте условные вопрос --на который можно ответить парой нажатий для подтверждения записи --------разрешив не более 2 ошибок --затем сменить вопрос 1

@texnik-san шапоклякистка 8-го дня 3681 / 2241 / 391 Регистрация: 26.06.2015 Сообщений: 4,647 Записей в блоге: 1
	25.02.2016, 14:06
	Вы рассказали для начала, как именно у вас просиходит процедура списания. И образец базы бы не помешал. Не по теме: опоздала 0

@Braser 397 / 140 / 39 Регистрация: 16.03.2013 Сообщений: 1,550
	26.02.2016, 04:09 [ТС]
	Образец - в наличии Процедура списания проста до безобразия - выбор компонента из списка, указание количества, кому и зачем, ну и собственно то самое поле "Списал ФИО" ввел свои цифири в поле появились твои инициалы и далее кнопка "ОК" Добавлено через 13 часов 54 минуты* Хотя бы подскажите, реально сделать такой вид защиты или нет? Если да, то как примерно это реализовать через VBA , ссылки на похожие теми может есть, неужели нету даже мыслей ни у кого. 0

@alvk 7459 / 4592 / 302 Регистрация: 12.08.2011 Сообщений: 14,380
	26.02.2016, 06:01
	а в чём проблема? я не понимаю. форма: полесосписком1 поле1 полесосписком2 полесосписком3 поле2 поле3 кнопка в поле2 на событии после обновления при условии совпадения введённых цифр с полем в таблице (DLookUP): me.кнопкаОК.visible = true иначе: me.кнопкаОК.visible = false - это на загрузке формы тоже. 0

@Braser 397 / 140 / 39 Регистрация: 16.03.2013 Сообщений: 1,550
	26.02.2016, 09:39 [ТС]
	"В общем, нате вам то,что вы просите..." ??? Добавлено через 2 минуты Если честно интересует именно как записать в VBA это : "...совпадения введённых цифр с полем в таблице (DLookUP)" никогда раньше не сталкивался с данной функцией 0

@Braser 397 / 140 / 39 Регистрация: 16.03.2013 Сообщений: 1,550
	26.02.2016, 14:15 [ТС]
	За пример, ПРЕОГРОМНОЕ СПАСИБО. Справку почитал, записал код по примеру из справки, но с учетом отсутствия опыта и некоторых глупых ошибок, типа запятой или кавычек получается ерунда -то значение возвращается одно и то же , то вообще не работает, ну а изучать вопрос по схожим темам не всегда просто, потому как товарищи такие как я своих ошибок поналепят в стартере, или тема почти похожа, но не та. Попробуй по ходу разбора завала определи с какого момента его направили в правильное русло. Хорошо, когда есть старшие товарищи, помогут, поправят... на место поставят вообщем счастья всем и удачи, особенно вам texnik-san... Добавлено через 3 часа 49 минут Можно еще один вопрос по теме? Как убрать ошибку, которая выскакивает при незаполненном поле в форме набора пароля? 0

@alvk 7459 / 4592 / 302 Регистрация: 12.08.2011 Сообщений: 14,380
	28.02.2016, 14:04
	ну и как, ставиться фокус на поле после закрытия формы? 0