Karamba

Recordset.Find в MDB по дате

20.08.2007, 07:44. Показов 1624. Ответов 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#)
-- ругается

может кто подсобит?
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
20.08.2007, 07:44
Ответы с готовыми решениями:

Не работает поиск в Recordset, метод Find
Господа программисты, возникла вот какая проблема: В ДAO рaбoтaет RS.FindFirst 'len(trim(KODKEY)) &lt; 3' пo aнaлoгии пытaюсь...

В ADODB.Recordset пытаюсь делать .Find по двум параметрам (+)
В ADODB.Recordset пытаюсь делать .Find по двум параметрам (+) Т.е. rs.Find 'Key1='10' AND Key2='5'' Как быть ???

Поиск в Recordset, метод Find (имя поля LIKE '%любой тип данных%')
Господа программисты, возникла вот какая проблема: есть набор записей (Recordset), в нём необходимо производить не точный поиск (имя поля...

5
0 / 0 / 1
Регистрация: 05.11.2006
Сообщений: 133
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
0
Karamba
20.08.2007, 14:31
да, я знаю что лучше делать SQL, но в моем случае это не подойдет
у меня это все в цикле (цикл на месяц) и делать 30 запросов - как-то не очень красиво. поэтому тут есть 2 пути решения - либо с Find-ом разобраться, либо переписывать весь модуль...
0 / 0 / 1
Регистрация: 05.11.2006
Сообщений: 133
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
0
Karamba
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#'
и это работает!
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
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
20.08.2007, 15:47
Помогаю со студенческими работами здесь

Recordset and Find
Доброго всем утра. Есть 2 одинаковых рекордсета (может быть с малыми отличиями). Как можно оптимизировать поиск по рекордсету ? ...

Метод Find объекта ADODB.Recordset
В DAO можно бало задавать больше одного поля в критерии поиска: rs.FindFirst 'Field1 = 12 AND Field2 = 120' В ADO подобное не работает:...

Recordset method Find. Поиск по нескольким условиям
Привет, All! Опять я с проблемой, не получается без нее приходить... Кто использовал метод Find объекта Recordset? Вопрос может и...

Запрос к БД по дате к базе ACCESS ( mdb )
Всем привет! Подскажите, пожалуйста, как производиться запрос к БД по дате.. точнее какой формат должен использоваться при этом?? ...

Редактирование поля: Recordset.edit recordset.Fields('поле') = Text1.text Recordset.update
Есть Recordset базы mdb, некоторые поля в базе пустые. Т.е. Recordset.Fields ('поле') возвращает Null. Когда пытаюсь отредактировать запись...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Опции темы

Новые блоги и статьи
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами
8Observer8 20.02.2026
Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .
Конвертировать закладки radiotray-ng в m3u-плейлист
damix 19.02.2026
Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .
Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI
Eddy_Em 18.02.2026
Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru