|
|
|
Не пойму, в чем засада.....
|
|||
|---|---|---|---|
|
#18+
Срубило меня совсем на ровном месте. Существует таблица Товар с 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. Где же ошибка, если я даже не сама, а с помощью мастера создания делала? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.03.2004, 15:00 |
|
||
|
Не пойму, в чем засада.....
|
|||
|---|---|---|---|
|
#18+
А почему Set rs = Me.Recordset.Clone ? у тебя что Acc97 что ли в Acc200 - Me.RecordsetClone ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.03.2004, 15:04 |
|
||
|
Не пойму, в чем засада.....
|
|||
|---|---|---|---|
|
#18+
А ему все равно, как это написать. Придирается он к rs.FindFirst "[Наименование товара] = '" & Me![Combo10] & "'" ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.03.2004, 15:07 |
|
||
|
Не пойму, в чем засада.....
|
|||
|---|---|---|---|
|
#18+
Может быть потому, что у вас в Combo10 сидят две записи [Товар] и [С/с], а должна быть одна [Товар]? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.03.2004, 15:08 |
|
||
|
Не пойму, в чем засада.....
|
|||
|---|---|---|---|
|
#18+
Дело в том, что необходимо как раз, чтобы с/с было видно. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.03.2004, 15:11 |
|
||
|
Не пойму, в чем засада.....
|
|||
|---|---|---|---|
|
#18+
Для начала проверь свой rs, не пустой или он вообще и что там у него за содержимое, какие поля... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.03.2004, 15:11 |
|
||
|
Не пойму, в чем засада.....
|
|||
|---|---|---|---|
|
#18+
если вы про выпадающий список, то там все в порядке ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.03.2004, 15:25 |
|
||
|
Не пойму, в чем засада.....
|
|||
|---|---|---|---|
|
#18+
проверьте, нет ли одничной кавычки в том имени, которое в комбобоксе типа Д'Артаньян если есть - это и есть "засада" ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.03.2004, 15:33 |
|
||
|
Не пойму, в чем засада.....
|
|||
|---|---|---|---|
|
#18+
Да, такие кавычки есть rs.FindFirst "[Наименование товара] = ' " & Me![Combo10] & " ' ", но, если их убрать rs.FindFirst "[Наименование товара] = " & Me![Combo10] & "", пишет ту же ошибку ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.03.2004, 16:02 |
|
||
|
Не пойму, в чем засада.....
|
|||
|---|---|---|---|
|
#18+
Шо получается при Debug.Print "[Наименование товара] = ' " & Me![Combo10] & " ' " ? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.03.2004, 16:07 |
|
||
|
Не пойму, в чем засада.....
|
|||
|---|---|---|---|
|
#18+
Я писал вот о чем: Me![Combo10] - он у Вас из двух столбцов. Value этого комбо - выбирается из того столбца, который указан как "Присоединенный" столбец Пусть в этом столбце сидят значения Атос Партос Арамис Д'Артаньян Так вот, На Атосе, Партосе и Арамисе все должно работать. Д'Артаньян - ломает запрос, поскольку планировщик запросов захочет его увидеть как Д''Артаньян. Если тема в этом - то, перед соединением значения комбобокса в строку условия поиска, надо нечетное количество вхождений апострофа заменить на четное. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.03.2004, 16:14 |
|
||
|
Не пойму, в чем засада.....
|
|||
|---|---|---|---|
|
#18+
при Debug.Print "[Наименование товара] = '" & Me![Combo10] & "'" не выбираются значения в форме по combo. А Значений с апострофами у меня нет. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.03.2004, 17:04 |
|
||
|
Не пойму, в чем засада.....
|
|||
|---|---|---|---|
|
#18+
Ну а что Дебаг-то выводит?? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.03.2004, 17:11 |
|
||
|
Не пойму, в чем засада.....
|
|||
|---|---|---|---|
|
#18+
Если в это комбо ногами никто не залез, и значения по умолчанию у него нет, ТО его значение= Null вообще-то надежнее опрашивать через .Value однако все это "влиять" на появление ошибки не должно. условие "[Наименование товара]=''" или "[Наименование товара]='Null'" в любом случае выглядит честно. дело, видно, гд-то в Наименование товара то есть в его буквах - может где вместо русского н латинское h затесалось или пробела не хватает? я бы вот внутренность [Наименование товара] методом кат-паст из описания полей таблицы (запроса) в нужное место разместил ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.03.2004, 17:14 |
|
||
|
Не пойму, в чем засада.....
|
|||
|---|---|---|---|
|
#18+
Код повешен на After_Update -> в комбо никак не Null Код сделан мастером -> название поля правильное. Пусть все-таки она выведет в дебаг эту строку поиска. может, тогда станет яснее. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.03.2004, 17:19 |
|
||
|
Не пойму, в чем засада.....
|
|||
|---|---|---|---|
|
#18+
автор"[Наименование товара]='Null'" проверь: ?"[Наименование товара]='" & Null & "'" должно получиться [Наименование товара]='' что для текста удобоваримо для цифры ('' нет) получится [Наименование товара]= т.е. отсутствие значения в сравнении. авторDebug.Print "[Наименование товара] = '" & Me![Combo10] & "'" надо ввести в дебугер во время останова в программе из-за ошибки - вы увидите значение строки, передаваемое методу Find ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.03.2004, 17:23 |
|
||
|
Не пойму, в чем засада.....
|
|||
|---|---|---|---|
|
#18+
кстати, Акес иногда криво смотрит на символ | ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.03.2004, 17:26 |
|
||
|
Не пойму, в чем засада.....
|
|||
|---|---|---|---|
|
#18+
внутренность [Наименование товара] методом кат-паст из описания полей таблицы (запроса) в нужное место разместила, ничего не меняется. А насчет Debug.Print "[Наименование товара] = '" & Me![Combo10] & "'" я просто не очень понимаю вопрос, т.к. с Access-ом у меня не оченно хорошо. Если должна выдаваться какая-то ошибка, или что-то печататься, то ничего этого не происходит. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.03.2004, 17:33 |
|
||
|
Не пойму, в чем засада.....
|
|||
|---|---|---|---|
|
#18+
Ладно. Вставь строку MsgBox "[Наименование товара] = '" & Me![Combo10] & "'" перед своей строкой rs.FindFirst "[Наименование товара] = '" & Me![Combo10] & "'" и внимательно запомни сообщение, а потом напиши его сюды. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.03.2004, 17:35 |
|
||
|
Не пойму, в чем засада.....
|
|||
|---|---|---|---|
|
#18+
ХелпОшибка 3077. Введено недопустимое выражение; причина объясняется в сообщении. Проверьте, что имена полей и пунктуация не содержат ошибок, и повторите операцию. М.б. имя поля неверно указано? Покажи, пожалуйста, источник данных формы. Возможно, указано не то имя, либо с ошибкой (как и сказал Victosha) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.03.2004, 17:39 |
|
||
|
Не пойму, в чем засада.....
|
|||
|---|---|---|---|
|
#18+
ZZ: Дико извиняюсь, был обнаружен апостроф, нечаянно введенный в данные набивальщицей данных. Прошу прощения.... Спасибо, а то в жизни бы не додумалась. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.03.2004, 17:45 |
|
||
|
|

start [/forum/topic.php?fid=45&tid=1676123]: |
0ms |
get settings: |
11ms |
get forum list: |
15ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
145ms |
get topic data: |
9ms |
get forum data: |
2ms |
get page messages: |
59ms |
get tp. blocked users: |
1ms |
| others: | 235ms |
| total: | 483ms |

| 0 / 0 |
