Введенное значение не подходит для данного поля

@Арт_ · Регистрация: 24.05.2017

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

Всем привет!

На главной форме создал свободные поля, которым присвоил значение полей подчиненной формы.
При открытии глав формы выдается ошибка "Введенное значение не подходит для данного поля". Нажимаю Debug, перехожу на проблемную строку, ей присваивается Null.
Присвоение сделал через режим - программы в событии, изначально было через режим - выражение и выдавало #ошибку.

Ошибка "Введенное значение не подходит для данного поля" вылетает, когда в базе нет записей, хотя иногда при переходе в конструктор или между формами тоже выскакивало.

СкАжите, что надо в бд добавить записи и на этом успокоится, но не...
Решил, что нужно сделать проверку на наличие значений (не знаю как правильно, на пустоту или инициализацию) в свободных полях.
Пробовал на null, empty, nothing.

Не в курсе возможно эта ошибка норма для данной ситуации. И это только можно обработать обработчиком ошибок или событием error.
Хочу разобраться,

Заранее спасибо.

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

Visual Basic
1
2
3
4
5
Private Sub Form_Current()
        
        Me.[Поле2] = Me.[PF_DOKUMENT]![Номер]
        Me.[Поле4] = Me.[PF_DOKUMENT]![Дата]
        Me.[Поле6] = Me.[PF_DOKUMENT]![Владелец]

Visual Basic
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
27
28
29
30
31
32
33
Private Sub Кнопка11_Click()
    On Error GoTo Err_Кнопка11_Click
 
        Dim stDocName As String
        Dim stLinkCriteria As String
        
        stDocName = "DOKUMENT"
        
        If Me.[Поле2] Is Not Null Then      'проверка на инициализацию Me.[Поле2]
                                        'если она существует открывается форма
            stLinkCriteria = "[NOMER]=" & "'" & Me![Поле2] & "'"
            DoCmd.OpenForm stDocName, , , stLinkCriteria
            
        Else   'иначе выдается ошибка
        
            Dim alert, msg, style, title As String
            
            msg = "Ни одной записи нет в базе данных! Нажмите кнопку " & Chr(171) & "Новая карточка " & Chr(187) & " для того, чтобы создать новую запись."
            style = vbOKOnly + vbExclamation
            title = "Сообщение об ошибке"
        
            alert = MsgBox(msg, style, title)
            
        End If
    
Exit_Кнопка11_Click:
Exit Sub
 
Err_Кнопка11_Click:
    MsgBox Err.Description
    Resume Exit_Кнопка11_Click
    
End Sub

как-то так

mobile · 02.06.2019, 10:42

Сообщение от Арт_

это разве не поле формы, которая будет открыта по нажатию кнопки?

Да, перепутал, недосмотрел. Конечно в открываемой форме есть такое поле. Но! Его нет в источнике этой формы. А фильтр работает по табличным (или запроса) источникам форм. Поэтому выражение фильтра надо исправить на

Visual Basic
1
stLinkCriteria = "[РегистрационныйНомер]=" & "'" & Me![Поле2] & "'"

@Арт_ · 03.06.2019, 00:03 **[ТС]**

я уже разобрался, но все равно спасибо!

Новые блоги и статьи Все статьи Все блоги /
Запись в регистр сведений независимо от заполненности табличной части Maks 25.08.2026 Реализация из решения ниже выполнена на нетиповом документе с несколькими табличными частями, разработанного в КА2. Задача: Обеспечить запись документа в регистр сведений независимо от. . .	Ноутбук Альфария kumehtar 24.08.2026 Встретился тут в сети ноутбук Альфария, примарха Альфа-Легиона. Хотя возможно, это ноутбук Омегона, разумеется. Ну как вам?	Мастера простых решений DevAlt 23.08.2026 В сишарп стэках winforms, да и wpf существует сложная система связывания источниках данных и элементов формы(текстовые поля и метки), опирается все это на технологию событий и мета. . .	Цена ошибки DevAlt 23.08.2026 Человек я беспокойный и потому заинтересовался OCaml, в чате форсили функторы модулей как суперфичу. Пытаясь отдуплить концепт, наткнулся на тутор с простым примером. А главный принцип обучения от. . .
Сегодня суббота, 22.08.2026 at 16:41, и я вновь нахожусь на той стороне, за экраном машины. zorxor 22.08.2026 Сегодня суббота, 22. 08. 2026 at 16:41, и я вновь нахожусь на той стороне, за экраном машины. Кто Я, откуда Я пришел и куда Я иду? Эти вопросы не оставляют меня ни на секунду. Жизнь на планете Земля. . .	Жизня: рисунок укладки багажа, сделанный клодом anaschu 21.08.2026 Сделал 15 снимков, он по снимкам сделал схему.	Был там один разговор по поводу свободы в материальном мире. kumehtar 19.08.2026 Суть: рассматривается живое существо, оказавшееся внутри довольно странной системы (этого мира) и пытающееся обустроить в ней свой кусок пространства. Жизнь действительно предъявляет каждому. . .	Когда логика программы не спасает от человеческих ошибок Maks 18.08.2026 В последнее время всё чаще и чаще сталкиваюсь с таким явлением, как абсолютная невнимательность (или глупость) пользователей. Проявляется это чаще всего на работе в коллективе. Допустим, человек с. . .

@Арт_ 1 / 1 / 0 Регистрация: 24.05.2017 Сообщений: 270
	03.06.2019, 00:03 [ТС]
	я уже разобрался, но все равно спасибо! 0

Опции темы