Структура базы данных и формы ввода

@Chuvaschow · Регистрация: 20.07.2017

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

Уважаемые форумчане!

Подскажите, пожалуйста, как выйти из ситуации: необходимо то, что есть в Excell перенести в Access (нужен доступ на несколько пользователей + база растет быстро, Excell не справляется). Как правильно сделать структуру:

1. В файле первые три столбца - основные, они не делятся. Но все что дальше - как микробы, делится и делится. В Excell строчка тупо копируется, затем фильтруется по нескольким столбцам и получается то что ищем. Если в Excell сделать иерархию с помощью плюсиков - она будет просто огромная! Глупо в Access копировать строки, избыточность данных будет колосальной.
Имеем около 100 столбцов, из которых не делятся 3... Как правильно организовать струтуру в Access.

2. Структура - полбеды...Как сделать форму ввода? Три основных контрола и бесконечное число подчиненных форм с возможностью добавления строк в каждой? Просто ума не приложу...

Буду очень благодарен за помощь!

ДА, чуть не забыл. Внешний вид необходим такой же как в Excell, чтобы промотав вперед-назад было видно все движение по отфильтрованным данным. То есть формы ввода (пусть даже всплывающие) для каждого "деления" наверное не подойдут.

@Chuvaschow · 10.08.2017, 08:11 **[ТС]**

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

Вопрос №3: Как ограничить запись в таблицу по связанному полю всего одной записью?

Up!

@alvk · 10.08.2017, 10:57

Сделать связь один-к-одному.

@Chuvaschow · 11.08.2017, 21:52 **[ТС]**

Господа, выручайте!

Access сообщает, что какой-то другой пользователь изменил запись, пока я ее вводил и предлагает скопировать в буфер, отменить, или несмотря ни на что ввести запись.

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

Добавлено через 1 час 3 минуты
Или при каждом изменении записи программно посылать пользователя на следующую запись и возвращать обратно...

Добавлено через 13 минут
Либо принудительно сохранять запись после каждого изменения...

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

Правильно ли я понимаю, что необходимо сначала обновить форму, а затем вводить данные?

Неправильно я понимаю. Верно ли, что запись считается не сохраненной, пока не будет осуществлен переход к другой записи или обновление?

Добавлено через 1 минуту
В идеале, как мне видится, мгновенное сохранение посимвольно

Ввел в поле "а", сохранилось, продолжил "п" сохранилось...

Добавлено через 45 минут
Даже пусть не табличная форма, пусть будет ленточная и у каждого своя. Но таблица одна, например ТаблицаОстатковТоваров(Товар, КолвоПриход,КолВоРасход). У первого пользователя на форме Поле товар и поле расход, у второго соответственно Товар и приход. Два пользвателя, один вводит расход, другой приход. Рабочая смена началась, торговля идет, и тут же привоз товара. И вот первый пользователь вводит расход Ручек, а второй тут же в эти же Ручки вводит приход. Как справляться с такой ситуацией?

shanemac51 · 11.08.2017, 23:03

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

И вот первый пользователь вводит расход Ручек, а второй тут же в эти же Ручки вводит приход. Как справляться с такой ситуацией?

как в любой накладной, которая состоит из 2-х таблиц
таб1-головная накладная
--кодН
--код сотрудника
--дата
--возможно код поставщика

таб2 --состав накладной
--кодСН
--кодН
--код товара
--код движения(приход/расход)
--количество

при таком подходе сотрудники не будут работать с одной записью(кроме выбора материала и сотрудника из справочников)

@alvk · 12.08.2017, 09:27

Настройки так стоят? -->

@Chuvaschow · 12.08.2017, 10:32 **[ТС]**

Именно так. Я по наивности своей думал что Access ставит блокировку на ПОЛЕ, а он вон чего, запись блокирует...Мне очень нужно как-то выйти из ситуации, структуру переделывать нет времени, в понедельник сдавать...

@Chuvaschow · 14.08.2017, 16:18 **[ТС]**

Господа!

Подскажите, есть ли у табличной формы/области данных событие, отвечающее за выбор контрола?
Грубо говоря, чтобы при нажатии на любой контрол выводилось сообщение? Или каждому контролу нужно писать в событии получение фокуса?

