bigfrog 发表于 2015-3-1 23:33:20

如何对添加的数据于数据库内数据进行查重

这话确实很拗口,刚开始学总遇到很多的问题

我做了一个员工登记
我想达到当输入身份证号码的时候,对于数据库内的员工身份证号进行比对,如果重复,弹出警告窗口,告知重复;如果无重复则顺利通过

我想了一下,但不是很行
出现问题
只能判断一次,不修改再次填写这个也能通过

string sfz_no,s_temp
if dwo.name="身份证号码" then
        sfz_no=string(data)
end if
       
select "身份证号码" into:s_temp from employees where "身份证号码"=:sfz_no;

if s_temp<>"" then
        messagebox("有重复","请检查")
end if


需要增加一些什么判断呢让其不修改就无法通过

ehxz 发表于 2015-3-2 00:13:37

你把事件写在itemfocuschanged里的吗?
可以试试在
messagebox("有重复","请检查")
下面加:
This.SetItem(1,"身份证号码","")
就是重复,就清空

bigfrog 发表于 2015-3-2 13:56:30

ehxz 发表于 2015-3-2 00:13
你把事件写在itemfocuschanged里的吗?
可以试试在
messagebox("有重复","请检查")


是的
itemchanged里面

加了This.SetItem(1,"身份证号码","")
好像没效果,没清掉

bigfrog 发表于 2015-3-2 17:08:08

是不是我思路有问题,好像只能查重一次

ehxz 发表于 2015-3-2 18:46:43

itemchanged 不太适合做这种判断,至少我觉得不建议这样做。

bigfrog 发表于 2015-3-2 20:11:51

ehxz 发表于 2015-3-2 18:46
itemchanged 不太适合做这种判断,至少我觉得不建议这样做。


原来我用的是VFP
没有DW的概念
普通窗口加入一个个多个单向编辑框,然后一个个插入数据表
用lostfous即可

PB的DW将数据表的全部字段变为整体,有点无所适从

ehxz 发表于 2015-3-2 21:59:02

DW是PB的专属,其它是没有的。
多写几个方法,测试一下,熟悉的最快了。

hacker3000 发表于 2017-12-22 16:30:16

修改的情况
select count(*) into :n from employees where "身份证号码"=:sfz_no and 主键 <> 这行的主键;

if n > 0 then
      messagebox("有重复","请检查")
end if

插入的情况
select count(*) into :n from employees where "身份证号码"=:sfz_no ;

if n > 0 then
      messagebox("有重复","请检查")
end if
页: [1]
查看完整版本: 如何对添加的数据于数据库内数据进行查重

免责声明:
本站所发布的一切破解补丁、注册机和注册信息及软件的解密分析文章仅限用于学习和研究目的;不得将上述内容用于商业或者非法用途,否则,一切后果请用户自负。本站信息来自网络,版权争议与本站无关。您必须在下载后的24个小时之内,从您的电脑中彻底删除上述内容。如果您喜欢该程序,请支持正版软件,购买注册,得到更好的正版服务。如有侵权请邮件与我们联系处理。

Mail To:Admin@SybaseBbs.com