最近我在试做一个小程序,在form1上,有两个控件,combo1,combo2,数据环境为两个表,部门信息,员工信息,
我的目的是combo1显示部门信息表中的部门字段,combo2显示当员工信息表中的部门字段与combo1值相等时的员工信息表中的所有员工姓名
我尝试做了一下,combo2刚开始时显示正确,随后报错,显示不能选定temp1表,我想可能是临时表已经存在的原故,再次操作时就有可能报错,我尝试将临时表关闭,则一开始就会报错,请各位大侠帮忙,不胜感激!
附相关代码
combo1的属性 rowsource="部门信息.部门",rowsourcetype=6
combo2的gotfocus 代码为:
IF !EMPTY(thisform.combo1.Value)
SELECT 300
SELECT 员工姓名 FROM 员工信息 WHERE ALLTRIM(员工信息.部门)=ALLTRIM(thisform.combo1.Value) INTO CURSOR tmp1
thisform.combo2.RowSource="tmp1"
thisform.combo2.RowSourceType= 6
ELSE
MESSAGEBOX("请选择部门",48,"提醒")
ENDIF