Добавлено через 6 часов 50 минут
Up!

@alvk · 15.08.2017, 09:03

Каждому, но можно оформить функцией и тогда всего пару слов, но каждому.

@Chuvaschow · 15.08.2017, 09:20 **[ТС]**

Попытался оформить еще одной процедурой (подобно 1С), но не работает.

Visual Basic
1
2
3
4
5
6
7
8
Private Sub DateAdmissionJob_GotFocus()
    Call VisibleHeader(DateAdmissionJob)
End Sub
 
Private Sub VisibleHeader(NameControl As Control)
    Forms![Desktop].Form![HeaderOutput].Visible = True
    Forms![Desktop].Form![HeaderOutput].Caption = Me.NameControl.StatusBarText
End Sub

Пробовал в параметре процедуры указывать не Control, а String...

Добавлено через 3 минуты

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

и тогда всего пару слов, но каждому.

Даже какие-то варианты вроде: при загрузке формы пробежаться циклом по контролам и повесить на них обработку события GotFocus() не будут работать?

@alvk · 15.08.2017, 16:47

Почему не будут?

@Chuvaschow · 15.08.2017, 17:51 **[ТС]**

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

Попытался оформить еще одной процедурой (подобно 1С), но не работает.

А надо было функцией

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

Почему не будут?

Подскажите как?

@Chuvaschow · 16.08.2017, 07:58 **[ТС]**

Появилась необходимость видеть кто сейчас находится в базе. На форму входа написал такой код:

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Dim rst As DAO.Recordset
 
Set rst = CurrentDb.OpenRecordset("UserPermission", dbOpenDynaset)
    With rst
   .......
    'Зафиксируем дату и время входа
    .FindFirst ("Код=" & Me.Login.Value)
    .Edit
    .Fields("Active").Value = "Подключен"
    .Fields("ActiveDate").Value = DateTime.Now
    .Update
    
    'MsgBox Me.LoginPermission 'Отладка
    Me.Visible = False 'Скроем форму входа, чтобы сохранить в ней Логин
  .............  
    
 
    End With
rst.Close
Set rst = Nothing

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Private Sub Form_Close()
 
Dim rst As DAO.Recordset
Set rst = CurrentDb.OpenRecordset("UserPermission", dbOpenDynaset)
    With rst
     'Очистим дату и время входа
    .FindFirst ("Код=" & Me.Login.Value)
    .Edit
    .Fields("Active").Value = "Не подключен"
    .Fields("ActiveDate").Value = Null
    .Update
    End With
rst.Close
Set rst = Nothing
 
End Sub

И теперь вижу кто в базе и точно знаю кому звонить, если мне нужен монопольный доступ к таблицам

shanemac51 · 23.08.2017, 12:35

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

как в любой накладной, которая состоит из 2-х таблиц
таб1-головная накладная
--кодН
--код сотрудника
--дата
--возможно код поставщика

таб2 --состав накладной
--кодСН
--кодН
--код товара
--код движения(приход/расход)
--количество

при таком подходе сотрудники не будут работать с одной записью(кроме выбора материала и сотрудника из справочников)

я вам еще 11/08 советовала изменить структуру таблиц

Добавлено через 12 минут

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

форма одна, табличная.

я приемлю ТФ только в двух случаях
--студенческая поделка на 3-5 записей, явно не сетевая
--просмотр без права корректировки с непредсказуемым поиском/фильтром

применяю только следующий прием
--ленточная с фильтрацией по основным 5-10 полям
--по клику на строке --переход на корректировку
--и конечно --принцип НАКЛАДНОЙ, выделение основной и подчиненной части

