Valid Until dates on selectable data

[Duncs]

Hi all.

My database contains a Project ID control, with the following
attributes:

1. Control Source = tblTimeSheet.fldProjectID
2. Row Source = SELECT
[tblProjects].[fldProjectDescription], _

[tblProjects].[fldProjectID] _
FROM tblProjects _
WHERE
((([tblProjects].[fldValidUntilDate])>Date())) _
ORDER BY
[tblProjects].[fldProjectID];
3. Bound Column = 2
4. Column Count = 2
5. tblProjects field =
fldProjectID - LongInt, Key Field
fldProjectDescription - String (60)
fldvalidUntilDate - Date/Time


The Scenario

An employee enters details of what they have worked on, on a daily
basis. When
a new project is initiated, the "Valid Until Date" field is set to the
date on
which the project will expire, for example, 17/06/2006.

As users record entries into the database, I am looking to have the
ProjectID
field only display those projects with a still valid "Valid Until Date"
field,
i.e. a "Valid Until Date" that is greater than or equal to the current
system date.

So, if I have an entry for "Project Alpha", with a Valid Until Date of
17/06/2006,
any employee can work on this project up until close of business today,
and will
see the project code listed in the "Project ID" combo control.
However, when they
log into the database tomorrow, as the Valid Until Date has now passed,
the project
should not show in the list of available projects, thereby preventing
them from
selecting it. When they view any previously entered records, they
should still be
able to see those records that were entered against the code "Project
Alpha", with
the Project ID control filled in.

With the Project ID's control attributes that I have, as listed at the
start, if I
change a projects "Valid Until Date" to yesterday, viewing a record for
a user who
has entered this as a valid code at the time, displays a blank control
for the Project ID.


Question

So, how do I do this? Have a "Valid Until Date", but still show valid
entries that
have passed their "Valid Until Date"?


Many thanks, in advance, for any and all help received.

Duncs