M
maud.july
All,
I built a MS Access database in MS Access 2003, which I have set up in
a shared folder. I have a form with some standard components such as
text boxs, bottons. When a user updates the form I wish to record the
time/date and username in the record. I have posted a copy of the code
I'm using for the "BeforeUpdate" event below. Now this works fine on
my machine and updates without a problem. However when a user on
another machine (also using MS Access 2003) tries to update the same
field, he gets the following error:
"The expression Before Update you entered as the event property
setting produced the following error: Object or class does not support
the set of events."
Because I am geographically away from my user, I haven't been able to
test this very well. I'm hoping that someone might have some good
ideas off hand. I'm open to either a fix for the problem as is or an
alternative approach.
the code is as follows:
Private Sub Combo104_BeforeUpdate(Cancel As Integer)
Me!Date_Modified = Now()
Me!User_Modified = CurrentUser()
End Sub
Thank you!
I built a MS Access database in MS Access 2003, which I have set up in
a shared folder. I have a form with some standard components such as
text boxs, bottons. When a user updates the form I wish to record the
time/date and username in the record. I have posted a copy of the code
I'm using for the "BeforeUpdate" event below. Now this works fine on
my machine and updates without a problem. However when a user on
another machine (also using MS Access 2003) tries to update the same
field, he gets the following error:
"The expression Before Update you entered as the event property
setting produced the following error: Object or class does not support
the set of events."
Because I am geographically away from my user, I haven't been able to
test this very well. I'm hoping that someone might have some good
ideas off hand. I'm open to either a fix for the problem as is or an
alternative approach.
the code is as follows:
Private Sub Combo104_BeforeUpdate(Cancel As Integer)
Me!Date_Modified = Now()
Me!User_Modified = CurrentUser()
End Sub
Thank you!