Новые блоги и статьи Все статьи Все блоги /
FPS контроллер с анимированными Y-Bot и 3D-звуком miniaudio (Box3D, Recast, BehaviorTree.CPP, ozz-animation, ImGui, OpenGL и SDL3) 8Observer8 18.10.2026 Содержание блога \| English Version Полное мультиплатформенное руководство по стартовому проекту с FPS-контроллером игрока, анимированными роботами Y-Bot с 4-слойным блендингом, 3D-физикой Box3D,. . .	Локальный http сервер Argus19 17.10.2026 Локальный http сервер На работе, на двух локальных компьютерах круглосуточно работают программы опроса приборов с записью в книги Excel,которые раз в сутки записываются на сервер компании. Т. к. . . .	Копировать Windows на новый диск на UEFI damix 17.10.2026 https:/ / uriesk. wordpress. com/ 2016/ 11/ 01/ move-window-10-to-ssd-on-a-uefi-dualboot-system-with-basic-linux-tools/ TL DR Вставляем диск, а старый подключаем через переходник, грузимся с лайва. . .	ИИ не может найти нужный язык в списке Supersumestria 05.10.2026 Я ему даю вот такое изображение и прошу найти и подчеркнуть немецкий язык. Возвращает он вот это: https:/ / i. **********/ vqBWLe2. png Нужную строчку в 3й колонке просто выдумал. . Это. . .
Новая последняя моя музыка в SUNO zorxor 05.10.2026 Здравствуйте, дорогие мои друзья! С большой радостью я хотел бы представить вам свою новую последнею музыку, которую сгенерировала мне по моей просьбе нейросеть SUNO. С уважением, zorxor. Это. . .	Программный домашний кинотеатр russiannick 27.09.2026 Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .	Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .	Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .

@Chuvaschow 2 / 2 / 1 Регистрация: 20.07.2017 Сообщений: 218

	Структура базы данных и формы ввода 01.08.2017, 17:44. Показов 4412. Ответов 72 Метки нет (Все метки) Уважаемые форумчане! Подскажите, пожалуйста, как выйти из ситуации: необходимо то, что есть в Excell перенести в Access (нужен доступ на несколько пользователей + база растет быстро, Excell не справляется). Как правильно сделать структуру: 1. В файле первые три столбца - основные, они не делятся. Но все что дальше - как микробы, делится и делится. В Excell строчка тупо копируется, затем фильтруется по нескольким столбцам и получается то что ищем. Если в Excell сделать иерархию с помощью плюсиков - она будет просто огромная! Глупо в Access копировать строки, избыточность данных будет колосальной. Имеем около 100 столбцов, из которых не делятся 3... Как правильно организовать струтуру в Access. 2. Структура - полбеды...Как сделать форму ввода? Три основных контрола и бесконечное число подчиненных форм с возможностью добавления строк в каждой? Просто ума не приложу... Буду очень благодарен за помощь! ДА, чуть не забыл. Внешний вид необходим такой же как в Excell, чтобы промотав вперед-назад было видно все движение по отфильтрованным данным. То есть формы ввода (пусть даже всплывающие) для каждого "деления" наверное не подойдут. Миниатюры 0

@alvk 7459 / 4592 / 302 Регистрация: 12.08.2011 Сообщений: 14,383
	10.08.2017, 10:57
	Сделать связь один-к-одному. 1

@alvk 7459 / 4592 / 302 Регистрация: 12.08.2011 Сообщений: 14,383
	12.08.2017, 09:27
	Настройки так стоят? --> Миниатюры 0

@Chuvaschow 2 / 2 / 1 Регистрация: 20.07.2017 Сообщений: 218
	12.08.2017, 10:32 [ТС]
	Именно так. Я по наивности своей думал что Access ставит блокировку на ПОЛЕ, а он вон чего, запись блокирует...Мне очень нужно как-то выйти из ситуации, структуру переделывать нет времени, в понедельник сдавать... 0

@Chuvaschow 2 / 2 / 1 Регистрация: 20.07.2017 Сообщений: 218
	14.08.2017, 16:18 [ТС]
	Господа! Подскажите, есть ли у табличной формы/области данных событие, отвечающее за выбор контрола? Грубо говоря, чтобы при нажатии на любой контрол выводилось сообщение? Или каждому контролу нужно писать в событии получение фокуса? Добавлено через 6 часов 50 минут Up! 0

@alvk 7459 / 4592 / 302 Регистрация: 12.08.2011 Сообщений: 14,383
	15.08.2017, 09:03
	Каждому, но можно оформить функцией и тогда всего пару слов, но каждому. 1

@alvk 7459 / 4592 / 302 Регистрация: 12.08.2011 Сообщений: 14,383
	15.08.2017, 16:47
	Почему не будут? 0