K
Ken
Will someone plz look at the below statement and tell me what is going wrong:
Do While Table1.Eof = False
If Table1![Due Dte] > #1/10/2005# Then
Table1.Edit
Table1![30 Days] = Table1![Gr Amt]
Table1![Status] = 1
Table1.Update
Table1.MoveNext
End If
Loop
Table1![Due Dte] = Date/Time field and has entries such as 11/12/2004,
10/30/2004, etc.
Table1![Status] is an Integer.
I've put MsgBox entries after every entry below the IF statement above and
none of them display. Everytime the code gets to the IF statement it goes
into an infernal loop. I've tried retyping the module and get the same
results.
Thanks in advance and have the great day.
KenP
Do While Table1.Eof = False
If Table1![Due Dte] > #1/10/2005# Then
Table1.Edit
Table1![30 Days] = Table1![Gr Amt]
Table1![Status] = 1
Table1.Update
Table1.MoveNext
End If
Loop
Table1![Due Dte] = Date/Time field and has entries such as 11/12/2004,
10/30/2004, etc.
Table1![Status] is an Integer.
I've put MsgBox entries after every entry below the IF statement above and
none of them display. Everytime the code gets to the IF statement it goes
into an infernal loop. I've tried retyping the module and get the same
results.
Thanks in advance and have the great day.
KenP