Гость
Войти | Профиль | Очистить
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Звездочка * в коде VBA / 10 сообщений из 10, страница 1 из 1
22.10.2020, 17:59
    #40010957
Vasyl.Rudyk
Vasyl.Rudyk
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Звездочка * в коде VBA
В инструкции 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, 18:05
    #40010961
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Звездочка * в коде VBA
Ну так этот запрос и в аксессе не выполнится, аргумент для Like нужно в кавычки заключать
https://support.microsoft.com/ru-ru/office/оператор-like-b2f7ef03-9085-4ffb-9829-eef18358e931
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.10.2020, 18:09
    #40010962
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Звездочка * в коде VBA
Кроме того, если ничего не путаю, при запросе через JET вместо звёздочек * нужно использовать знак процента %
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.10.2020, 18:13
    #40010965
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Звездочка * в коде VBA
И еще, скорее всего (если опять же память не изменяет) это все можно сократить до

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

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


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

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


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

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

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


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