VFP6 select运行后提示“不能访问选定表”
代码如下：
if !empty(this.value)
SELE IIF(ALLT(NO)="2","√",' ') as Ano,no,日期,单号,型号,标注,数量,单位,系列,单价,金额,备注 FROM dk01 ;
     WHERE ALLT(单号) == ALLT(thisform.单号.value) INTO CURSOR _te1
IF _TALLY > 0
SELE _te1.ano,_te1.no,_te1.日期,_te1.单号,_te1.系列,_te1.型号,_te1.标注,_te1.单位,_te1.数量,_te1.单价,_te1.金额,_te1.备注,IIF(EMPTY(lx.型号),'WN',lx.型号) AS 编号,lx.类型 FROM lx RIGHT OUTER JOIN _te1 on LEFT(allt(lx.型号),2)=LEFT(allt(_te1.型号),2) ORDER BY 单号 INTO CURSOR _te2

SELE ano,no,日期,单号,系列,型号,标注,单位,数量,单价,金额,备注,IIF( ISNULL(编号)=.T.,'00',编号) AS 编号,IIF( ISNULL(编号)=.T.,'物料出厂',类型) AS 类型 FROM _te2 ORDER BY 单号 INTO CURSOR _te3
thisform.xsd.RowSource="_te3.ano,单号,型号,标注,数量"
THISFORM.C1.Enabled=.T.
THISFORM.单号.ReadOnly=.T.
ELSE
STOR "" TO thisform.xsd.RowSource
    = messagebox("对不起!!没有找到相关的记录!!! ",48,Thisform.Caption)
   this.value=''
   Retu 0
endif
ENDIF
 thisform.refresh


运行第一次时没问题，运行第二次时就提示“不能访问选定表”。请各大侠分解一下。

改CURSOR _te2 为dbf _te2看看

还是不行

程序运行完毕后，有关的表要及时关闭，否则，再次运行就不能访问。

正解

我昨天晚上也遇到这个问题
在FROM的INIT中
RES=SQLEXEC(nhandle,"SELETC QH,LH,LD,QY FROM SQL_QHB WHERE QY='是'","SQL_QHB")
IF RES>0
   SELECT QH,LH,LD,QY FROM SQL_QHB WHERE .F. INTO CURSOR TMP_SQL_QHB  &&只要空表
ENDIF

有时候，提示“表TMP_SQL_QHB不能访问”
我记得，我在退出表单的时候，关闭了的。
后来，我只能用CREATE生成表算了，改成。。

RES=SQLEXEC(nhandle,"SELETC QH,LH,LD,QY FROM SQL_QHB WHERE QY='是'","SQL_QHB")
CREATE SURSOR TMP_SQL_QGH (QH VARCHAR(8),LH VARCHAR(16),LD VARCHAR(16),QY VARCHAR(8))
....
这样怎么都不提示不能用了。。

个人习惯，每次打开表单首先：close tables all