cMDB="F:\mwc_new1\fpdb\mwclist.mdb" oAcc=CREATEOBJECT("Access.Application") oAcc.OpenCurrentDatabase(cMDB) cStatus="" oMDB=oAcc.CurrentDB oDB = oAcc.DBEngine cTable="mwcStones" oRS=oMDB.OpenRecordSet(cTable) *% Need help here *% omdb.Execute("DELETE mwstones.*") * Code to add new records * snip..... oRS.UPDATE oRS.CLOSE oAcc.QUIT(1)