powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Не срабатывает конкатенация
16 сообщений из 16, страница 1 из 1
Не срабатывает конкатенация
    #32638420
DenDY
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Подставляю в комбобоксе значение при этом автоматом должно в текстовом поле значение что в комбо + слово
Пишу
Private Sub ПолеСоСписком14_afterUpdate()
Dim x As String
x = "Select Number_PP,Ispolnenie from PP,General Where General.Ispolnenie=" & Дело & "ПолеСоСписком14.Value"
Ispolnenie.DefaultValue = x
End Sub
Укажите ошибки в поле?
При запуске выдается в поле значение #имя?
...
Рейтинг: 0 / 0
Не срабатывает конкатенация
    #32638437
Фотография Geo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Попробуй
x = "Select Number_PP,Ispolnenie from PP,General Where General.Ispolnenie=" & Дело & ПолеСоСписком14.Value
...
Рейтинг: 0 / 0
Не срабатывает конкатенация
    #32638439
Bely
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
4.
Private Sub ПолеСоСписком14_afterUpdate()
Dim x As String
x = "Select Number_PP,Ispolnenie from PP,General Where General.Ispolnenie=" & Дело & "ПолеСоСписком14.Value"
Ispolnenie.DefaultValue = x
End Sub

Ispolnenie.DefaultValue = x
Мне так кажется, что суда не запрос надо подставлять... а значение полученное после запроса.
и с кавычками в запросе у тебя плоховато, наверно.
ПолеСоСписком14.Value - будет вставлено не значение, а именно этот текст.
...
Рейтинг: 0 / 0
Не срабатывает конкатенация
    #32638474
___Dmitry___
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Я так понимаю, что General.Ispolnenie - это текстовый атрибут, поэтому лучше так попробовать
x = "Select Number_PP,Ispolnenie from PP,General Where
General.Ispolnenie Like '"Дело & ПолеСоСписком14.Value & "' "
...
Рейтинг: 0 / 0
Не срабатывает конкатенация
    #32638492
Фотография Geo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ой. А зачем defaultvalue="select..." ?
Надо

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Private Sub ПолеСоСписком14_afterUpdate()
  Dim x As String
  on error resume next
  x = currentdb.openrecordset("Select Number_PP, Ispolnenie from PP, " & _
                                         "General Where General.Ispolnenie='" & Дело & _
                                         ПолеСоСписком14.Value &"'").Fields( 0 )
  Ispolnenie.DefaultValue = """" & x & """"
End Sub
...
Рейтинг: 0 / 0
Не срабатывает конкатенация
    #32638661
DenDY
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Многоуважаемые господа! Все ваши варианты были проверены! ни один не сработал! НЕ могли бы вы еще предложить ваши варианты?
...
Рейтинг: 0 / 0
Не срабатывает конкатенация
    #32638670
Bely
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
DenDYМногоуважаемые господа! Все ваши варианты были проверены! ни один не сработал! НЕ могли бы вы еще предложить ваши варианты?
Вариантов-то много - вот только ЧТО ИМЕННО надо сделать не очень понятно :)

не известно какого типо поле, какие данные и как должы в него записываться, какого типа поля в БД и т.д. и т.п.

Опиши задачу, и "как именно не работает".
Выдает ошибку или неправильный результат?
и еще... с каким полем в БД связано твое поле в которое ты записываешь результат?
...
Рейтинг: 0 / 0
Не срабатывает конкатенация
    #32638753
DenDY
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Значит тип данных в комбо типа текст, но пишут там цифры, но это не важно.
при выборе из комбо значения, в поле отдельное типа тоже текст. После того как выбрана запись в поле комбо поле Иполнено должно выглядеть так
Дело + Запись выбранная в поле комбо! Ну вроде на все ответил
...
Рейтинг: 0 / 0
Не срабатывает конкатенация
    #32638786
Фотография paparome
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
DenDYПодставляю в комбобоксе значение при этом автоматом должно в текстовом поле значение что в комбо + слово
...
Все, я в айте :(
ЧТо-то совсем ничего не понял :(
Если надо заносить значение в текстовое поле (после выбора в комбике), тогда зачем заполняется свойство DefaultValue?

Почему нельзя хотимое "хранить" в третьем столбце комбика (ширина = 0 см) и вытаскивать его оттуда, а не лазить каждый раз в таблу.

PS: ЧТо-то я сегодня туго соображаю :( (Или вопросы так задают?)
...
Рейтинг: 0 / 0
Не срабатывает конкатенация
    #32638792
Фотография paparome
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
DenDYЗначит тип данных в комбо типа текст, но пишут там цифры, но это не важно.
при выборе из комбо значения, в поле отдельное типа тоже текст. После того как выбрана запись в поле комбо поле Иполнено должно выглядеть так
Дело + Запись выбранная в поле комбо! Ну вроде на все ответил

Может я не догоняю, но мне кажется, что делается это так!
Код: plaintext
1.
2.
Private Sub ПолеСоСписком14_afterUpdate()
  Ispolnenie = Дело & ПолеСоСписком14.Column( 1 )
End Sub
...
Рейтинг: 0 / 0
Не срабатывает конкатенация
    #32638824
DenDY
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
paparome DenDYЗначит тип данных в комбо типа текст, но пишут там цифры, но это не важно.
при выборе из комбо значения, в поле отдельное типа тоже текст. После того как выбрана запись в поле комбо поле Иполнено должно выглядеть так
Дело + Запись выбранная в поле комбо! Ну вроде на все ответил

Может я не догоняю, но мне кажется, что делается это так!
Код: plaintext
1.
2.
Private Sub ПолеСоСписком14_afterUpdate()
  Ispolnenie = Дело & ПолеСоСписком14.Column( 1 )
End Sub

Если следую твоему совету, то в поле идет подстановка (отображается)
Дело & ПолеСоСписком14.Column(1)
А не значение полясосписком14!
...
Рейтинг: 0 / 0
Не срабатывает конкатенация
    #32638832
DenDY
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Всем большое спасибо! Что то сидел тупил! На самом деле все было проще!
Вот ответ на мой вопрос
Ispolnenie.Value = "Дело" & " " & ПолеСоСписком14.Value
...
Рейтинг: 0 / 0
Не срабатывает конкатенация
    #32638837
Фотография Daf
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
DenDYВсем большое спасибо! Что то сидел тупил! На самом деле все было проще!
Вот ответ на мой вопрос
Ispolnenie.Value = "Дело" & " " & ПолеСоСписком14.Value

А не проще:

Ispolnenie.Value = "Дело " & ПолеСоСписком14.Value
...
Рейтинг: 0 / 0
Не срабатывает конкатенация
    #32638840
Bely
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
DafА не проще:
Ispolnenie.Value = "Дело " & ПолеСоСписком14.Value
тссс.... тихо ты, а то опять все поломается
...
Рейтинг: 0 / 0
Не срабатывает конкатенация
    #32638865
DenDY
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Не смешно. Нет не проще. Между словом и значением из поля должен быть пробел а ты как предлагаешь оно все будет идти сплошняком. вот попробую как ты говоришь
...
Рейтинг: 0 / 0
Не срабатывает конкатенация
    #32638922
Bely
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
В качестве упражнения для размышления можно найти 10 различйи:
Код: plaintext
1.
2.
str = "Дело" & " " & "Мастера" & " " & "Бо"
str = "Дело " & "Мастера " & "Бо"
...
Рейтинг: 0 / 0
16 сообщений из 16, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Не срабатывает конкатенация
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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