delete data in a table

[Mindzeye]

I am trying to delete the data in a table by selecting the table I want to delete the table in from a combo box on a form. This is what I am using

Dim strFileName As Variant
strFileName = File_imported
DoCmd.DeleteObject acTable = strFileName
:banghead:

Any help you can provide would be appreciated
M

 

[pbaldy]

You want to delete the table, or the data within? For the data you can run a delete query that is basically:

DELETE * FROM TableName

In code you could use your combo for the table name:

CurrentDb.Execute "DELETE * FROM " & Me.ComboName

 

[Mindzeye]

that worked perfectly, thank you Paul --- again

 

[pbaldy]

Happy to help...again.