数据已存在时输入重复数据如何判断？(10分)

D

dawei919

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-18

• #1

前提：我用的一个TQUERY控件做数据的增加，删除，修改。
此问题是：在增加数据时，若输入关键字段的数据已在表中存在，那么要返回
有关信息，提示用户 数据已存在，重新输入。
如何实现此功能？？？使用什么函数得知此字段值已在表中存在？
烦恼！！！

 

坏

坏蟑螂

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-18

• #2

See The ****ing Manual !!!

 

狮

狮子王

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-18

• #3

你可以对你要添加的数据在表中进行查找呀，如果存在则
Application.Messagebox('该记录已经存在，请重新输入','提示信息',mb_ok or mb_iconinformation);
exit;

 

燕

燕狂徒

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-18

• #4

你的数据库如果不允许出现重复字段，你可以直接用try。。。。execpt 语句就可以了！
只要是重复的记录就会执行execpt后的语句。
很简单不用单独区检测数据库。

 

Y

yyanghhong

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-18

• #5

use the code below to check table first.
select count(*) from tab where i_key= ***;

 

智

智利

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-18

• #6

有没有搞错，这种问题也要问呀，我KAO[!]

 

D

DELPHI鸟

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-18

• #7

Query1.close ;
Query1.sql.clear ;
Query1.sql.add(select 关键字段 from table where 关键字段= '你输入的值')；
Query1.open
if (not (query1.bof and query1.eof))then
begin
写入数据库
end
else
begin
application.Messagebox('记录已经存在!','提示',mb_ok or mb_iconinformation);
exit ;
end ;

大概可以了吧

 

D

DelphiZer

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-18

• #8

最简单的方法是以此数据为关键字对数据库中的相应字段进行搜索，如存在则给出提示；
或者在保存的时候拦截一个事务的参数，检查是否需要覆盖当前数据，如需要覆盖则此数据
已经存在，否则不存在，但是具体的函数我不记得了。

 

S

shiner

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-12-18

• #9

楼上的说的够详细了。