Timesheet Table To Create Popup If Timesheet Entries Is Not Entered Day Before

hiya, just posted a message today.

Problem, ive got a work database which employees logon to and enter time against certain projects they have been working on. What i need is to somehow create some code that will look at each of the employees names and sum up there total time for the previous day. If this is less than say 6 hours of timesheets or even zero entries have been made, I want a pop up message to pop up as soon as they logon to the datatbase the next day and jsut mention they need to fill in there timesheets.

At the moment each person when they log on to the database has there name they logged in as, placed into a field (called "First Name") within form (called "Employee Startup Screen"). *** maybe use this as a way to identify who is logged on and when to run the code.***

Timesheet table has the following columns:
Employee; Date; ProjectID; Timespent

PLEASE help im a noob at this and have tried using some code on a query that sums up the previous days times filter on a employee. When the "Employee Startup Screen" opens it runs the following code

Dim internal1 As Integer

internal1 = Me.SumOfTimeSpent

If internal1 < 6 Then

MsgBox " Less than 6 hours have been entered " & Chr(13) & " into your timesheet for yesterday. ", vbCritical, Title1

ElseIf DCount("*", Me.SumOfTimeSpent) <> 0 Then

end if

End Sub

----------------------------


BUT it doesnt work if no entries have been made on the timesheet as the query result is blank.

ANY help would be muchly appreciated.

Thanks Keith