新手求助 望解决呀

[chunling2]

本人写一个工资管理程序,里有职工号一字段,在添加里添加新员工,但职工号不能为空,也不能有重复因此本人在保存处写写了以下代码,但怎样运行有重复的他都能通过,请大家帮一帮忙,看一看,帮小弟解决这个问题
if empty(thisform.txt职工号.value)
messagebox("职工号不能为空")
thisform.txt职工号.setfocus()
else
loca all for 职工号=allt(aaa(1))
if found()
messagebox("职工号不能重复")
go bottom
thisform.txt职工号.value=''
thisform.txt职工号.setfocus()
其中上边个aaa(1)本人系这样付值的
dimension aaa(13)
aaa(1)=thisform.txt职工号.value
replace 员工信息.职工号 with aaa(1)

听取人家意见象这样改也不行：
if empty(thisform.txt职工号.value)
messagebox("职工号不能为空")
thisform.txt职工号.setfocus()
else
loca all for 职工号==allt(thisform.txt职工号.value))
if found()
messagebox("职工号不能重复")
go bottom
thisform.txt职工号.value=''
thisform.txt职工号.setfocus()
else
replace 员工信息.职工号 with allt(thisform.txt职工号.value)
endif
endif

[dfwxj]

修改后的代码问题出在LOCA语句，

应该为：loca all for allt(职工号)==allt(thisform.txt职工号.value)

[chunling2]

这样不行呀改成这样的话,就是没有重复的他都说重复的
怎么办?????????

[chunling2]

我之前在添加按钮写append blank
在保存用了
dimension aaa(13)
aaa(1)=thisform.txt职工号.value

{{{{{这是就是上述代码}}}}

replace 员工信息.职工号 with aaa(1)
是不是因为我一填数据,他就已经把记录存进数据库,然后再从数据里调出来比较,这样就算没有重复因为是刚才填的,他都说重复啦,,有什么办法解决呢,我搞了很多时间都搞不通呀,

[dfwxj]

你先把职工号写进去当然找到啦~~

判断后才能写进去，前面的代码是画蛇添足