在程式中使用RecordSet.AddNew大量新增資料,會多一筆空白資料(編號:8580)

程式如下
strASQL = "Delete * FROM TableA"
conn.Execute strASQL
strSQL= "SELECT FieldA,FieldB,FieldC FROM TableA"
rs.open strSQL,conn
While EOF(1)
Get #1,,MyRecord
 rs.AddNew
 rs!FieldA=MyRecordA
 rs!FieldB=MyRecordB
 rs!FieldC=MyRecordC
 rs.Update
Wend
只是我用這種方法去新增資料,每次都會多出一筆空資料而FieldC為數字型態,每次新增到最後一筆都會發生類型不符的錯誤..
另外我這樣做的目的是要更新TableA中的資料
謝謝