写在一个表单上的程序是这样的:
if (found(loca 管理员表.dbf for school=&sch)) then
messagebox( "此学校已有管理员,请重新填写 ",48, "错误 ")
thisform.txtschool.value= " "
end if
结果运行的时候出现了“缺少函数名”的错误提示,请问下是哪里的错误。
------解决方案--------------------------------------------------------
loca 管理员表.dbf for school=&sch
if found() then
messagebox( "此学校已有管理员,请重新填写 ",48, "错误 ")
thisform.txtschool.value= " "
end if
or
如是按school索引
if seek(&sch) then
messagebox( "此学校已有管理员,请重新填写 ",48, "错误 ")
thisform.txtschool.value= " "
end if