The query is working fine, here is the code and the problem seems related to
the uddate feature, if I take it out it works.
Private Sub Form_AfterUpdate()
Me.Update = Format(Now, "m/d/yy hh:nn")
End Sub
Private Sub Form_Close()
DoCmd.Minimize
End Sub
Private Sub Form_Current()
Me.[OpenedDate].Locked = Not Me.NewRecord
Me.[DueDate].Locked = Not Me.NewRecord
End Sub
Private Sub Form_Load()
If Me.OpenArgs = "GotoNew" And Not IsNull(Me![SubjectTypeID]) Then
DoCmd.DoMenuItem acFormBar, 3, 0, , acMenuVer70
End If
End Sub
>>The query is fixed and saves the changes in the form but still won't go to
>>next record in the form.
[quoted text clipped - 7 lines]
>
> John W. Vinson [MVP]
John W. Vinson - 02 May 2007 16:11 GMT
>The query is working fine, here is the code and the problem seems related to
>the uddate feature, if I take it out it works.
>
>Private Sub Form_AfterUpdate()
>Me.Update = Format(Now, "m/d/yy hh:nn")
>End Sub
Update is ANOTHER reserved word. Me.Update is an operation to update the
form's recordsource, I would guess - though I don't expect it would actually
work.
You may want to routinely enclose ALL control and fieldnames in square
brackets, since you seem to have a penchant for using reserved words as
fieldnames! Does
Me.[Update] = Now
work? (Note that if Update is a date/time field - as it should be for
searching and sorting - the Format is unnecessary).
John W. Vinson [MVP]
Eve - 02 May 2007 21:39 GMT
I moved it from on update to on dirty and all is well now. Thanks!
>>The query is working fine, here is the code and the problem seems related to
>>the uddate feature, if I take it out it works.
[quoted text clipped - 17 lines]
>
> John W. Vinson [MVP]