You can delete all the data from table


Dim Db as database
Dim SQLs as string
Set db = opendatabase("C:\Bibilio.mdb")
SQLs= "Delete from Address"
Db.execute SQLS

The above SQL command will delete all the contents from the table Address


I hope this is what you want