請問那裡寫錯了(編號:2556)

我要一次刪除多筆資料,我這樣寫
Adodc1.Recordset.MoveFirst
While Not Adodc1.Recordset.EOF
Adodc1.Recordset.Delete
   Adodc1.Recordset.MoveNext
Wend

會出現 "太多列被更新所影響" 的錯誤訊息
請問那裡寫錯了