Solved Delete itens in a subForm

[sergio vieira]

Good afternoon. I have a subform that registers 13 items. I would like to delete the 13 lines at once, but I can only delete 1 at a time using the Access command "DoCmd.DoMenuItem . acFormBar, acEditMenu, 8, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70"
How can I delete them all at once? I appreciate your help.

 

[MajP]

If it is a subform then all those records probably have something in common. Most likely they have foreign key relating to the main forms primary key.
if called from the main form.

dim strSql as string
strSql = "Delete * from someTable where someForeignKeyField = " & me.SomePrimaryKeyField
currentDb.execute strSql
me.subformControlName.Form.recordset.requery

 

[arnelgp]

what version are you using? those are Old commands.

for newer version:

DoCmd.RunCommand acCmdSelectAllRecords
DoCmd.RunCommand acCmdDeleteRecord

 

[sergio vieira]

I'm using access 2003.

 

[sergio vieira]

Thanks a lot,

arnelgp. It delete all​