Sheduler/Расписание

[AF]

Появилась необходимость встроить в программу расписание по типу OutLook подскажить пример. Спасибо

Код: Выделить всё

[MiGan]

Ну допустим так - кладешь на форму таймер с событием Timer каждую секунду. В событии пишешь код проверки запланированных заданий на этот момент времени. Можешь создать базу таких событий в Аксессе - каждый раз при вызове события делать запрос наподобии SELECT * FROM TASKS WHERE TASK_TIME = #TIME# (ну а вместо TIME уже текущее значение date, time и чего хошь подставляй! Только надо подумать ишо, как лучше оптимизировать эту таблицу, ведь если запланированных заданий там буде много, то и поиск по ним буде долог и муторен!

Можно вместо базы к-либо просто в файл все это дело писать, но тогда нужно ч-то типа индексного файла предусмотреть, опять-таки для ускорения доступа.

Если чего, пиши, будем разбираться

[Snussi]

Предлагаю проверять не чаще раза в минуту.
Плюс завести 2 таблицы - напомненные и ненапомненные задачи.

SELECT * FROM TASKS WHERE TASK_TIME = #TIME# - работать не будет, т.к. время учитывается, имхо, до миллисекунд.

Предлагаю алгоритм:
1. SELECT * FROM CURRENTTASKS WHERE TASK_TIME <= #TIME#
2. INSERT INTO COMPLETEDTASKS SELECT * FROM CURRENTTASKS WHERE TASK_TIME <= #TIME#
3. DELETE FROM CURRENTTASKS WHERE TASK_TIME <= #TIME#

Вот примерно так.

[val]

Или же сделать TASK_TIME текстовым полем а затем:

sNow = Format$(Now, "hh:nn")
SELECT * FROM TASKS WHERE TASK_TIME = sNow

Также чтобы не создавать таблицу COMPLETEDTASKS,
создать поле CompletedFlag в таблице TASKS.

[val]

предыдущий пост естественно будет работать только при интервале 1 мин.

[Snussi]

Мне кажется, что условие с <= надежнее Например, в случае, если в момент напоминания программа просто не работала.

А вторая таблица нужна для случая, когда данных много и они объемные (например, каждая запись содержит JPEG метра на полтора) - тогда даже поиск с флагом будет достаточно долог.

[val]

Согласен....
Условие с <= будет надежнее
Я просто дал человеку альтернативу...