Deletes a table from a database.
Function DeleteTable(TableNo As Long) As Boolean
The number of the table that is to be deleted.
tmpVar = CF1.DeleteTable(CLng(.Text1(cf.TableNoCreate).Text))
If VarType(tmpVar) = vbBoolean And tmpVar = True Then
logWr "DeleteTable: OK"
logWr "DeleteTable: Failed"
DeleteTable deletes the table with TableNo from the database. If the table was found and it could be deleted, DeleteTable returns TRUE.
If DeleteTable returns FALSE, an error occurred. This means that either the table could not be found or that the table was locked. When DeleteTable returns FALSE, the error handler is called.