IF (MESSAGEBOX('Are you sure you want to delete this client',1,'Delete')) =1 then if thisform.Value = 1 messagebox('Cannot DELETE a record! Only READ access is granted!', 16, 'Security Alert') else delete go top messagebox('Record deleted successfully!', 64, 'Information') thisform.refresh() endif ELSE return endifI have this class code which marks records in my record for deleting. It works Fine for every thing.