关于修改保存时检查重复记
问题:在修改后保存检查重复记录,本身此“单号”记录怎样过滤掉。新增时保存没有问题。**检查是否有重复记录:客户名称,电话,手机,微信 只要有一个相同,就不能保存。
SELECT zzyxkh
=requery("zzyxkh")
LOCA for allt(单号)<>allt(thisform.text1.Value) and allt(客户名称)=allt(thisform.text4.Value) OR allt(电话)=allt(thisform.text7.Value) OR allt(手机)=allt(thisform.text7.Value) OR allt(微信)=allt(thisform.text7.Value)
IF found()
IF messagebox("已经有此记录,请查询:客户名称、电话、手机、微信是否有相同的 !",4+32,"提示")=6
SET filter to allt(单号)<>allt(thisform.text1.Value) and allt(客户名称)=allt(thisform.text4.Value) OR allt(电话)=allt(thisform.text7.Value) OR allt(手机)=allt(thisform.text7.Value) OR allt(微信)=allt(thisform.text7.Value)
thisform.grid1.SetFocus
ENDIF
ELSE