VB CODE ERROR

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" <anonymous@discussions.microsoft.com> wrote in message
news:7bf601c3e80e$5ff95db0$a501280a@phx.gbl
> 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

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...enceErrors.html

--
Dirk Goldgar, MS Access MVP
www.datagnostics.com

(please reply to the newsgroup)