powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Не пойму, в чем засада.....
22 сообщений из 22, страница 1 из 1
Не пойму, в чем засада.....
    #32440122
Nadejda K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Срубило меня совсем на ровном месте. Существует таблица Товар с 2-мя полями [Наименование товара](ключевое), и [С/с].

Делаю на основании этой таблицы форму и в ней с помощью мастера создания полей со списком собственно поле со списком, по которому в форме будет производится поиск.

запрос для поля со списком SELECT [Товар].[Наименование товара], [Товар].[C/c] FROM Товар;

и обработка события AfterUpdate():

Private Sub Combo10_AfterUpdate()
' Find the record that matches the control.
Dim rs As Object

Set rs = Me.Recordset.Clone
rs.FindFirst "[Наименование товара] = '" & Me![Combo10] & "'"
Me.Bookmark = rs.Bookmark
End Sub

При выборке из поля со списком выдает ошибку Run-time error '3077'. Syntax error (missing operator) in expression.
Где же ошибка, если я даже не сама, а с помощью мастера создания делала?
...
Рейтинг: 0 / 0
Не пойму, в чем засада.....
    #32440136
Фотография SergeySV
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А почему Set rs = Me.Recordset.Clone ? у тебя что Acc97 что ли

в Acc200 - Me.RecordsetClone
...
Рейтинг: 0 / 0
Не пойму, в чем засада.....
    #32440146
Nadejda K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
А ему все равно, как это написать. Придирается он к
rs.FindFirst "[Наименование товара] = '" & Me![Combo10] & "'"
...
Рейтинг: 0 / 0
Не пойму, в чем засада.....
    #32440154
Фотография Daf
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Может быть потому, что у вас в Combo10 сидят две записи [Товар] и [С/с], а должна быть одна [Товар]?
...
Рейтинг: 0 / 0
Не пойму, в чем засада.....
    #32440166
Nadejda K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Дело в том, что необходимо как раз, чтобы с/с было видно.
...
Рейтинг: 0 / 0
Не пойму, в чем засада.....
    #32440168
Фотография SergeySV
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Для начала проверь свой rs, не пустой или он вообще и что там у него за содержимое, какие поля...
...
Рейтинг: 0 / 0
Не пойму, в чем засада.....
    #32440207
Nadejda K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
если вы про выпадающий список, то там все в порядке
...
Рейтинг: 0 / 0
Не пойму, в чем засада.....
    #32440224
Фотография Victosha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
проверьте, нет ли одничной кавычки в том имени, которое в комбобоксе
типа Д'Артаньян

если есть - это и есть "засада"
...
Рейтинг: 0 / 0
Не пойму, в чем засада.....
    #32440303
Nadejda K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Да, такие кавычки есть
rs.FindFirst "[Наименование товара] = ' " & Me![Combo10] & " ' ", но, если их убрать
rs.FindFirst "[Наименование товара] = " & Me![Combo10] & "", пишет ту же ошибку
...
Рейтинг: 0 / 0
Не пойму, в чем засада.....
    #32440311
zz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Шо получается при
Debug.Print "[Наименование товара] = ' " & Me![Combo10] & " ' "
?
...
Рейтинг: 0 / 0
Не пойму, в чем засада.....
    #32440327
Фотография Victosha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Я писал вот о чем:

Me![Combo10] - он у Вас из двух столбцов. Value этого комбо - выбирается из того столбца, который указан как "Присоединенный" столбец

Пусть в этом столбце сидят значения

Атос
Партос
Арамис
Д'Артаньян

Так вот, На Атосе, Партосе и Арамисе все должно работать.
Д'Артаньян - ломает запрос, поскольку планировщик запросов захочет его увидеть как Д''Артаньян.

Если тема в этом - то, перед соединением значения комбобокса в строку условия поиска, надо нечетное количество вхождений апострофа заменить на четное.
...
Рейтинг: 0 / 0
Не пойму, в чем засада.....
    #32440420
