First query
Code:
SELECT tblSchools.NewSchoolsID, tblSchools.SchoolName, IIf(IsNull([SchoolEmail]) Or (IsValidEmail([SchoolEmail])=False),"Fix Email","") AS Email, IsValidEmail([SchoolEmail]) AS Expr1
FROM (tblSchools INNER JOIN tblTeacher ON tblSchools.NewSchoolsID = tblTeacher.NewSchoolsID) INNER JOIN (tblShows INNER JOIN (tblBookings INNER JOIN tblJncTeacher ON tblBookings.BookingsID = tblJncTeacher.BookingsID) ON tblShows.ShowsID = tblBookings.ShowsID) ON tblTeacher.TeacherID = tblJncTeacher.TeacherID
WHERE (((tblBookings.StatusID)=4) AND ((tblBookings.BookingDate) Between [forms]![frmSchoolEndOfYearEmail]![DateFrom_Box] And [forms]![frmSchoolEndOfYearEmail]![DateUntil_Box]) AND ((tblShows.TheatreShow)=False))
GROUP BY tblSchools.NewSchoolsID, tblSchools.SchoolName, IIf(IsNull([SchoolEmail]) Or (IsValidEmail([SchoolEmail])=False),"Fix Email",""), IsValidEmail([SchoolEmail])
HAVING (((tblSchools.NewSchoolsID)<>9389))
ORDER BY tblSchools.SchoolName;
Second
Code:
SELECT tblSchools.NewSchoolsID, tblSchools.SchoolName, IIf(IsNull([SchoolEmail]) Or (IsValidEmail([SchoolEmail])=False),"Fix Email","") AS Email
FROM (tblSchools INNER JOIN tblTeacher ON tblSchools.NewSchoolsID = tblTeacher.NewSchoolsID) INNER JOIN (tblShows INNER JOIN (tblBookings INNER JOIN tblJncTeacher ON tblBookings.BookingsID = tblJncTeacher.BookingsID) ON tblShows.ShowsID = tblBookings.ShowsID) ON tblTeacher.TeacherID = tblJncTeacher.TeacherID
WHERE (((IIf([statusid]=2 Or [statusid]=3 Or [statusid]=6 Or [statusid]=7 Or [statusid]=11 Or [statusid]=12,1,0))=1) AND ((tblBookings.BookingDate) Between [forms]![frmSchoolEndOfYearEmail]![DateFrom_Box] And [forms]![frmSchoolEndOfYearEmail]![DateUntil_Box]) AND ((tblShows.TheatreShow)=False))
GROUP BY tblSchools.NewSchoolsID, tblSchools.SchoolName, IIf(IsNull([SchoolEmail]) Or (IsValidEmail([SchoolEmail])=False),"Fix Email","")
HAVING (((tblSchools.NewSchoolsID)<>9389))
ORDER BY tblSchools.SchoolName;
Third (and the one that excludes schools by using the other)
Code:
SELECT qry_EOY_ConfirmedInWriting.NewSchoolsID, qry_EOY_ConfirmedInWriting.SchoolName, qry_EOY_NotConfirmed.Email
FROM qry_EOY_ConfirmedInWriting LEFT JOIN qry_EOY_NotConfirmed ON qry_EOY_ConfirmedInWriting.NewSchoolsID = qry_EOY_NotConfirmed.NewSchoolsID
WHERE (((qry_EOY_ConfirmedInWriting.NewSchoolsID)<>9389) AND ((qry_EOY_NotConfirmed.NewSchoolsID) Is Null))
ORDER BY qry_EOY_ConfirmedInWriting.SchoolName;
That's 3 queries that I'd rather have as a string for making a dao.recordset for code (and not having to keep 3 saved queries)