Error checking does not work 1

[Techno1X]

Hi,

I can't get the following error checking methods to function properly. In these, the compiler jumps past the statement as if it was never there..

1. Trying to delete a table:
On Error Resume Next
dbOne.TableDefs.Delete tblFun

2.Append the new table to database
On Error Resume Next
dbOne.TableDefs.Append tblFun

If it could be missing libraries, does anyone know which - otherwise, please help. thanks

 

[SkipVought]

When using On Error Resume Next, you ought to be checking the Err object to trap the kind of errors you can possibly getting, and then you need to program around recoveries for each error.

On Error Resume next

'now goes the statement that you expect to error

if err.number <> 0 then
   'here's where your error trapping goes
end if

Skip,
[sub]
Have you heard that the roundest knight at King Arthur's round table was...
Sir Cumference![/sub]

 

[Techno1X]

I've tried that; however, I just want the program to ignore the statement if it reaches an error. Hence "resume next".

One thing I did was use the trapping object with an empty inside block: i.e.
If Err.Number <> 0 Then
End If

But it still gives an error at:
"dbOne.TableDefs.Delete tblFun"

 

[SkipVought]

dbOne.TableDefs.Delete tblFun

how is tblFun declared?

This argument must be a STRING. Maybe...

dbOne.TableDefs.Delete tblFun[b].Name[/b]

if this is a table object.

Skip,
[sub]
Have you heard that the roundest knight at King Arthur's round table was...
Sir Cumference![/sub]

 

[Techno1X]

No, it's a String, I checked.

Is it possible that other portions of code could affect a single "On Error" statement? Note that *none* of the "On Error" statements work in my case.

On the top I declared:
Option Compare Database
Option Base 1

 

[SkipVought]

Put a break in your code.

Use the Watch Window to observe the value in your variables and the Err object.

Skip,
[sub]
Have you heard that the roundest knight at King Arthur's round table was...
Sir Cumference![/sub]