Delphi使用Adoquery插入数据库的问题
procedureTForm2.BitBtn2Click(Sender:TObject);beginwithadoquery1dobeginactive:=false;s...
procedure TForm2.BitBtn2Click(Sender: TObject);
begin
with adoquery1 do
begin
active:=false;
sql.Clear;
sql.add('insert into Students values(:a,:b,:c,:d,:e,:f,:g,:h,:i)');
parameters.ParamByName('a').Value:=trim(edit5.Text);
parameters.ParamByName('b').Value:=trim(edit6.text);
parameters.ParamByName('c').Value:=trim(edit7.text);
parameters.ParamByName('d').value:=trim(edit8.Text);
parameters.ParamByName('e').value:=trim(edit9.text);
parameters.ParamByName('f').value:=trim(combobox1.Text);
parameters.ParamByName('g').value:=1-radiogroup5.ItemIndex;
parameters.ParamByName('h').value:=datetostr(datetimepicker1.DateTime);
parameters.ParamByName('i').value:=datetostr(datetimepicker2.DateTime);
execsql;
//open
end;
adoquery1.active:=true;
end;
用这段代码向表中插入数据时,在程序运行并调用该事件处理出现异常提示为
不能违反主键的约定。。。
但我插入的数据都是没有违反这个主键唯一,不知道怎么回事啊??? 展开
begin
with adoquery1 do
begin
active:=false;
sql.Clear;
sql.add('insert into Students values(:a,:b,:c,:d,:e,:f,:g,:h,:i)');
parameters.ParamByName('a').Value:=trim(edit5.Text);
parameters.ParamByName('b').Value:=trim(edit6.text);
parameters.ParamByName('c').Value:=trim(edit7.text);
parameters.ParamByName('d').value:=trim(edit8.Text);
parameters.ParamByName('e').value:=trim(edit9.text);
parameters.ParamByName('f').value:=trim(combobox1.Text);
parameters.ParamByName('g').value:=1-radiogroup5.ItemIndex;
parameters.ParamByName('h').value:=datetostr(datetimepicker1.DateTime);
parameters.ParamByName('i').value:=datetostr(datetimepicker2.DateTime);
execsql;
//open
end;
adoquery1.active:=true;
end;
用这段代码向表中插入数据时,在程序运行并调用该事件处理出现异常提示为
不能违反主键的约定。。。
但我插入的数据都是没有违反这个主键唯一,不知道怎么回事啊??? 展开
展开全部
谁知道你数据库表式如何定义的?
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
1、检查录入的数据是否违反了主键唯一。
2、看你的数据库的表里的其他字段是否使用了“索引(有,无重复)”,如果选了这个,也是不允许该字段数据重复的
重点检查2,我遇到很多次!!!!
2、看你的数据库的表里的其他字段是否使用了“索引(有,无重复)”,如果选了这个,也是不允许该字段数据重复的
重点检查2,我遇到很多次!!!!
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询