Microsoft JET Database Engine (0x80040E14)
Undefined function 'IsDue' in expression.
I have seen this error a lot in the forums but have not found the fix for my situation. I have read the MS KB article Q189448 and it says to
"replace the Vbajet32.dll file version 220.127.116.1122 with file version 18.104.22.16898 that ships with Microsoft Data Access Components (MDAC) version 1.5. "
It doesn't look like 1.5 is avaiable any more. It also said
"This has been fixed in Visual Basic version 6.0."
Does anyone know what file I download to upgrade to this? I also included the ASP code, SQL of the stored Proceedure, and function in case I messed something up in there.
Set oConn371 = Server.CreateObject("ADODB.Connection")
Set cmd = Server.CreateObject("ADODB.Command")
cmd.ActiveConnection = oConn371
cmd.CommandType = adCmdStoredProc
cmd.CommandText = "qryAutoSchedPM"
SQL Fromn stored proceedure:
SELECT tblPM.PMID, tblPM.MEIDKey, tblPM.PMDesc, tblPM.PMRecur, tblPM.PMLastCompleted, IsDue([PMRecur],[PMLastCompleted]) AS IsDue
Public Function IsDue(PMRecur As Integer, PMLastCompleted As Date) As String
On Error Resume Next
strGap = DateDiff("d", PMLastCompleted, Now)
If strGap > PMRecur Then
IsDue = "Yes"
IsDue = "No"