求助啊
vfp吧
全部回复
仅看楼主
level 3
啦啦倩123 楼主
表单运行的时候总是显示营业员索引不唯一，咋回事，local eName
eName=alltrim(thisform.text1.value)
if len(eName)=0
return
endif
select 营业员名单表
locate all for 营业员=eName
if eof()
append blank
replace 营业员 with eName
endif
local eName
eName=alltrim(thisform.text1.value)
if len(eName)=0
return
endif
locate all for 营业员=eName
if eof()
return
endif
if delete()
recall
else
delete
endif
哪位大神看得出错误吗[泪][泪][泪][泪]
2016年06月15日 16点06分 1
level 3
啦啦倩123 楼主
一个是添加，一个是辞退
2016年06月15日 16点06分 2
level 12
Luosen56
select 营业员名单表
改为
USE 营业员名单表
2016年06月15日 16点06分 3
Luosen56
你的程序没有明显的模块段落，不好说后面的问题
2016年06月15日 16点06分
啦啦倩123
谢谢
2016年06月16日 00点06分
啦啦倩123
回复Luosen56:调式器指着append blank
2016年06月16日 01点06分
level 3
啦啦倩123 楼主
local eName
eName=alltrim(thisform.text1.value)
if len(eName)=0
return
endif
select 营业员名单表
locate all for 营业员=eName
if eof()
append blank
replace 营业员 with eName
endif
2016年06月16日 00点06分 4
level 3
啦啦倩123 楼主
local eName
eName=alltrim(thisform.text1.value)
if len(eName)=0
return
endif
locate all for 营业员=eName
if eof()
return
endif
if delete()
recall
else
delete
endif
2016年06月16日 00点06分 5
level 3
啦啦倩123 楼主
求助
2016年06月16日 01点06分 6
1