Не принимает значение из поля со списком

@pasha_2001 · Регистрация: 14.11.2012

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

Добрый день.
Есть поле со списком, которое называется ПолеСоСписком19, в котором значения из таблицы списка должностей.
Необходимо при вносе данных о сотруднике в другую таблицу также внести и должность из той таблицы.
На кнопку повесил добавление данных о сотруднике:

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Private Sub Добавить_должность_Click()
               
        Dim rst As ADODB.Recordset
        Set rst = New ADODB.Recordset
        With rst
        .Open "Sotrudniki", CurrentProject.Connection, adOpenDynamic, adLockPessimistic
        .AddNew
        .Fields("FIO") = Me.FIO
        .Fields("id_dolz") = ПолеСоСписком19.Value
        .Fields("date_birth") = Me.date_birth
        .Fields("obrazovanue") = Me.obrazovanue
        .Update
        End With
        rst.Close
        Set rst = Nothing
        
End Sub

Однако при нажатии на кнопку выскакивает ошибка на строку .Fields("id_dolz") = ПолеСоСписком19.Value
"Не удается найти объект в семействе, соответствующий требуемому имени или порядковому номеру"
Как правильно принять значение поля со списком?

@Вячеслав Я · 14.10.2013, 16:39

извените базу посмотреть не могу, пишу с телефона. если работы у вас уже расценены, то по моему в конструкторе запроса примерно: sum(стоимостьработ умножить на процен). или если успею, подождем пока дойду до дома.

@Agapov_stas · 14.10.2013, 17:05

Измените запрос "Зарплата" на след. текст, без Between и с проверкой пустого поля на форме..

Кликните здесь для просмотра всего текста

SQL
1
2
3
4
SELECT Sotrudniki.FIO, SUM(Nz([Сумма заказа],0)) AS [Общая сумма заказов], (Dolzhnost![oklad:]) AS Оклад, SUM(Nz([Сумма заказа],0)*Dolzhnost![oklad:]) AS [К выдаче]
FROM Dolzhnost RIGHT JOIN (Sotrudniki LEFT JOIN [Сумма заказов] ON Sotrudniki.id_sotr=[Сумма заказов].id_sotr) ON Dolzhnost.[id_dolz:]=Sotrudniki.[id_dolz:]
WHERE (([Сумма заказов]!date_zakaza>=Forms!frmЗарплата!plD1) OR Forms!frmЗарплата!plD1 IS NULL) AND (([Сумма заказов]!date_zakaza<=Forms!frmЗарплата!plD2) OR Forms!frmЗарплата!plD2 IS NULL)
GROUP BY Sotrudniki.FIO, Dolzhnost![oklad:];

@pasha_2001 · 20.10.2013, 11:45 **[ТС]**

Добрый день, а как в Сотрудники -> Добавление сотрудников проверить правильность ввода данных. В проверка по условию писал проверку на ноль ="" но это не работает, необходимо проверить на то что поля заполнены и на то что в полях нужные данные, напр в поле дата - дата а не слово

@Agapov_stas · 20.10.2013, 11:56

Предположу, что Вы говорите о форме "Сотрудники_администратор".

@Agapov_stas · 20.10.2013, 12:00

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

В проверка по условию писал проверку на ноль =""

Нужно было: Len([FIO] & '')>0

@pasha_2001 · 21.10.2013, 11:07 **[ТС]**

Спасибо

Новые блоги и статьи Все статьи Все блоги /
Запустил конкурс "тем и промптов для текстовых квестов созданных почти чисто ИИ" Adler 06.10.2026 Всем привет! За последние три-четыре дня я создал более 16 текстовых квестовых игр используя преимущественно по одному запросу к ИИ на игру. Мне так понравилось смотреть все ветки/ сцены во всех. . .	ИИ не может найти нужный язык в списке Supersumestria 05.10.2026 Я ему даю вот такое изображение и прошу найти и подчеркнуть немецкий язык. Возвращает он вот это: https:/ / i. **********/ vqBWLe2. png Нужную строчку в 3й колонке просто выдумал. . Это. . .	Новая последняя моя музыка в SUNO zorxor 05.10.2026 Здравствуйте, дорогие мои друзья! С большой радостью я хотел бы представить вам свою новую последнею музыку, которую сгенерировала мне по моей просьбе нейросеть SUNO. С уважением, zorxor. Это. . .	Nekobox - outbounds[0].transport: unknown transport type: raw damix 01.10.2026 Фикс ошибки Правым кликом по серверу -> отладочная информация -> edit Заменить "net": "raw", на "net": "tcp", Нажать кнопку reload.
Программный домашний кинотеатр russiannick 27.09.2026 Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .	Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .	Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .	Запрет дублирования строк в табличной части Maks 13.09.2026 Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .

@Вячеслав Я 2841 / 1381 / 217 Регистрация: 13.05.2011 Сообщений: 4,224
	14.10.2013, 16:39
	извените базу посмотреть не могу, пишу с телефона. если работы у вас уже расценены, то по моему в конструкторе запроса примерно: sum(стоимостьработ умножить на процен). или если успею, подождем пока дойду до дома. 0

@pasha_2001 0 / 0 / 0 Регистрация: 14.11.2012 Сообщений: 89
	20.10.2013, 11:45 [ТС]
	Добрый день, а как в Сотрудники -> Добавление сотрудников проверить правильность ввода данных. В проверка по условию писал проверку на ноль ="" но это не работает, необходимо проверить на то что поля заполнены и на то что в полях нужные данные, напр в поле дата - дата а не слово 0

@pasha_2001 0 / 0 / 0 Регистрация: 14.11.2012 Сообщений: 89
	21.10.2013, 11:07 [ТС]
	Спасибо 0