关于数据更新

Question

我在服务器端用的ADOQuery
然后定义了一个接口INSERT
代码如下：
procedure TCcrT_BasicInfo.Insert(const ID, Name, Birthday, Enroll, Dept,
 Station: WideString);
var
 Str: string;
begin
 Str := 'Insert into t_basicinfo ';
 Str := str + ' Values ( ' + '''' + ID + ''',' + '''' +Name +  ''','
                           + '''' + Birthday + ''',' + '''' + Enroll + ''','
                           + '''' + Dept + ''',' + '''' + Station + ''' )'; with ADOQryT_BasicInfo do
 begin
   Close;
   Sql.Clear;
   Sql.Add(Str);
   ExecSql;
 end;
end;而在客户端的代码如下
DmClient.SckT_basicInfo.AppServer.Insert(edit1.Text,edit4.Text,edit2.Text,edit5.Text,edit3.Text,edit6.Text );
DmClient.CdsT_BasicInfo.Refresh;然后就报错，说是两次添加，这个怎么解决

Answer 1

d5以后，数据更新早就不用这样的接口了，自己也该更新一下知识了。
自己查一下吧。