我在面板上放置了Edit1.Text,Edit2.Text.用来输入数据到数据库中.
其中Edit1.Text用来输入产品编号.Edit2.Text用来输入产品信息.要如何防止Edit1.Text输入同样的编号到数据库中?
例如:Edit1.Text输入的数据在添加到数据库中是,系统提示有重复编号.否则成功将Edit1.Text和Edit2.Text的内容输入到数据库中.谢谢大家提供方法!!!!
其中Edit1.Text用来输入产品编号.Edit2.Text用来输入产品信息.要如何防止Edit1.Text输入同样的编号到数据库中?
例如:Edit1.Text输入的数据在添加到数据库中是,系统提示有重复编号.否则成功将Edit1.Text和Edit2.Text的内容输入到数据库中.谢谢大家提供方法!!!!
if not eof then
showmessage('编号已存在')
else
.....给点分我吧,我也有问题要问,没有分了,惨~
建主键是最实际的办法,否则太多麻烦,因为1、发现重复值后,你到底是如何处理?改另外一个号还是更新数据?
2、同理,如果存在更新问题,那么这个时候判断数据库有重复值将更加罗嗦。
谢谢!!!才插入数据后,发现有重复的,showmessage('编号已存在')。不需要革新新的数据。要求用户重新编号,只到无重复为止。
with adoquery do
begin
close;
sql.clear;
sql.add('select * from 表 where 编号='''+Edit1.Text+''');
open;
if not eof then
showmessage('编号已存在')
else
加入请注明 csdn 字样
让我们共同提高由于刚刚创立,请大家踊跃参加。
with adoquery do
begin
close;
sql.clear;
sql.add('select * from 表 where 编号='''+Edit1.Text+''');
open;
if not eof then
showmessage('编号已存在')
else下面怎么写?
beign
sql.clear;
sql.text:='insert into 表(编号,信息) VALUES ('''+Edit1.Text+''','''+Edit2.Text+''')';
ExecSQL; end;
beign
close;
sql.text:='insert into 表(编号,信息) VALUES ('''+Edit1.Text+''','''+Edit2.Text+''')';
ExecSQL; end;