ReSQL.ru
     
powered by simpleCommunicator - 2.0.36     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Звездочка * в коде VBA
10 сообщений из 10, страница 1 из 1
Звездочка * в коде VBA
    #40010957
Vasyl.Rudyk
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vasyl.Rudyk
Гость
В инструкции VBA при получении данных из БД Аксеса, есть условие которое имеет в себе знак * , при выполнении кода естественно получаю ошибку, прошу помощи с решением даной задачи спасибо.


пример:

Код: vbnet
1.
2.
3.
Set RS = CreateObject("ADODB.recordset")

RS.Open "select * from [КП_] WHERE (((КП_.[Сегмент клієнта]) Like * 4 * Or (КП_.[Сегмент клієнта]) Like  * 3 * Or (КП_.[Сегмент клієнта]) Like  * 7 *));", CON


Модератор: Учимся использовать тэги оформления кода - FAQ
...
Рейтинг: 0 / 0
22.10.2020, 17:59
| Ответить | Цитировать | Написать  
Звездочка * в коде VBA
    #40010961
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Ну так этот запрос и в аксессе не выполнится, аргумент для Like нужно в кавычки заключать
https://support.microsoft.com/ru-ru/office/оператор-like-b2f7ef03-9085-4ffb-9829-eef18358e931
...
Рейтинг: 0 / 0
22.10.2020, 18:05
| Ответить | Цитировать | Написать  
Звездочка * в коде VBA
    #40010962
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Кроме того, если ничего не путаю, при запросе через JET вместо звёздочек * нужно использовать знак процента %
...
Рейтинг: 0 / 0
22.10.2020, 18:09
| Ответить | Цитировать | Написать  
Звездочка * в коде VBA
    #40010965
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
И еще, скорее всего (если опять же память не изменяет) это все можно сократить до

Код: plaintext
Like "% [437] %"
...
Рейтинг: 0 / 0
22.10.2020, 18:13
| Ответить | Цитировать | Написать  
Звездочка * в коде VBA
    #40010972
Vasyl.Rudyk
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vasyl.Rudyk
Гость
Shocker.Pro,

Дело в том что это все строка VBA в котором особый синтаксис, не один высше указанный вариант к сожалению не работает
...
Рейтинг: 0 / 0
22.10.2020, 18:20
| Ответить | Цитировать | Написать  
Звездочка * в коде VBA
    #40010989
Фотография The_Prist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
The_Prist
Участник
Vasyl.Rudyk
это все строка VBA в котором особый синтаксис
ну как сказать... Синтаксис у Вас для VBA, но запрос-то уйдет в БД, у которой свой синтаксис - SQL. А там чуть иначе все. Поле "[Сегмент клієнта]" - текстовое? Попробуйте так(раз все эти условия у Вас текст, как я понимаю):
Код: vbnet
1.
"select * from [КП_] WHERE (((КП_.[Сегмент клієнта]) Like '% 4 %' Or (КП_.[Сегмент клієнта]) Like  '% 3 %' Or (КП_.[Сегмент клієнта]) Like  '% 7 %'));"


и проверьте точно ли нужны пробелы между знаком "все или ничего"(процент который) и цифрой или Вы их от себя прилепили. Мы Вашу базу не видим и знать этого не можем.
...
Рейтинг: 0 / 0
22.10.2020, 19:06
| Ответить | Цитировать | Написать  
Звездочка * в коде VBA
    #40010990
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Vasyl.Rudyk
Дело в том что это все строка VBA в котором особый синтаксис, не один высше указанный вариант к сожалению не работает
Что такое "особый синтаксис". Первый раз слышу.
Что такое "не работает". На экране появляется сообщение "я не работаю"?
Если нужна помощь, нужно как можно подробнее описать ситуацию, а не как можно более тщательно скрыть все факты.
...
Рейтинг: 0 / 0
22.10.2020, 19:07
| Ответить | Цитировать | Написать  
Звездочка * в коде VBA
    #40010995
Eolt
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Eolt
Участник
Vasyl.Rudyk
Shocker.Pro,

Дело в том что это все строка VBA в котором особый синтаксис, не один высше указанный вариант к сожалению не работает


Это к VBA отношения не имеет. SQL запрос криво написан.
...
Рейтинг: 0 / 0
22.10.2020, 19:15
| Ответить | Цитировать | Написать  
Звездочка * в коде VBA
    #40012505
Roman Mejtes
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Roman Mejtes
Участник
Shocker.Pro
Что такое "особый синтаксис". Первый раз слышу.
Что такое "не работает". На экране появляется сообщение "я не работаю"?
Если нужна помощь, нужно как можно подробнее описать ситуацию, а не как можно более тщательно скрыть все факты.

На мониторе сообщение: "Я не працюю"
а вообще, кровь из глаз от такого кода :D, да еще и SQL
...
Рейтинг: 0 / 0
28.10.2020, 10:38
| Ответить | Цитировать | Написать  
Звездочка * в коде VBA
    #40013507
Фотография Focha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Focha
Участник
Код: vbnet
1.
2.
3.
Set RS = CreateObject("ADODB.recordset")

RS.Open "select * from [КП_] WHERE КП_.[Сегмент клієнта] Like '*[347]*'"
...
Рейтинг: 0 / 0
30.10.2020, 16:16
| Ответить | Цитировать | Написать  
10 сообщений из 10, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Звездочка * в коде VBA
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru             Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=60&fpage=3&tid=2154773]:
 0ms
get settings:
 8ms
get forum list:
 13ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 22ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 45ms
get tp. blocked users:
 1ms
others: 11ms
total:  117ms
созд. / загр.: 117ms
x
x
Закрыть


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