Hi guys is there a way to delete multiple table in a single command or any other sugestion?? THKS.

The code for delete one table is as follow:

Dim db As Database
Dim sql As String

Set db = OpenDatabase("c:\p1\data.mdb")
sql = "delete from ACC"
db.Execute sql

Is there another way whereby i could add in a single command line into to above to delete
another table??

e.g:
Dim db As Database
Dim sql As String

Set db = OpenDatabase("c:\p1\data.mdb")
sql = "delete from ACC"
sql = "delete from eACC"
db.Execute sql