| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 838 人关注过本帖
标题:VFP6 select运行后提示“不能访问选定表”
只看楼主 加入收藏
zhanlin
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2015-7-14
结帖率:0
收藏
已结贴  问题点数:20 回复次数:6 
VFP6 select运行后提示“不能访问选定表”
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


运行第一次时没问题,运行第二次时就提示“不能访问选定表”。请各大侠分解一下。
2015-07-14 15:43
tlliqi
Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19
等 级:贵宾
威 望:204
帖 子:15453
专家分:65956
注 册:2006-4-27
收藏
得分:7 
改CURSOR _te2 为dbf _te2看看
2015-07-14 15:53
zhanlin
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2015-7-14
收藏
得分:0 
回复 楼主 zhanlin
还是不行
2015-07-14 16:09
qingfameng
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:35
帖 子:964
专家分:3019
注 册:2010-2-6
收藏
得分:7 
程序运行完毕后,有关的表要及时关闭,否则,再次运行就不能访问。
2015-07-14 20:17
xs591222
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:28
帖 子:682
专家分:1299
注 册:2009-3-1
收藏
得分:7 
以下是引用qingfameng在2015-7-14 20:17:01的发言:

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


正解
2015-07-14 20:25
mywisdom88
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:191
帖 子:3147
专家分:8408
注 册:2015-3-25
收藏
得分:0 
我昨天晚上也遇到这个问题
在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))
....
这样怎么都不提示不能用了。。
2015-07-29 14:57
bldf
Rank: 1
等 级:新手上路
帖 子:12
专家分:0
注 册:2014-10-23
收藏
得分:0 
个人习惯,每次打开表单首先:close tables all
2015-07-29 23:22
快速回复:VFP6 select运行后提示“不能访问选定表”
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.044582 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved