Найдите недостающие даты - vba Sql

Question

Я пытаюсь определить, какой студент не представил свою задачу и на какую дату. Я хочу проверить для каждого учащегося, есть ли это или нет. Я не возражаю, если ответ находится в коде sql или vba. Больше спецификации ниже:

Task Table 
------------------------------- 
SubID |ID | Task | Date 
------------------------------- 
1  |1 | Dance | 01-01-2014 
2  |1 | Sing | 02-01-2014 
3  |1 | shout | 05-01-2014 
4  |2 | try | 02-01-2014 
5  |3 | Okay | 01-01-2014 
6  |2 | random| 06-01-2014 
8  |4 |Jumping| 01-01-2014 
9  |4 | try | 02-01-2014 
10  |4 | Piano | 03-01-2014 
11  |4 | try | 04-01-2014 
12  |4 | guitar| 05-01-2014 
13  |4 | try | 06-01-2014 

Student table --the Date is in the dd-mm-yyyy format. - also it is a date/time datatype 

ID | Name | Current 
-------------------- 
1 | Ron | YES 
2 | sqlJ | YES 
3 | jque | NO 
4 | holy | YES 
5 | htdoc| YES 

Желаемый результат:

Кто не представил свою задачу между 01-01-2014 и 06-01-2014

ID | Date 
--------------- 
1 | 03-01-2014 
1 | 04-01-2014 
1 | 06-01-2014 
2 | 01-01-2014 
2 | 03-01-2014 
2 | 04-01-2014 
2 | 05-01-2014 
3 | 02-01-2014 
3 | 03-01-2014 
3 | 04-01-2014 
3 | 05-01-2014 
3 | 06-01-2014 

То, что я пробовал:

SELECT w.ID, w.Date, student.[first name], student.[last name], student.[id] 
FROM tasktbl AS w 
    right join student 
      on w.id = student.[id]; 

//I was thinking of using a vba-for loop to iterate over the range of date and store it in an array spot every Id that doesn't have a date but it didn't work out quite well. 

Любая помощь от псевдо-кода до sql-кода до vba-кода (в основном любой намек к моему квесту) будет оценен

Answer 1

Я использовал таблицу календаря, которая содержит одну строку для каждой даты. Крест присоединиться к этой таблице с студента и ограничивая диапазон дат для ваших 6 значений дал мне 30 строк (6 дат раз 5 студентов):

SELECT sub.* 
FROM 
    (
     SELECT c.the_date, s.ID 
     FROM tblCalendar AS c, student AS s 
     WHERE c.the_date Between #1/1/2014# And #1/6/2014# 
    ) AS sub 

Тогда я использовал это в качестве подзапроса и LEFT JOIN эд его до tasktbl. Таким образом, строки, где «правая сторона» - «Нуль», - это те, в которых ученик не выполнил задачу на рассматриваемую дату.

SELECT sub.ID AS student_id, sub.the_date 
FROM 
    (
     SELECT c.the_date, s.ID 
     FROM tblCalendar AS c, student AS s 
     WHERE c.the_date Between #1/1/2014# And #1/6/2014# 
    ) AS sub 
    LEFT JOIN tasktbl AS t 
    ON (sub.ID = t.ID) AND (sub.the_date = t.Date) 
WHERE t.ID Is Null 
ORDER BY sub.ID, sub.the_date; 

Answer 2

Вы должны быть в состоянии сделать это без каких-либо VBA.

select s.id, t.date 
from 
(--this will populate every possible date, for every student 
    select distinct s.id 
    from students s 
) s 
cross join 
(
    select distinct t.date 
    from taskTable t 
) t 
left join taskTable tt on s.id = tt.id and t.date = tt.date 
where tt.date is null 
--(optional) order by clause, if needed 

По сути, это делает тянет одну запись для каждого возможного студента (от «S» таблицы) и одну запись для каждой возможной даты (из таблицы «Т») и делает перекрестное соединение, который генерирует набор результатов с строкой, содержащей каждую возможную дату для каждого возможного ученика. Помещая это обратно обратно на taskTable (где поле даты TaskTable равно null) будет возвращать только записи из таблицы перекрестного соединения, которые имеют , а не имеют связанные с ними задачи.

Я бы также рекомендовал вам подумать о дизайне TaskTable и вместо отслеживания только выполненных задач отслеживать все задачи и добавлять поле «завершено», которое хранится, если задача выполнена (да) или нет (Нет).