Macro to delete records in table

I am trying to develop a macro in Microsoft Access 97 to delete all records within a table. I am having trouble developing it can someone help

Macro:
SetWarnings - No
RunSQL - DELETE FROM tablename
SetWarnings - Yes

VBA code:
DoCmd.SetWarnings False
DoCmd.RunSQL "DELETE FROM tablename"
DoCmd.SetWarnings True


------------
Sylvia Delgado at 11/20/2001 9:00:37 AM

I am trying to develop a macro in Microsoft Access 97 to delete all records within a table. I am having trouble developing it can someone help