Recordset.Find в MDB по дате

20.08.2007, 07:44. **Показов** 1627. **Ответов** 5

Студворк — интернет-сервис помощи студентам

вот такая беда у меня, надо сделать Find в рекордсете на заданную дату, например, 12.06.2001.

пробовал

Visual Basic
1
oRS.find (AssignedDate > #2001-06-12 00:00:00# and AssignedDate < #2001-06-12 23:59:00#)

-- ругается

может кто подсобит?

@am86 · 20.08.2007, 10:42

В методе Find вы можете использовать только операторы '<=’, ‘>= ‘, ‘>’, ‘<’, но не как не использовать сложное условие. Для решения вашей проблемы, вам лучше воспользоваться SQL-запросом типа:

Visual Basic
1
'SELECT * FROM YOURTABLE WHERE AssignedDate > #2001-06-12 00:00:00# AND AssignedDate < #2001-06-12 23:59:00#'

Armen Mnatsakanyan
Certified Professional Master
Visual Basic Programmer
Project Manager of 'Alphabetic of Visual Basic' [russian]
URL: http://www.armentel.com/avb
E-Mail: am86@yahoo.com

20.08.2007, 14:31

да, я знаю что лучше делать SQL, но в моем случае это не подойдет

у меня это все в цикле (цикл на месяц) и делать 30 запросов - как-то не очень красиво. поэтому тут есть 2 пути решения - либо с Find-ом разобраться, либо переписывать весь модуль...

@am86 · 20.08.2007, 15:35

Если время, которое вы исключаете постоянно, а меняется лишь дата (как я понял), то можно сделать следующий запрос:

Visual Basic
1
'SELECT * FROM YOURTABLE WHERE AssignedDate > #' & Format(Date,'yyyy-MM-dd')& ' 00:00:00# AND AssignedDate < #' & Format(Date,'yyyy-MM-dd')& '23:59:00#'

В результате этого, каждый раз ваш запрос будет исполняться с текущей датой.

Armen Mnatsakanyan
Certified Professional Master
Visual Basic Programmer
Project Manager of 'Alphabetic of Visual Basic' [russian]
URL: http://www.armentel.com/avb
E-Mail: am86@yahoo.com

20.08.2007, 15:39

спасибо за ответы, но как я говорил - SQL запрос не подходит, т.к. его придется выполнять 30 раз (у меня прорисовывается календарь).

но я уже ноашел выход из положения - в основном селекте я делаю

Visual Basic
1
sSQL = sSQL & 'year(AssignedDate) & '-' & month(AssignedDate) & '-' & day(AssignedDate) as AD'

и потом уже

Visual Basic
1
oRS.find 'AD = #2001-6-12#'

и это работает!

@am86 · 20.08.2007, 15:47

Ах, календарь....тогда все понятно....

Armen Mnatsakanyan
Certified Professional Master
Visual Basic Programmer
Project Manager of 'Alphabetic of Visual Basic' [russian]
URL: http://www.armentel.com/avb
E-Mail: am86@yahoo.com

Новые блоги и статьи Все статьи Все блоги /
Символические и жёсткие ссылки в Linux. algri14 15.03.2026 Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это дополнительная запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая. . .	[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ФедосеевПавел 14.03.2026 Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .	делаю науч статью по влиянию грибов на сукцессию anaschu 13.03.2026 прикрепляю статью	SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++ 8Observer8 10.03.2026 Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .	Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .	Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .	Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .

Karamba
	20.08.2007, 14:31
	да, я знаю что лучше делать SQL, но в моем случае это не подойдет у меня это все в цикле (цикл на месяц) и делать 30 запросов - как-то не очень красиво. поэтому тут есть 2 пути решения - либо с Find-ом разобраться, либо переписывать весь модуль...

@am86 0 / 0 / 1 Регистрация: 05.11.2006 Сообщений: 133
	20.08.2007, 15:47
	Ах, календарь....тогда все понятно.... Armen Mnatsakanyan Certified Professional Master Visual Basic Programmer Project Manager of 'Alphabetic of Visual Basic' [russian] URL: http://www.armentel.com/avb E-Mail: am86@yahoo.com 0