delphi7.0 向数据库输入数据 运行出现错误

运行时并没有报错，但在输入数据添加后出现错误

还有，我在数据库中已经删除了索引或是索引设为空还是出现这个错误，请问哪位高手知道这是什么原因？我用的数据库是access，以下是输入代码：

form4.ADOTable1.Open; //打开数据库
form4.ADOTable1.Last; //移动指针到最后
form4.ADOTable1.Append; //插入一条记录
form4.ADOTable1.FieldValues['员工号']:=edit1.Text;
form4.ADOTable1.FieldValues['姓名']:=edit2.Text;
form4.ADOTable1.FieldValues['缺勤时间']:=edit3.Text;
form4.ADOTable1.FieldValues['缺勤天数']:=edit4.Text;
form4.ADOTable1.FieldValues['缺勤类别']:=edit5.Text;
form4.ADOTable1.FieldValues['缺勤理由']:=edit6.Text;
form4.ADOTable1.Post;
form4.ADOTable1.Close; //关闭数据库

追问：
我在代码中加了一条语句：form4.ADOTable1.Refresh;
虽然不出现上面的的情况，却出现了另外的情况，这是什么原因？
 

答案：
应该是你的数据表中设定了某个字段不允许出现重复值，但你在运行时输入该字段的数据与数据表中已有的数据相同，从而违反了这一规则，所以不能保存新增的记录。建议你对数据库操作时采用try语句进行异常处理。
关于第一个错误，上面的朋友已经回答了，在些不在描述。
第二个问题就是说明你已经把数据集已经关闭了，然而你又重新REFRASH。
这样写就不会报错了。
form4.ADOTable1.Post;
form4.ADOTable1.Refresh; 

上一个：delphi怎么判断数据库表的数据是否为空
下一个：Delphi 里的#48是对应键盘什么键？