Читайте также: |
|
3.1 Выводит предметы на понедельник.
UPDATE (расп2 INNER JOIN Расписание_неделя ON (расп2.пара = Расписание_неделя.пара) AND (расп2.[четная/нечетная] = Расписание_неделя.[четная/нечетная])) INNER JOIN Нагрузка ON Расписание_неделя.понедельник = Нагрузка.[код предмета] SET расп2.предмет = Нагрузка![группа/предмет]
WHERE (((расп2.[день нед])="понедельник"));
3.2 Выводит предметы на вторник.
UPDATE (расп2 INNER JOIN Расписание_неделя ON (расп2.пара = Расписание_неделя.пара) AND (расп2.[четная/нечетная] = Расписание_неделя.[четная/нечетная])) INNER JOIN Нагрузка ON Расписание_неделя.вторник = Нагрузка.[код предмета] SET расп2.предмет = Нагрузка![группа/предмет]
WHERE (((расп2.[день нед])="вторник"));
3.3 Выводит предметы на среду.
UPDATE (расп2 INNER JOIN Расписание_неделя ON (расп2.пара = Расписание_неделя.пара) AND (расп2.[четная/нечетная] = Расписание_неделя.[четная/нечетная])) INNER JOIN Нагрузка ON Расписание_неделя.среда = Нагрузка.[код предмета] SET расп2.предмет = Нагрузка![группа/предмет]
WHERE (((расп2.[день нед])="среда"));
3.4 Выводит предметы на четверг.
UPDATE (расп2 INNER JOIN Расписание_неделя ON (расп2.[четная/нечетная] = Расписание_неделя.[четная/нечетная]) AND (расп2.пара = Расписание_неделя.пара)) INNER JOIN Нагрузка ON Расписание_неделя.четверг = Нагрузка.[код предмета] SET расп2.предмет = Нагрузка![группа/предмет]
WHERE (((расп2.[день нед])="четверг"));
3.5 Выводит предметы на пятницу.
UPDATE (расп2 INNER JOIN Расписание_неделя ON (расп2.[четная/нечетная] = Расписание_неделя.[четная/нечетная]) AND (расп2.пара = Расписание_неделя.пара)) INNER JOIN Нагрузка ON Расписание_неделя.пятница = Нагрузка.[код предмета] SET расп2.предмет = Нагрузка![группа/предмет]
WHERE (((расп2.[день нед])="пятница"));
3.6 Переводит день недели из числа в текст.
UPDATE календарь INNER JOIN [Даты в кален] ON календарь.День = [Даты в кален].День SET календарь.деньНед = IIf([Даты в кален]!деньНед=0,"ВС",IIf([Даты в кален]!деньНед=1,"ПН",IIf([Даты в кален]!деньНед=2,"ВТ",IIf([Даты в кален]!деньНед=3,"СР",IIf([Даты в кален]!деньНед=4,"ЧТ",IIf([Даты в кален]!деньНед=5,"ПТ",IIf([Даты в кален]!деньНед=6,"СБ")))))));
3.7 Задает нужный месяц.
UPDATE календарь SET календарь.месяц = [введите месяц, например, 03];
3.8 Выводит сегодняшнюю дату.
UPDATE [Начало уч года] SET [Начало уч года].Сегодня = Date();
3.9 Обнуляет поле выходные.
UPDATE календарь SET календарь.[Выходные да/нет] = False;
3.10 Помечает выходные дни.
UPDATE календарь INNER JOIN [Даты в кален] ON (календарь.месяц = [Даты в кален].месяц) AND (календарь.День = [Даты в кален].День) SET [Даты в кален].[Выходные да/нет] = True
WHERE ((([Даты в кален].деньНед)=0 Or ([Даты в кален].деньНед)=6));
3.11 Рассчитывает номер учебной недели.
UPDATE [Начало уч года], календарь INNER JOIN [Даты в кален] ON календарь.День = [Даты в кален].День SET календарь.[номер уч нед] = Int((DateValue([Даты в кален]!Дата)-DateValue([Начало уч года]![Дата начала учебного года]))/7)+1;
3.12 Добавляет в календарь четность недели.
UPDATE [чет/нечет неделя] INNER JOIN календарь ON [чет/нечет неделя].Неделя = календарь.[номер уч нед] SET календарь.[нечетная/четная] = [чет/нечет неделя]![нечет/чет];
Дата добавления: 2015-07-08; просмотров: 230 | Нарушение авторских прав
<== предыдущая страница | | | следующая страница ==> |
Разработка запросов | | | Разработка отчетов |