Приведение данных в определенный вид

[Андрэич]

Ой, сорри, там наоборот: слэш и точку надо местами поменять

[Emmelman]

Извиняюсь за долгий ответ - выходные И да, ВСЕ заработало! Спасибо огромное, отличное начала рабочего дня!

У меня там в проекте еще есть задачки,если что-то не получится,обязательно отпишусь

[Андрэич]

Сообщение от Emmelman

У меня там в проекте еще есть задачки

Справка по Аксесс 97. Там, например, нет некоторых новых полезных функций, вроде Split() или того же Replace(), но в целом вполне актуальный хэлп... :-)

[Emmelman]

не смогу поставить справку ибо все в компе залочено, ни в programFiles, ни в WINDOWS копирнуть ничего нельзя . Но наверно буду пользоваться справкой в инете , что-то типа этого http://office.microsoft.com/ru-ru/ac...010064691.aspx

Появилась такая проблемка, я сделал запрос в конструкторе на выборку за неделю, все просто,вот он -

SELECT *
FROM Operations
WHERE (((Operations.OPERATIONDATE) Between Date() And Date()-7))
ORDER BY Operations.OPERATIONDATE;

все работает и показывает. И теперь это дело мне нужно перенести в код VBA и я опять запутался. Попробовал вот так вот

MySQL = "SELECT *"
    MySQL = MySQL & " FROM Operations "
    MySQL = MySQL & "WHERE [Operations].[OPERATIONDATE] Between #" & Date & "# And #" & Date & -7"# "
    MySQL = MySQL & " ORDER BY Operations.OPERATIONDATE"
    [Forms]![Weekly_form]![Form1-operations].Form.RecordSource = MySQL

ессно ругается на "-7", убрал его,для теста. Без него ругается на то,что внутри BETWEEN, а именно #19.02.2013# and #19.03.2013# и его можно понять, ведь такое отображение даты использовать в данном операторе нельзя, а нужно переворачивать и поставить слэш вместо точки. И неужели так все сложно? Ведь запрос в конструкторе такой простой

UPDATE:Сделал, мб корявенько, но сделал
вставил вот такой код перед запросом:

MyDate = Date
MyDate2 = Replace(Format(MyDate, "yyyy/mm/dd"), ".", "/")

MyDate3 = Date - 7
MyDate4 = Replace(Format(MyDate3, "yyyy/mm/dd"), ".", "/")

и в запросе вставил :

MySQL = MySQL & "WHERE [Operations].[OPERATIONDATE] Between #" & MyDate2 & "# And #" & MyDate4 & "# "

и теперь мне отображает выборку за неделю) Но выглядит как-то громоздко или нет?

[Андрэич]

Какая нужна выборка: за текущую (прошлую) календарную неделю, за последние (календарн/рабоч) 7 дней или как?

[Андрэич]

http://www.sql.ru/faq/faq_topic.aspx?fid=157

[Emmelman]

выборка за - Текущая дата минус семь дней

Отличная ссылка,сделал закладку,чтоб не потерять!

[Emmelman]

Думаю над задачей, как правильно сформировать запрос.
В моей таблице операций встречаются множественные операции сотрудника. Например Иванов Иван Иваныч перевел деньги тому-то. И так несколько раз, даты могут совпадать (т.е. в один день несколько операций).
Так вот, одним запросом я делаю выборку от текущей даты минус семь дней и вижу ВСЕ операции за этот период и что я хочу сделать: я хочу увидеть операции только тех сотрудников, которые совершили 2 или БОЛЕЕ операций за НЕДЕЛЮ (тек дата минус семь дней).

Создал второй запрос, в котором вывел имена всех сотрудников и их ID, сделал GROUP BY, примерный результат такой -
Иванов И.И. 2
Лопухин А.О. 1
Жирков Д.Д 4
Туполев Г.Д. 0

и так далее...

подсоединил к первому запросу и сразу вижу ошибку в выборке - у Иванова две операции,одна на последней НЕДЕЛЕ,а другая два месяца назад - ИВанов все равно попадает в выборку, а по идее не должен(((

вот запрос с ID и именем:

SELECT Operations.DEBIT_ACCOUNT_OWNER_NAME, Count(Operations.DEBIT_ACCOUNT_OWNER_ID) AS CountOfDEBIT_ACCOUNT_OWNER_ID
FROM Operations
GROUP BY Operations.DEBIT_ACCOUNT_OWNER_NAME
HAVING (((Count(Operations.DEBIT_ACCOUNT_OWNER_ID))>=2))
ORDER BY Operations.DEBIT_ACCOUNT_OWNER_NAME;

а вот запрос куда я подсоединяю предыдущий:

SELECT *
FROM Operations INNER JOIN Query3 ON Operations.DEBIT_ACCOUNT_OWNER_NAME = Query3.DEBIT_ACCOUNT_OWNER_NAME
WHERE (((Operations.OPERATIONDATE) Between Date() And Date()-7))
ORDER BY Operations.OPERATIONDATE;

UPDATE: Подошел по-другому к решению данного вопроса, сделал отдельную таблицу для еженедельных выгрузок, чтобы лишние "подтягивания" из прошлого не мешали, настроил так, что при запуске программы туда скидываются записи за неделю, каждый раз при открытии они обновляются,старые удаляются, типа как +1 день и -1 день

[Андрэич]

Выложи в .mdb таблицы с любыми изменёнными данными для наглядности

[Emmelman]

Я закончил свой программу, отдал ее на начальное тестирование. После поиска багов и их исправления(если будут),могу выложить на форум,так сказать,для ознакомления.