Why doesn't this work in A2007?

M

Mary Fran

I'm still trying to determine why a 2003 application runs fine when opened in
2007 EXCEPT for this code- the field "Endtime" is not being updated but does
in 2003 - can someone help, please?!

DoCmd.Echo False, ""
DoCmd.SelectObject acForm, "frmStudentTimeCard"
DoCmd.ShowAllRecords
DoCmd.ApplyFilter "", "[ID]=[Forms]![frmStudyHallSignIn]![StudentsIn]
And IsNull([endtime])"
If Hour(Time()) < 1 Then
Forms!frmstudenttimecard!Endtime = #11:59:00 PM#
Else
Forms!frmstudenttimecard!Endtime = Time()
End If
DoCmd.ShowAllRecords
Forms!frmstudenttimecard.Visible = False
DoCmd.SelectObject acForm, "frmStudyHallSignIn"
DoCmd.Echo True, ""
DoCmd.Requery "StudentsIn"
Me!Student = Null
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top