G
Guest
At home, sometimes I edit my program using Microsoft Office Access 2003
(11.8166.8172) SP3.
At work, I use a lower version MS Access 2002.
The form I created and edited both at home and at work begins to give me
headache. It runs well while using my own LAN ID however while testing my
program by letting somebody else's LAN ID at work she gets below error
message:
"The expression On click you entered as the event property setting
producedthe following error: Object or Class does not support the set of
events.
* The expression may not result in the name of a macro, the name of of a
user-defined function, or [Event Procedure].
* There may have been an error evaluating the function, event, or macro."
I have grown lots of hair just in case I start to lose my wits. Any help
please. See culprit below:
Private Sub OpenedDateFrom_GotFocus()
On Error Resume Next
Me.lblGetDate.Visible = True
Me.lblGetDateDueDateFrom.Visible = False
Me.lblGetDateDueDateTo.Visible = False
Me.lblGetDateOpenedDateTo.Visible = False
Me.lblGetDateDueDateFrom.Visible = False
Me.lblOpenCal.Visible = True
Me.DTPickerCalendar.Visible = True
End Sub
Could it be caused by the calendar object. The calendar activex object has
been created using my work's version. Have I missed anything here?
(11.8166.8172) SP3.
At work, I use a lower version MS Access 2002.
The form I created and edited both at home and at work begins to give me
headache. It runs well while using my own LAN ID however while testing my
program by letting somebody else's LAN ID at work she gets below error
message:
"The expression On click you entered as the event property setting
producedthe following error: Object or Class does not support the set of
events.
* The expression may not result in the name of a macro, the name of of a
user-defined function, or [Event Procedure].
* There may have been an error evaluating the function, event, or macro."
I have grown lots of hair just in case I start to lose my wits. Any help
please. See culprit below:
Private Sub OpenedDateFrom_GotFocus()
On Error Resume Next
Me.lblGetDate.Visible = True
Me.lblGetDateDueDateFrom.Visible = False
Me.lblGetDateDueDateTo.Visible = False
Me.lblGetDateOpenedDateTo.Visible = False
Me.lblGetDateDueDateFrom.Visible = False
Me.lblOpenCal.Visible = True
Me.DTPickerCalendar.Visible = True
End Sub
Could it be caused by the calendar object. The calendar activex object has
been created using my work's version. Have I missed anything here?