求助:使用追加查询时,怎样防止重复记录追入?

landie · 发表于 2004-2-7 23:24

我每天生成汇总数据后,使用追加查询将汇总数据追加入"汇总表"中,(用窗体中的命令按钮控制追加查询),有时多点击了一下命令按钮,就在"汇总表"中追入了二条汇总数据，造成数据不正确。能否在追入一次数据后，当天如果再点这个追加按钮，就出现提示：汇总表中已有当天数据，不能再追加。如果人用代码，请各位高手给我写一个。

landie · 发表于 2004-2-8 22:52

根据工作需要,我每天要向"Y运能总表"是追加一组数据(有40条记录,并要把日期改为当天日期),以便汇总统计,我用窗体按钮控制,但有时会忘记了,多点几次按钮,或被其它人又追加一次,造成总表里当天会有几组重复记录.请各位高手帮解决.

UkFvaTfc.rar (23.56 KB, 下载次数: 39)

landie · 发表于 2004-2-9 23:07

感谢loadhigh ,采用主键的形式的确很容易达到目的,只不过不能加入"当日数据已追入"字样的提示,让操作者知道自己正在重复追加数据,若能在按键增加代码,让按钮按下时,先检查是否已有当日数据,再确定是否追加,这种方法更具有通用性,我还可以用在其它方面.我是初学者,还不会编代码,能在我上传的文件中编一个让我学习吗?先感谢!!!

landie · 发表于 2004-2-10 20:14

我不知道怎么用啊,你能在我上传的文件中帮我做一下让我学习吗?我将非常感谢.

landie · 发表于 2004-2-11 12:25

多谢cg1 ,我试了一下没做出来,是不是我写代码的地方不对,你能在我上传的文件中写了传给我吗?

cg1 · 发表于 2004-2-10 23:30

on error resume next currentproject.connection.execute "insert into tablename(fieldname) values('value')" if err<>0 then msgbox "插入记录有错误，请检查，错误描述为：" & err.description else msgbox "ok，你成功得插入记录了" end if

[此贴子已经被作者于2004-2-10 23:30:32编辑过]

cg1 · 发表于 2004-2-9 23:15

呵呵，既然知道，为什么不用错误陷阱？

loadhigh · 发表于 2004-2-9 13:13

在你的基础上，给你的运能总表加上了主键key,这样就可以避免重复的录入。另外在你的追加查询上加了date()函数，这样日期就可以自动的根据系统日期变化了，不需要手工录入或修改了。

SuLVJBgJ.zip (37.55 KB, 下载次数: 106)

loadhigh · 发表于 2004-2-9 13:27

其实，还有可以将你的按钮中加入代码，让按钮按下后就不能再按下的代码，也就是让它的enable的属性置为false，但是你的程序中不能这么做。

cg1 · 发表于 2004-2-8 20:20

非常简单，每次都根据日期生成一个 ID ，然后这个ID 存放在一个字段里面，然后设置这个字段的索引为“有(无重复)”即可，一旦这样，你再次加入记录会出错，只要写错误陷阱捕捉即可。

		自动登录	找回密码
密码			免费注册