LEADERSOFT.ru
Разработка на заказ программ и сайтов
Разработка
Заказ программы
Прайс-лист
Техническое задание
Проектная документация
Наши клиенты
Реклама и продвижение
Магазин
Перейти в магазин
Новинки магазина
Бизнес программы
Финансовый учет
Документооборот
Исходные коды
Интернет решения
Обучение
Перейти в раздел
Форумы по разработке
Примеры на Access
Рассылка статей
Магазин IT литературы
Блог
Все статьи
Microsoft Access (VBA)
Microsoft Access (Проекты)
Microsoft ASP.NET
Сервисы Google
Технические задания
Новости IT технологий
Сервисы
Форумы разработчика
Контакты
О компании
Регистрация на сайте
Подписка на новости по Email
Сообщество Google+
Подписка subscribe.ru
Новости в формате Атом
Загрузить
Загрузить каталог программ
Форумы по информационным технологиям
Начало
Forums
Регистрация
|
Вход
Forums
Обновлено ::
24 апреля 2024
Форумы
Поиск
Список форумов
Программирование
Microsoft Access. Файлы mdb и accdb
Тема: Использов...
Тема: Использование Like
15.06.2007 19:52:10
Евгений6
1 сообщения
Тема: Использование Like
У меня в запросе параметр должен меняться в зависимости от ситуации
Он может принимать 2 значения.
скажем "все записи" и "иванов". Чтобы запрос выдавал все записи, мне надо чтобы там стояло "Like "*""
Я написал в строке условие отбора IIf(<моё_условие>;"Like "*"";"иванов")
На это ругается "несоответствие типа"
Я написал в строке условие отбора IIf(<моё_условие>;"*";"иванов")
Иванова выбирает, а звездочку игнорирует , как будто ее вообще нет
Пробовал в модулях прописать Function на VBA и потом вставить ее условием отбора- без разницы, реакции такие же как на IIf()
Вручную написать Like "*" - пожалуйста, все работает.
Что делать? В SQL я не силен.
Я пробовал также вместо Like "*" написать вот так: Chr(76)&Chr(105)&Chr(107)&Chr(101)&Chr(32)&Chr(34)&Chr(42)&Chr(34)
тоже не помогает.
P.S.
Автор:
Евгений
от 0:00:00
Источник ...
15.06.2007 19:52:10
Виктор Конюков
34 сообщения
RE: Использование Like
Использование оператора Like дано в примере 3 файла la_form.mdb. Вот функция из примера, которая применяется каждый раз при изменении строки поиска:
Private Sub Books_Change()
Dim rst As Recordset, frm As Form, s As String
On Error GoTo 999
Set frm = Me.myFind3.Form 'Выбираем форму
Set rst = frm.RecordsetClone 'Выбираем таблицу
rst.FindFirst "([Книга] Like '" & Me.Books.Text & "*')=True"
If rst.NoMatch = False Then
frm.Bookmark = rst.Bookmark
End If
Exit Sub
999:
MsgBox "Введите правильно данные?"
End Sub
P.S.
Автор:
Виктор Конюков
от 0:00:00
Источник ...
Страница 1 из 1
Программирование
Microsoft Access. Файлы mdb и accdb
Тема: Использов...
Одноуровневый вид
Древовидная структура
Самый старый из новых
Новейший из старых
Поиск
Список форумов
Начало
|
Forums
Copyright 2002-2016 Leadersoft.ru
::
Leadersoft
::
Соглашение о безопасности
::
Условия использования