Nadejda K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
при
Debug.Print "[Наименование товара] = '" & Me![Combo10] & "'"
не выбираются значения в форме по combo.

А Значений с апострофами у меня нет.
...
Рейтинг: 0 / 0
Не пойму, в чем засада.....
    #32440434
zz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ну а что Дебаг-то выводит??
...
Рейтинг: 0 / 0
Не пойму, в чем засада.....
    #32440438
Фотография Victosha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Если в это комбо ногами никто не залез, и значения по умолчанию у него нет, ТО его значение= Null

вообще-то надежнее опрашивать через .Value

однако все это "влиять" на появление ошибки не должно.

условие "[Наименование товара]=''" или "[Наименование товара]='Null'"
в любом случае выглядит честно.
дело, видно, гд-то в Наименование товара то есть в его буквах - может где вместо русского н латинское h затесалось или пробела не хватает?

я бы вот внутренность [Наименование товара] методом кат-паст из описания полей таблицы (запроса) в нужное место разместил
...
Рейтинг: 0 / 0
Не пойму, в чем засада.....
    #32440445
zz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код повешен на After_Update -> в комбо никак не Null
Код сделан мастером -> название поля правильное.
Пусть все-таки она выведет в дебаг эту строку поиска. может, тогда станет яснее.
...
Рейтинг: 0 / 0
Не пойму, в чем засада.....
    #32440455
фыыф
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
автор"[Наименование товара]='Null'"
проверь:
?"[Наименование товара]='" & Null & "'"
должно получиться
[Наименование товара]=''
что для текста удобоваримо
для цифры ('' нет) получится
[Наименование товара]=
т.е. отсутствие значения в сравнении.


авторDebug.Print "[Наименование товара] = '" & Me![Combo10] & "'"
надо ввести в дебугер во время останова в программе из-за ошибки - вы увидите значение строки, передаваемое методу Find
...
Рейтинг: 0 / 0
Не пойму, в чем засада.....
    #32440458
кстати
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
кстати, Акес иногда криво смотрит на символ |
...
Рейтинг: 0 / 0
Не пойму, в чем засада.....
    #32440468
Nadejda K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
внутренность [Наименование товара] методом кат-паст из описания полей таблицы (запроса) в нужное место разместила, ничего не меняется.

А насчет Debug.Print "[Наименование товара] = '" & Me![Combo10] & "'" я просто не очень понимаю вопрос, т.к. с Access-ом у меня не оченно хорошо. Если должна выдаваться какая-то ошибка, или что-то печататься, то ничего этого не происходит.
...
Рейтинг: 0 / 0
Не пойму, в чем засада.....
    #32440473
zz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ладно. Вставь строку
MsgBox "[Наименование товара] = '" & Me![Combo10] & "'"
перед своей строкой
rs.FindFirst "[Наименование товара] = '" & Me![Combo10] & "'"

и внимательно запомни сообщение, а потом напиши его сюды.
...
Рейтинг: 0 / 0
Не пойму, в чем засада.....
    #32440478
Фотография Geo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ХелпОшибка 3077. Введено недопустимое выражение; причина объясняется в сообщении. Проверьте, что имена полей и пунктуация не содержат ошибок, и повторите операцию.

М.б. имя поля неверно указано? Покажи, пожалуйста, источник данных формы. Возможно, указано не то имя, либо с ошибкой (как и сказал Victosha)
...
Рейтинг: 0 / 0
Не пойму, в чем засада.....
    #32440489
Nadejda K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
ZZ: Дико извиняюсь, был обнаружен апостроф, нечаянно введенный в данные набивальщицей данных. Прошу прощения.... Спасибо, а то в жизни бы не додумалась.
...
Рейтинг: 0 / 0
Не пойму, в чем засада.....
    #32440611
Фотография Лифчик
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Nadejda Kнабивальщицей данных
Вязальщица, чесальщица, прядильщица...
...
Рейтинг: 0 / 0
22 сообщений из 22, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Не пойму, в чем засада.....
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]