VB CODE ERROR

  • Thread starter Thread starter SAM
  • Start date Start date
S

SAM

I am trying to run the code below and I get this error
message. This code has been working fine in access XP but
when I attempt to use it in access 2000 I get this error
Can someone HELP!

Automation Error
Incorrect Inheritance depth in standard OLE hmember


Private Sub Form_Current()

If Not IsDate(Me.Notice_Return) Then
If DateDiff("d", Me.Notice_Sent, Date) >= 315 Then
MsgBox "You Have Georgia Comp. Hours You Are About
To Lose YOU HAVE 60 DAYS TO TAKE THESE HOURS", vbOKOnly +
vbExclamation
End If
End If
 
SAM said:
I am trying to run the code below and I get this error
message. This code has been working fine in access XP but
when I attempt to use it in access 2000 I get this error
Can someone HELP!

Automation Error
Incorrect Inheritance depth in standard OLE hmember


Private Sub Form_Current()

If Not IsDate(Me.Notice_Return) Then
If DateDiff("d", Me.Notice_Sent, Date) >= 315 Then
MsgBox "You Have Georgia Comp. Hours You Are About
To Lose YOU HAVE 60 DAYS TO TAKE THESE HOURS", vbOKOnly +
vbExclamation
End If
End If
Click to expand...

There's nothing in that code itself that could cause such an error. I
don't know what "Notice_Return" or "Notice_Sent" are, but if they're
simple text boxes I doubt they could be the cause of the problem. Have
you stepped line by line through the code to see on exactly which line
the error is being raised?

Have you just copied a working database from an AXP system to an A2K
system? Maybe there's a problem with the references. See if the
procedures outlined in the following article help:


http://members.rogers.com/douglas.j.steele/AccessReferenceErrors.html
 
Back
Top